[freeside-commits] freeside/httemplate/edit/process REAL_cust_pkg.cgi, 1.11, 1.12 quick-charge.cgi, 1.17, 1.18
Ivan,,,
ivan at wavetail.420.am
Tue Jun 30 05:28:40 PDT 2009
Update of /home/cvs/cvsroot/freeside/httemplate/edit/process
In directory wavetail.420.am:/tmp/cvs-serv17249/httemplate/edit/process
Modified Files:
REAL_cust_pkg.cgi quick-charge.cgi
Log Message:
one-time charge "hold for later" / any package future start date, RT#5347
Index: REAL_cust_pkg.cgi
===================================================================
RCS file: /home/cvs/cvsroot/freeside/httemplate/edit/process/REAL_cust_pkg.cgi,v
retrieving revision 1.11
retrieving revision 1.12
diff -u -d -r1.11 -r1.12
--- REAL_cust_pkg.cgi 17 Jun 2009 02:39:09 -0000 1.11
+++ REAL_cust_pkg.cgi 30 Jun 2009 12:28:37 -0000 1.12
@@ -19,6 +19,7 @@
my $pkgnum = $cgi->param('pkgnum') or die;
my $old = qsearchs('cust_pkg',{'pkgnum'=>$pkgnum});
my %hash = $old->hash;
+$hash{'start_date'} = $cgi->param('start_date') ? str2time($cgi->param('start_date')) : '';
$hash{'setup'} = $cgi->param('setup') ? str2time($cgi->param('setup')) : '';
$hash{'bill'} = $cgi->param('bill') ? str2time($cgi->param('bill')) : '';
$hash{'last_bill'} =
Index: quick-charge.cgi
===================================================================
RCS file: /home/cvs/cvsroot/freeside/httemplate/edit/process/quick-charge.cgi,v
retrieving revision 1.17
retrieving revision 1.18
diff -u -d -r1.17 -r1.18
--- quick-charge.cgi 29 May 2009 00:22:48 -0000 1.17
+++ quick-charge.cgi 30 Jun 2009 12:28:38 -0000 1.18
@@ -55,6 +55,10 @@
$error ||= $cust_main->charge( {
'amount' => $amount,
'quantity' => $quantity,
+ 'start_date' => ( scalar($cgi->param('start_date'))
+ ? str2time($cgi->param('start_date'))
+ : ''
+ ),
'pkg' => scalar($cgi->param('pkg')),
'setuptax' => scalar($cgi->param('setuptax')),
'taxclass' => scalar($cgi->param('taxclass')),
More information about the freeside-commits
mailing list