[freeside-commits] freeside/FS/FS Schema.pm, 1.28, 1.29 cust_credit_bill_pkg.pm, 1.1, 1.2 cust_bill_pay_pkg.pm, 1.1, 1.2 cust_bill_ApplicationCommon.pm, 1.2, 1.3

Ivan,,, ivan at wavetail.420.am
Thu Sep 14 22:10:38 PDT 2006


Update of /home/cvs/cvsroot/freeside/FS/FS
In directory wavetail:/tmp/cvs-serv30232

Modified Files:
	Schema.pm cust_credit_bill_pkg.pm cust_bill_pay_pkg.pm 
	cust_bill_ApplicationCommon.pm 
Log Message:
add sdate and edate to cust_bill_pay_pkg and cust_credit_bill_pkg tables

Index: Schema.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/Schema.pm,v
retrieving revision 1.28
retrieving revision 1.29
diff -u -d -r1.28 -r1.29
--- Schema.pm	26 Aug 2006 23:15:11 -0000	1.28
+++ Schema.pm	15 Sep 2006 05:10:36 -0000	1.29
@@ -389,6 +389,8 @@
         'billpkgnum',          'int', '',      '', '', '',
         'amount',            @money_type,          '', '',
         'setuprecur',      'varchar', '', $char_d, '', '',
+        'sdate',   @date_type, '', '', 
+        'edate',   @date_type, '', '', 
       ],
       'primary_key' => 'creditbillpkgnum',
       'unique'      => [],
@@ -565,6 +567,8 @@
         'billpkgnum',       'int', '', '', '', '',
         'amount',         @money_type,     '', '',
         'setuprecur',      'varchar', '', $char_d, '', '',
+	'sdate',   @date_type, '', '', 
+        'edate',   @date_type, '', '', 
       ],
       'primary_key' => 'billpaypkgnum',
       'unique'      => [],

Index: cust_bill_pay_pkg.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/cust_bill_pay_pkg.pm,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -d -r1.1 -r1.2
--- cust_bill_pay_pkg.pm	21 Aug 2006 23:01:43 -0000	1.1
+++ cust_bill_pay_pkg.pm	15 Sep 2006 05:10:36 -0000	1.2
@@ -44,8 +44,15 @@
 
 =item setuprecur - 'setup' or 'recur', designates whether the payment was applied to the setup or recurring portion of the line item.
 
+=item sdate - starting date of recurring fee
+
+=item edate - ending date of recurring fee
+
 =back
 
+sdate and edate are specified as UNIX timestamps; see L<perlfunc/"time">.  Also
+see L<Time::Local> and L<Date::Parse> for conversion functions.
+
 =head1 METHODS
 
 =over 4
@@ -109,6 +116,8 @@
     || $self->ut_foreign_key('billpkgnum', 'cust_bill_pkg', 'billpkgnum' )
     || $self->ut_money('amount')
     || $self->ut_enum('setuprecur', [ 'setup', 'recur' ] )
+    || $self->ut_numbern('sdate')
+    || $self->ut_numbern('edate')
   ;
   return $error if $error;
 

Index: cust_bill_ApplicationCommon.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/cust_bill_ApplicationCommon.pm,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -d -r1.2 -r1.3
--- cust_bill_ApplicationCommon.pm	13 Sep 2006 14:57:06 -0000	1.2
+++ cust_bill_ApplicationCommon.pm	15 Sep 2006 05:10:36 -0000	1.3
@@ -173,6 +173,8 @@
       'billpkgnum' => $cust_bill_pkg->billpkgnum,
       'amount'     => $amount,
       'setuprecur' => ( $cust_bill_pkg->setup > 0 ? 'setup' : 'recur' ),
+      'sdate'      => $cust_bill_pkg->sdate,
+      'edate'      => $cust_bill_pkg->edate,
     });
     my $error = $application->insert;
     if ( $error ) {

Index: cust_credit_bill_pkg.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/cust_credit_bill_pkg.pm,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -d -r1.1 -r1.2
--- cust_credit_bill_pkg.pm	21 Aug 2006 23:01:43 -0000	1.1
+++ cust_credit_bill_pkg.pm	15 Sep 2006 05:10:36 -0000	1.2
@@ -44,8 +44,15 @@
 
 =item setuprecur - 'setup' or 'recur', designates whether the payment was applied to the setup or recurring portion of the line item.
 
+=item sdate - starting date of recurring fee
+
+=item edate - ending date of recurring fee
+
 =back
 
+sdate and edate are specified as UNIX timestamps; see L<perlfunc/"time">.  Also
+see L<Time::Local> and L<Date::Parse> for conversion functions.
+
 =head1 METHODS
 
 =over 4
@@ -109,6 +116,8 @@
     || $self->ut_foreign_key('billpkgnum', 'cust_bill_pkg', 'billpkgnum' )
     || $self->ut_money('amount')
     || $self->ut_enum('setuprecur', [ 'setup', 'recur' ] )
+    || $self->ut_numbern('sdate')
+    || $self->ut_numbern('edate')
   ;
   return $error if $error;
 



More information about the freeside-commits mailing list