diff options
| author | jeff <jeff> | 2002-02-19 03:22:39 +0000 |
|---|---|---|
| committer | jeff <jeff> | 2002-02-19 03:22:39 +0000 |
| commit | ed1503c6d45280adc4853219a2858194604b8732 (patch) | |
| tree | 9072c34457453d30fad156751fcca493a6748033 /FS/FS/cust_refund.pm | |
| parent | aa69f07119fbed68a84f889fc4bea93790a9a628 (diff) | |
fix refund posting
Diffstat (limited to 'FS/FS/cust_refund.pm')
| -rw-r--r-- | FS/FS/cust_refund.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/FS/FS/cust_refund.pm b/FS/FS/cust_refund.pm index 3af8305..8fe6876 100644 --- a/FS/FS/cust_refund.pm +++ b/FS/FS/cust_refund.pm @@ -96,7 +96,7 @@ sub insert { my $dbh = dbh; if ( $self->crednum ) { - my $cust_credit = qsearchs('cust_bill', { 'invnum' => $self->invnum } ) + my $cust_credit = qsearchs('cust_credit', { 'crednum' => $self->crednum } ) or do { $dbh->rollback if $oldAutoCommit; return "Unknown cust_credit.crednum: ". $self->crednum; @@ -266,7 +266,7 @@ sub check { =head1 VERSION -$Id: cust_refund.pm,v 1.17 2002-02-19 03:15:11 ivan Exp $ +$Id: cust_refund.pm,v 1.18 2002-02-19 03:22:39 jeff Exp $ =head1 BUGS |