[freeside-commits] freeside/FS/FS cust_bill.pm, 1.299.2.34, 1.299.2.35

[Mark Wells]

Update of /home/cvs/cvsroot/freeside/FS/FS
In directory wavetail.420.am:/tmp/cvs-serv30400/FS/FS

Modified Files:
      Tag: FREESIDE_2_1_BRANCH
	cust_bill.pm 
Log Message:
invoice batch download fix, #11871

Index: cust_bill.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/cust_bill.pm,v
retrieving revision 1.299.2.34
retrieving revision 1.299.2.35
diff -u -w -d -r1.299.2.34 -r1.299.2.35
--- cust_bill.pm	24 Apr 2011 15:09:12 -0000	1.299.2.34
+++ cust_bill.pm	27 May 2011 01:11:19 -0000	1.299.2.35
@@ -245,6 +245,7 @@
     cust_pay_batch
     cust_bill_pay_batch
     cust_bill_pkg
+    cust_bill_batch
   )) {
 
     foreach my $linked ( $self->$table() ) {
@@ -704,6 +705,17 @@
 
 }
 
+=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.