diff options
| author | fbriere <fbriere> | 2006-02-17 01:13:58 +0000 |
|---|---|---|
| committer | fbriere <fbriere> | 2006-02-17 01:13:58 +0000 |
| commit | 70860c963fab13b6c28e998519936fcb0af5d083 (patch) | |
| tree | d1d7dcca64ce509a9e0451cd5224a7a3e30511ce | |
| parent | 009f4489b1400b4990a69464cf580678552cd818 (diff) | |
Added date()
| -rwxr-xr-x | InternetSecure.pm | 6 | ||||
| -rwxr-xr-x | t/30parse.t | 3 |
2 files changed, 9 insertions, 0 deletions
diff --git a/InternetSecure.pm b/InternetSecure.pm index 85bb05e..0dd4d2a 100755 --- a/InternetSecure.pm +++ b/InternetSecure.pm @@ -38,6 +38,7 @@ sub set_defaults { $self->build_subs(qw( receipt_number sales_number + date card_type total_amount avs_response cvv2_response @@ -251,6 +252,7 @@ sub parse_response { $self->infuse($response, qw( ReceiptNumber receipt_number SalesOrderNumber sales_number + Date date CardType card_type Page result_code ApprovalCode authorization @@ -470,6 +472,10 @@ InternetSecure transactions. Sales order number of this transaction. This is a number, unique to each merchant, which is incremented by 1 each time. +=item date() + +Date and time of the transaction. Format is C<YYYY/MM/DD hh:mm:ss>. + =item total_amount() Total amount billed for this order, including taxes. diff --git a/t/30parse.t b/t/30parse.t index dbdeec0..cfc2b55 100755 --- a/t/30parse.t +++ b/t/30parse.t @@ -1,6 +1,7 @@ use constant FIELDS => qw( result_code authorization error_message receipt_number sales_number + date card_type avs_response cvv2_response total_amount @@ -14,6 +15,7 @@ use constant RESULTS => ( error_message => 'Test Approved', receipt_number => '1096019995.5012', sales_number => 0, + date => '2003/12/17 09:59:58', card_type => undef, avs_response => undef, cvv2_response => undef, @@ -26,6 +28,7 @@ use constant RESULTS => ( error_message => 'Real error message', receipt_number => '1096021915.5853', sales_number => 729, + date => '2003/12/17 10:31:58', card_type => 'Visa', avs_response => undef, cvv2_response => undef, |