From 28ce344448ca4e947754e7351cc527fb24d4383a Mon Sep 17 00:00:00 2001 From: fbriere Date: Sat, 19 Aug 2006 18:43:40 +0000 Subject: [PATCH] Renamed sales_number to order_number --- InternetSecure.pm | 6 +++--- t/30parse.t | 6 +++--- 2 files changed, 6 insertions(+), 6 deletions(-) diff --git a/InternetSecure.pm b/InternetSecure.pm index 0adb94f..257e443 100755 --- a/InternetSecure.pm +++ b/InternetSecure.pm @@ -39,7 +39,7 @@ sub set_defaults { $self->path('/process.cgi'); $self->build_subs(qw( - receipt_number sales_number uuid guid + receipt_number order_number uuid guid date card_type cardholder total_amount tax_amounts @@ -283,7 +283,7 @@ sub parse_response { cvv2_response => 'CVV2ResponseCode', receipt_number => 'ReceiptNumber', - sales_number => 'SalesOrderNumber', + order_number => 'SalesOrderNumber', uuid => 'GUID', guid => 'GUID', @@ -522,7 +522,7 @@ B() instead.) Receipt number (a string, actually) of this transaction, unique to all InternetSecure transactions. -=item sales_number() +=item order_number() Sales order number of this transaction. This is a number, unique to each merchant, which is incremented by 1 each time. diff --git a/t/30parse.t b/t/30parse.t index a6ed028..435b67d 100755 --- a/t/30parse.t +++ b/t/30parse.t @@ -2,7 +2,7 @@ use constant FIELDS => qw( result_code authorization error_message - receipt_number sales_number + receipt_number order_number date card_type avs_code cvv2_response @@ -16,7 +16,7 @@ use constant RESULTS => ( authorization => 'T00000', error_message => undef, receipt_number => '1096019995.5012', - sales_number => 0, + order_number => 0, date => '2003/12/17 09:59:58', card_type => undef, avs_code => undef, @@ -32,7 +32,7 @@ use constant RESULTS => ( authorization => undef, error_message => 'Real error message', receipt_number => '1096021915.5853', - sales_number => 729, + order_number => 729, date => '2003/12/17 10:31:58', card_type => 'Visa', avs_code => undef, -- 2.11.0