From: jeff Date: Sat, 1 Sep 2001 21:55:06 +0000 (+0000) Subject: oops.. need this too X-Git-Tag: freeside_1_4_0pre11~393 X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=80e8925f41f10f9787fa4fe245dcd056ada7a71f;hp=6412f71a3557249225abf5eb2096ebad1729c585 oops.. need this too --- diff --git a/FS/FS/cust_bill_pay.pm b/FS/FS/cust_bill_pay.pm index 045a9490b..e7040d96b 100644 --- a/FS/FS/cust_bill_pay.pm +++ b/FS/FS/cust_bill_pay.pm @@ -108,8 +108,8 @@ sub insert { my $bill_total = 0; $bill_total += foreach map { $_->amount } qsearch('cust_bill_pay', { 'invnum' => $self->invnum } ); -# $bill_total += foreach map { $_->amount } -# qsearch('cust_credit_bill', { 'invnum' => $self->invnum } ); + $bill_total += foreach map { $_->amount } + qsearch('cust_credit_bill', { 'invnum' => $self->invnum } ); if ( $bill_total > $cust_bill->charged ) { $dbh->rollback if $oldAutoCommit; return "total cust_bill_pay.amount and cust_credit_bill.amount $bill_total". @@ -171,7 +171,7 @@ sub check { =head1 VERSION -$Id: cust_bill_pay.pm,v 1.1 2001-09-01 20:11:07 ivan Exp $ +$Id: cust_bill_pay.pm,v 1.2 2001-09-01 21:55:06 jeff Exp $ =head1 BUGS