[freeside-commits] freeside/httemplate/misc/process batch-cust_pay.cgi, 1.5, 1.6 payment.cgi, 1.21, 1.22

Jeff Finucane,420,, jeff at wavetail.420.am
Wed Sep 22 12:16:22 PDT 2010


Update of /home/cvs/cvsroot/freeside/httemplate/misc/process
In directory wavetail.420.am:/tmp/cvs-serv19099/httemplate/misc/process

Modified Files:
	batch-cust_pay.cgi payment.cgi 
Log Message:
prepayment discounts rt#5318

Index: payment.cgi
===================================================================
RCS file: /home/cvs/cvsroot/freeside/httemplate/misc/process/payment.cgi,v
retrieving revision 1.21
retrieving revision 1.22
diff -u -w -d -r1.21 -r1.22
--- payment.cgi	17 Jun 2010 01:17:09 -0000	1.21
+++ payment.cgi	22 Sep 2010 19:16:20 -0000	1.22
@@ -119,11 +119,18 @@
   die "unknown payby $payby";
 }
 
+$cgi->param('discount_term') =~ /^\d*$/
+  or errorpage("illegal discount_term");
+my $discount_term = $1;
+
 my $error = '';
 my $paynum = '';
 if ( $cgi->param('batch') ) {
 
-  $error = $cust_main->batch_card(
+  $error = 'Prepayment discounts not supported with batched payments' 
+    if $discount_term;
+
+  $error ||= $cust_main->batch_card(
                                    'payby'    => $payby,
                                    'amount'   => $amount,
                                    'payinfo'  => $payinfo,
@@ -146,6 +153,7 @@
     'payunique'  => $payunique,
     'paycvv'     => $paycvv,
     'paynum_ref' => \$paynum,
+    'discount_term' => $discount_term,
     map { $_ => $cgi->param($_) } @{$payby2fields{$payby}}
   );
   errorpage($error) if $error;

Index: batch-cust_pay.cgi
===================================================================
RCS file: /home/cvs/cvsroot/freeside/httemplate/misc/process/batch-cust_pay.cgi,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -w -d -r1.5 -r1.6
--- batch-cust_pay.cgi	15 Aug 2010 06:21:06 -0000	1.5
+++ batch-cust_pay.cgi	22 Sep 2010 19:16:20 -0000	1.6
@@ -15,6 +15,7 @@
 %                                       'paid'     => $param->{"paid$row"},
 %                                       'payby'    => 'BILL',
 %                                       'payinfo'  => $param->{"payinfo$row"},
+%                      'discount_term'  => $param->{"discount_term$row"},
 %                                       'paybatch' => $paybatch,
 %                                     }
 %      if    $param->{"custnum$row"}



More information about the freeside-commits mailing list