Return to rt_invoices.pl CVS log | Up to [local] / RT / Invoicing |
version 1.26, 2011/04/19 04:19:27 | version 1.27, 2011/04/19 04:21:06 | ||
---|---|---|---|
|
|
||
} | } | ||
my $invoice = $cust->{invoice}; | my $invoice = $cust->{invoice}; | ||
next | if ($invoice->{start} && $invoice->{start} > $fee->{date}) { | ||
if $invoice->{start} | warn "Ticket " . $ticket->id | ||
&& $invoice->{start} > $fee->{date}; | . " has old uninvoiced Transaction " . $txn->id . "\n"; | ||
next; | |||
} | |||
next if $invoice->{end} < $fee->{date}; | next if $invoice->{end} < $fee->{date}; | ||
push @{ $project{fees} }, $fee; | push @{ $project{fees} }, $fee; |