[freeside-commits] freeside/FS/FS/Report/Table Monthly.pm, 1.11, 1.12

[Ivan,,,]

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

Modified Files:
	Monthly.pm 
Log Message:
add a netcredits_12mo sub so that 12mo checkbox works again... sure do need these to be auto-generated or $AUTOLOADED or something :)

Index: Monthly.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/Report/Table/Monthly.pm,v
retrieving revision 1.11
retrieving revision 1.12
diff -u -d -r1.11 -r1.12
--- Monthly.pm	14 Mar 2008 07:48:44 -0000	1.11
+++ Monthly.pm	26 Mar 2008 18:18:40 -0000	1.12
@@ -274,6 +274,12 @@
   $self->credits($speriod, $eperiod, $agentnum);
 }
 
+sub netcredits_12mo {
+  my( $self, $speriod, $eperiod, $agentnum ) = @_;
+  $speriod = $self->_subtract_11mo($speriod);
+  $self->netcredits($speriod, $eperiod, $agentnum);
+}
+
 #not being too bad with the false laziness
 use Time::Local qw(timelocal);
 sub _subtract_11mo {