% my $num = 0;
% foreach my $cust_payby ( @cust_payby ) {
% #one line per piece of info? maybe, but just getting something working
% # for now
% if ( $cust_payby->payby eq 'CARD' || $cust_payby->payby eq 'DCRD' ) {
% my $auto = $cust_payby->payby eq 'CARD' ? 'automatic' : 'on-demand';
<% mt("Credit card ([_1])",$auto) |h %>
|
<% mt('Card number') |h %> |
<% $cust_payby->paymask %> |
% my( $mon, $year ) = $cust_payby->paydate_mon_year;
<% mt('Expiration') |h %> |
<% "$mon/$year" %> |
% if ( $cust_payby->paystart_month ) {
<% mt('Start date') |h %> |
<% $cust_payby->paystart_month. '/'. $cust_payby->paystart_year %>
|
% } elsif ( $cust_payby->payissue ) {
<% mt('Issue #') |h %> |
<% $cust_payby->payissue %>
|
% }
<% mt('Name on card') |h %> |
<% $cust_payby->payname %> |
% } elsif ( $cust_payby->payby eq 'CHEK' || $cust_payby->payby eq 'DCHK') {
% my $auto = $cust_payby->payby eq 'CHEK' ? 'automatic' : 'on-demand';
%
% my( $account, $aba ) = split('@', $cust_payby->paymask );
% my $branch = '';
% ($branch,$aba) = split('\.',$aba)
% if $conf->config('echeck-country') eq 'CA';
<% mt("Electronic check ([_1])",$auto) |h %>
|
% #false laziness w/edit/cust_main/billing.html and misc/payment.cgi
% my $routing_label = $conf->config('echeck-country') eq 'US'
% ? 'ABA/Routing number'
% : 'Routing number';
<% mt($routing_label) |h %> |
<% $aba %> |
% if ( $conf->config('echeck-country') eq 'CA' ) {
<% mt('Branch number') |h %> |
<% $branch %> |
% }
<% mt('Account number') |h %> |
<% $account %> |
<% mt('Account type') |h %> |
<% $cust_payby->paytype %> |
<% mt('Bank name') |h %> |
<% $cust_payby->payname %> |
% if ( $conf->exists('show_bankstate') ) {
<% $paystate_label %> |
<% $cust_payby->paystate || ' ' %> |
% }
% } else {
Unknown cust_payby.payby <% $cust_payby->payby %>
|
% }
% unless ( $num++ == $#cust_payby ) {
|
|
% }
% }
% }
<%once>
my $paystate_label = FS::Msgcat::_gettext('paystate');
$paystate_label = 'Bank state' if $paystate_label =~/^paystate$/;
%once>
<%init>
my( $cust_main ) = @_;
my $conf = new FS::Conf;
my @cust_payby = $cust_main->cust_payby;
%init>