X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=httemplate%2Fmisc%2Fprocess%2Fpayment.cgi;fp=httemplate%2Fmisc%2Fprocess%2Fpayment.cgi;h=939fc38c210b844c707e1ef2b3ba3220788f719d;hp=5620b5b4b60f4f20e4c5389be90478ba2f70cd5a;hb=a3c654c1ae9ea07726aba9899a9b2e1d4dbd12c6;hpb=038b31793f290f65222ae748df05e703c6ae035d diff --git a/httemplate/misc/process/payment.cgi b/httemplate/misc/process/payment.cgi index 5620b5b4b..939fc38c2 100644 --- a/httemplate/misc/process/payment.cgi +++ b/httemplate/misc/process/payment.cgi @@ -39,6 +39,8 @@ my $cust_main = qsearchs({ 'extra_sql' => ' AND '. $curuser->agentnums_sql, }) or die "unknown custnum $custnum"; +my $invoice = ($cgi->param('invoice') =~ /^(\d+)$/) ? $cgi->param('invoice') : ''; + $cgi->param('amount') =~ /^\s*(\d*(\.\d\d)?)\s*$/ or errorpage("illegal amount ". $cgi->param('amount')); my $amount = $1; @@ -224,6 +226,7 @@ if ( $cgi->param('batch') ) { 'payinfo' => $payinfo, 'paydate' => $paydate, 'payname' => $payname, + 'invnum' => $invoice, map { $_ => scalar($cgi->param($_)) } @{$payby2fields{$payby}} ); @@ -246,6 +249,7 @@ if ( $cgi->param('batch') ) { 'discount_term' => $discount_term, 'no_auto_apply' => ($cgi->param('apply') eq 'never') ? 'Y' : '', 'no_invnum' => 1, + 'invnum' => $invoice, map { $_ => scalar($cgi->param($_)) } @{$payby2fields{$payby}} ); errorpage($error) if $error;