projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
RT# 76093 - Added ability to charge a processing fee when taking a payment on the...
[freeside.git]
/
httemplate
/
misc
/
payment.cgi
diff --git
a/httemplate/misc/payment.cgi
b/httemplate/misc/payment.cgi
index
4fa3df7
..
6a1fd55
100644
(file)
--- a/
httemplate/misc/payment.cgi
+++ b/
httemplate/misc/payment.cgi
@@
-22,6
+22,12
@@
? scalar($conf->config('credit-card-surcharge-percentage', $cust_main->agentnum))
: 0
),
? scalar($conf->config('credit-card-surcharge-percentage', $cust_main->agentnum))
: 0
),
+ 'surcharge_flatfee' =>
+ ( $payby eq 'CARD'
+ ? scalar($conf->config('credit-card-surcharge-flatfee', $cust_main->agentnum))
+ : 0
+ ),
+ 'processing_fee' => scalar($conf->config('processing-fee', $cust_main->agentnum)),
&>
% if ( $conf->exists('part_pkg-term_discounts') ) {
&>
% if ( $conf->exists('part_pkg-term_discounts') ) {
@@
-37,7
+43,7
@@
% my $payname = $cust_main->first. ' '. $cust_main->getfield('last');
% if ( $cust_main->payby =~ /^(CARD|DCRD)$/ ) {
% $payinfo = $cust_main->paymask;
% my $payname = $cust_main->first. ' '. $cust_main->getfield('last');
% if ( $cust_main->payby =~ /^(CARD|DCRD)$/ ) {
% $payinfo = $cust_main->paymask;
-%
$paycvv = $cust_main->paycvv
;
+%
( $paycvv = $cust_main->paycvv ) =~ s/./*/g
;
% ( $month, $year ) = $cust_main->paydate_monthyear;
% $payname = $cust_main->payname if $cust_main->payname;
% } elsif ($disable_payauto_default) {
% ( $month, $year ) = $cust_main->paydate_monthyear;
% $payname = $cust_main->payname if $cust_main->payname;
% } elsif ($disable_payauto_default) {
@@
-54,9
+60,8
@@
<TH><% mt('Exp.') |h %></TH>
<TD>
<SELECT NAME="month">
<TH><% mt('Exp.') |h %></TH>
<TD>
<SELECT NAME="month">
-% for ( ( map "0$_", 1 .. 9 ), 10 .. 12 ) {
-
- <OPTION<% $_ == $month ? ' SELECTED' : '' %>><% $_ %>
+% for ( map{ sprintf('%02d',$_) } (1..12) ) {
+ <OPTION VALUE="<% $_ %>"<% $_ == $month ? ' SELECTED' : '' %>><% $_ %></OPTION>
% }
</SELECT>
% }
</SELECT>
@@
-65,8
+70,7
@@
<TD>
<SELECT NAME="year">
% my @a = localtime; for ( $a[5]+1900 .. $a[5]+1915 ) {
<TD>
<SELECT NAME="year">
% my @a = localtime; for ( $a[5]+1900 .. $a[5]+1915 ) {
-
- <OPTION<% $_ == $year ? ' SELECTED' : '' %>><% $_ %>
+ <OPTION VALUE="<% $_ %>"<% $_ == $year ? ' SELECTED' : '' %>><% $_ %></OPTION>
% }
</SELECT>
% }
</SELECT>