From 20c0f34775b56c7969487bfbdb1dcd26546d0925 Mon Sep 17 00:00:00 2001 From: Ivan Kohler Date: Tue, 25 Sep 2018 19:31:09 -0700 Subject: [PATCH] fix paymentech batch approval status processing, RT#80622 --- FS/FS/pay_batch/paymentech.pm | 8 ++------ 1 file changed, 2 insertions(+), 6 deletions(-) diff --git a/FS/FS/pay_batch/paymentech.pm b/FS/FS/pay_batch/paymentech.pm index bb2c2588d..094d50114 100644 --- a/FS/FS/pay_batch/paymentech.pm +++ b/FS/FS/pay_batch/paymentech.pm @@ -67,12 +67,8 @@ my $gateway; $hash->{'error_message'} = $hash->{'procStatusMessage'}; } }, - 'approved' => sub { my $hash = shift; - $hash->{'approvalStatus'} - }, - 'declined' => sub { my $hash = shift; - ! $hash->{'approvalStatus'} - }, + 'approved' => sub { shift->{'approvalStatus'} == 1 }, + 'declined' => sub { shift->{'approvalStatus'} != 1 }, ); my %paytype = ( -- 2.11.0