my $rpt = GTIMs::Report->new('Schedule::Daily', $args);
$rpt->create;   # populate the workbook with data
$rpt->print;    # print the workbook
$rpt->destroy;  # destroy the workbook

########################
# the report print function simply looks like this
sub print
{
    my ($self, $copies) = @_;
    $copies = 1 unless $copies;
    $self->{WorkBook}->PrintOut(Copies => 1);
}