Return to State.pm CVS log | Up to [local] / RT / Invoicing / lib / RTI |
version 1.7, 2012/11/28 02:24:04 | version 1.8, 2012/11/28 02:25:13 | ||
---|---|---|---|
|
|
||
delete $credit{$custid} unless $credit{$custid}; | delete $credit{$custid} unless $credit{$custid}; | ||
} | } | ||
foreach my $id ( sort { $b <=> $a } keys %owes ) { | foreach my $id ( sort { $a <=> $b } keys %owes ) { | ||
my $i = $invoices->{$id}; | my $i = $invoices->{$id}; | ||
my $custid = $i->{custid} or next; | my $custid = $i->{custid} or next; | ||