diff options
author | ivan <ivan> | 2004-10-07 23:38:17 +0000 |
---|---|---|
committer | ivan <ivan> | 2004-10-07 23:38:17 +0000 |
commit | d49cf874685e4460fa4d9edd17f0186c08bf2d90 (patch) | |
tree | fdd27cd6192c902ddee5fbd96561fc8b90f63f2e | |
parent | c935cf703b801211c634969f26f7e4855666dd10 (diff) |
action is available in the content, not as a methodBUSINESS_ONLINEPAYMENT_PAYFLOWPRO_0_02
-rw-r--r-- | PayflowPro.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/PayflowPro.pm b/PayflowPro.pm index 906bce7..86a43a0 100644 --- a/PayflowPro.pm +++ b/PayflowPro.pm @@ -166,7 +166,7 @@ sub submit { my @required = qw( TRXTYPE TENDER PARTNER VENDOR USER PWD ); if ( $self->transaction_type() eq 'C' ) { #credit card - if ( $self->action() =~ /^[CDV]$/ && exists($content{'ORIGID'}) + if ( $content{'action'} =~ /^[CDV]$/ && exists($content{'ORIGID'}) && defined($content{'ORIGID'}) && length($content{'ORIGID'}) ) { push @required, qw(ORIGID); } else { |