diff options
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 15e0e53..af25f17 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_pay +=item sub cust_credit -Returns the payment (see L<FS::cust_pay>) +Returns the credit (see L<FS::cust_credit>) =cut -sub cust_pay { +sub cust_credit { my $self = shift; - qsearchs( 'cust_pay', { 'paynum' => $self->paynum } ); + qsearchs( 'cust_credit', { 'crednum' => $self->crednum } ); } -=item cust_refund +=item cust_bill -Returns the refund (see L<FS::cust_refund>) +Returns the invoice (see L<FS::cust_bill>) =cut -sub cust_refund { +sub cust_bill { my $self = shift; - qsearchs( 'cust_refund', { 'refundnum' => $self->refundnum } ); + qsearchs( 'cust_bill', { 'invnum' => $self->invnum } ); } =back |