X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;ds=sidebyside;f=InternetSecure.pm;h=2ad18fdeed9860c647c7d49925f60a390ed360d3;hb=5f50c3c62de5b5eecac3844fd838c91ed18bfd39;hp=2b63019c69c92177fb09bf2f69d9a0dd6a6a24e4;hpb=ba77e0adce510afadfa3d926637efe487e889fd1;p=Business-OnlinePayment-InternetSecure.git diff --git a/InternetSecure.pm b/InternetSecure.pm index 2b63019..2ad18fd 100755 --- a/InternetSecure.pm +++ b/InternetSecure.pm @@ -241,17 +241,19 @@ sub parse_response { $self->is_success($code eq '2000' || $code eq '90000' || $code eq '900P1'); $self->infuse($response, + result_code => 'Page', + error_message => 'Verbiage', + authorization => 'ApprovalCode', + avs_response => 'AVSResponseCode', + cvv2_response => 'CVV2ResponseCode', + receipt_number => 'ReceiptNumber', sales_number => 'SalesOrderNumber', + date => 'Date', cardholder => 'xxxName', card_type => 'CardType', - result_code => 'Page', - authorization => 'ApprovalCode', - error_message => 'Verbiage', total_amount => 'TotalAmount', - avs_response => 'AVSResponseCode', - cvv2_response => 'CVV2ResponseCode', ); # Completely undocumented field that sometimes override