version 1.16, 2011/03/22 04:32:58 |
version 1.17, 2011/03/22 05:06:05 |
|
|
|
|
$state->{lastinvoice}++; |
$state->{lastinvoice}++; |
$invoice->{id} = $state->{lastinvoice}; |
$invoice->{id} = $state->{lastinvoice}; |
$invoice->{file} = 'invoice_' . $state->{lastinvoice} . '.pdf'; |
$invoice->{file} = sprintf 'invoice_%06d.pdf', $state->{lastinvoice}; |
|
|
foreach my $k (qw/ file transactions start end total past_due total_due /) |
foreach my $k (qw/ file transactions start end total past_due total_due /) |
{ |
{ |
|
|
title => $ticket->subject, |
title => $ticket->subject, |
detail => 'Ticket: ' |
detail => 'Ticket: ' |
. $ticket->id |
. $ticket->id |
. ' Queue: ' |
. ' Status: ' |
. $ticket->queue |
. $ticket->status |
. ' Requestors: ' |
. ' Requestors: ' |
. join( ', ', $ticket->requestors ), |
. join( ', ', $ticket->requestors ), |
fees => [], |
fees => [], |