projects
/
freeside.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
e0a6fad
)
fix "Unknown card type" error when using tokenization on v3? RT#74750
author
Ivan Kohler
<ivan@freeside.biz>
Thu, 23 Feb 2017 23:18:52 +0000
(15:18 -0800)
committer
Ivan Kohler
<ivan@freeside.biz>
Thu, 23 Feb 2017 23:18:52 +0000
(15:18 -0800)
FS/FS/cust_main.pm
patch
|
blob
|
history
diff --git
a/FS/FS/cust_main.pm
b/FS/FS/cust_main.pm
index
54f5613
..
cfe93a9
100644
(file)
--- a/
FS/FS/cust_main.pm
+++ b/
FS/FS/cust_main.pm
@@
-1968,7
+1968,19
@@
sub check {
validate($payinfo)
or return gettext('invalid_card'); # . ": ". $self->payinfo;
validate($payinfo)
or return gettext('invalid_card'); # . ": ". $self->payinfo;
- my $cardtype = cardtype($payinfo);
+ my $cardtype = $self->paycardtype;
+ if ( $payinfo =~ /^99\d{14}$/ ) {
+ $self->('is_tokenized', 'Y'); #so we don't try to do it again
+ if ( $self->paymask =~ /^\d+x/ ) {
+ $cardtype = cardtype($self->paymask);
+ } else {
+ #return "paycardtype required ".
+ # "(can't derive from a token and no paymask w/prefix provided)"
+ # unless $cardtype;
+ }
+ } else {
+ $cardtype = cardtype($self->payinfo);
+ }
return gettext('unknown_card_type') if $cardtype eq 'Unknown';
return gettext('unknown_card_type') if $cardtype eq 'Unknown';