summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--FS/FS/payinfo_Mixin.pm6
-rwxr-xr-xhttemplate/search/cust_pay.html1
-rwxr-xr-xhttemplate/search/elements/cust_pay_or_refund.html10
3 files changed, 16 insertions, 1 deletions
diff --git a/FS/FS/payinfo_Mixin.pm b/FS/FS/payinfo_Mixin.pm
index c66e3bc37..6b96bbe27 100644
--- a/FS/FS/payinfo_Mixin.pm
+++ b/FS/FS/payinfo_Mixin.pm
@@ -239,7 +239,11 @@ sub payby_payinfo_pretty {
my $locale = shift;
my $lh = FS::L10N->get_handle($locale);
if ( $self->payby eq 'CARD' ) {
- $lh->maketext('Card #') . $self->paymask;
+ if ($self->paymask =~ /tokenized/) {
+ $lh->maketext('Tokenized Card');
+ } else {
+ $lh->maketext('Card #') . $self->paymask;
+ }
} elsif ( $self->payby eq 'CHEK' ) {
#false laziness w/view/cust_main/payment_history.html::translate_payinfo
diff --git a/httemplate/search/cust_pay.html b/httemplate/search/cust_pay.html
index 03474c1ef..e466f6afa 100755
--- a/httemplate/search/cust_pay.html
+++ b/httemplate/search/cust_pay.html
@@ -3,4 +3,5 @@
'amount_field' => 'paid',
'name_singular' => emt('payment'),
'name_verb' => emt('paid'),
+ 'show_card_type' => 1,
&>
diff --git a/httemplate/search/elements/cust_pay_or_refund.html b/httemplate/search/elements/cust_pay_or_refund.html
index 5808e5f3e..1fea67c19 100755
--- a/httemplate/search/elements/cust_pay_or_refund.html
+++ b/httemplate/search/elements/cust_pay_or_refund.html
@@ -184,6 +184,16 @@ push @fields, 'payby_payinfo_pretty',
push @link_onclicks, $sub_receipt, '';
push @sort_fields, 'paysort', $amount_field;
+if ($opt{'show_card_type'}) {
+ push @header, emt('Card Type');
+ $align .= 'r';
+ push @links, '';
+ push @fields, sub {
+ (($_[0]->payby eq 'CARD') && ($_[0]->paymask !~ /N\/A/)) ? cardtype($_[0]->paymask) : ''
+ };
+ push @sort_fields, '';
+}
+
if ( $unapplied ) {
push @header, emt('Unapplied');
$align .= 'r';