diff options
author | mark <mark> | 2011-05-27 01:11:02 +0000 |
---|---|---|
committer | mark <mark> | 2011-05-27 01:11:02 +0000 |
commit | 82879083dd2efddf02192ad48ad0e46e1a16662b (patch) | |
tree | fa80a161b3349c608159a491f3a62237cf69a7d0 /FS/FS/cust_bill.pm | |
parent | 08f4f553676033549452dae97b2e35b236bbcb14 (diff) |
invoice batch download fix, #11871
Diffstat (limited to 'FS/FS/cust_bill.pm')
-rw-r--r-- | FS/FS/cust_bill.pm | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/FS/FS/cust_bill.pm b/FS/FS/cust_bill.pm index 0ba6cdfed..fd3b63820 100644 --- a/FS/FS/cust_bill.pm +++ b/FS/FS/cust_bill.pm @@ -245,6 +245,7 @@ sub delete { cust_pay_batch cust_bill_pay_batch cust_bill_pkg + cust_bill_batch )) { foreach my $linked ( $self->$table() ) { @@ -733,6 +734,17 @@ sub cust_credit_bill_pkg { } +=item cust_bill_batch + +Returns all invoice batch records (L<FS::cust_bill_batch>) for this invoice. + +=cut + +sub cust_bill_batch { + my $self = shift; + qsearch('cust_bill_batch', { 'invnum' => $self->invnum }); +} + =item tax Returns the tax amount (see L<FS::cust_bill_pkg>) for this invoice. |