our $ignore_expired_card = 0;
our $ignore_banned_card = 0;
our $ignore_invalid_card = 0;
+our $ignore_cardtype = 0;
our $conf;
install_callback FS::UID sub {
sub check_payinfo_cardtype {
my $self = shift;
+ return '' if $ignore_cardtype;
+
return '' unless $self->payby =~ /^(CARD|CHEK)$/;
my $payinfo = $self->payinfo;