diff options
author | ivan <ivan> | 2005-10-06 07:34:58 +0000 |
---|---|---|
committer | ivan <ivan> | 2005-10-06 07:34:58 +0000 |
commit | 33aeb33a7fafaf099c679c6d7150b54b99e4810f (patch) | |
tree | 05093e4bb33a922c576a37427c2c47b43ed85f45 /FS/FS/cust_pay_refund.pm | |
parent | a25c3f9493bf910a5e8bfe586c66c1ba5d6c8210 (diff) |
add cc-void option
Diffstat (limited to 'FS/FS/cust_pay_refund.pm')
-rw-r--r-- | FS/FS/cust_pay_refund.pm | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/FS/FS/cust_pay_refund.pm b/FS/FS/cust_pay_refund.pm index af25f17..15e0e53 100644 --- a/FS/FS/cust_pay_refund.pm +++ b/FS/FS/cust_pay_refund.pm @@ -138,26 +138,26 @@ sub check { $self->SUPER::check; } -=item sub cust_credit +=item sub cust_pay -Returns the credit (see L<FS::cust_credit>) +Returns the payment (see L<FS::cust_pay>) =cut -sub cust_credit { +sub cust_pay { my $self = shift; - qsearchs( 'cust_credit', { 'crednum' => $self->crednum } ); + qsearchs( 'cust_pay', { 'paynum' => $self->paynum } ); } -=item cust_bill +=item cust_refund -Returns the invoice (see L<FS::cust_bill>) +Returns the refund (see L<FS::cust_refund>) =cut -sub cust_bill { +sub cust_refund { my $self = shift; - qsearchs( 'cust_bill', { 'invnum' => $self->invnum } ); + qsearchs( 'cust_refund', { 'refundnum' => $self->refundnum } ); } =back |