Name

CREDIT_CARDS_ACCEPTED —

SYNOPSIS

DESCRIPTION

VARIABLE TYPE

Catalog variable

EXAMPLES

No examples are available at this time. We do consider this a problem and will try to supply some.

NOTES

AVAILABILITY

CREDIT_CARDS_ACCEPTED is available in Interchange versions:

4.6.0-5.7.0 (git-head)

SOURCE

Interchange 5.7.0:

Source: lib/Vend/Payment/PaypalExpress.pm
Line 925 (context shows lines 915-929 in paypalexpress():501)

 $::Scratch->{'token'} = $result{'Token'};
 
if (!$result{'Token'}) {
 if ($result{'Ack'} eq 'Failure') {
   $::Session->{'errors'}{'PaypalExpress'} = $result{'Errors'}{'LongMessage'} \
  if ($result{'Errors'} !~ /ARRAY/);
   for my $i (0 .. 3) {
     $::Session->{'errors'}{'PaypalExpress'} .= " $result{'Errors'}[$i]{'LongMessage'}" \
  if ($result{'Errors'} =~ /ARRAY/);
       }
    }
 else {
    my $accepted = uc($::Variable->{CREDIT_CARDS_ACCEPTED});
    $::Session->{'errors'}{'PaypalExpress'} = errmsg("Paypal is currently \
 unavailable - please use our secure payment system instead. We accept $accepted cards");
          }
  return $Tag->deliver({ location => $checkouturl }) 
   }

AUTHORS

Interchange Development Group

SEE ALSO

DocBook! Interchange!