add return fields to docs: avs_code, cvv2_response, response_code, response_headers...

diff --git a/Changes b/Changes
index 8b9f288..be1a41f 100644 (file)
--- a/Changes
+++ b/Changes
@@ -3,7 +3,8 @@ Revision history for Perl extension Business::OnlinePayment.
 3.01    unreleased
         - Add fields to documentation: tax, freight, duty, tax_exempt,
           po_number.
-        - Add return field to documentation: order_number
+        - Add return fields to documentation: order_number, avs_code,
+          cvv2_response, response_code, response_headers, response_page.
 
 3.00     Mon Aug 17 15:55:11 PDT 2009
         - It finally happened.

diff --git a/OnlinePayment.pm b/OnlinePayment.pm
index 05d89bd..a249981 100644 (file)
--- a/OnlinePayment.pm
+++ b/OnlinePayment.pm
@@ -30,6 +30,9 @@ my @methods = qw(
     transaction_type
     fraud_score
     fraud_transaction_id
+    response_code
+    response_header
+    response_page
 );
 
 sub new {
@@ -595,6 +598,23 @@ Retrieve or change the fraud score from any Business::FraudDetect plugin
 
 Retrieve or change the transaction id from any Business::FraudDetect plugin
 
+=head2 response_code()
+
+=head2 response_headers()
+
+=head2 response_page()
+
+These three fields are set by some processors (especially those which use
+HTTPS) when the transaction fails at the communication level rather than
+as a transaction.
+
+response_code is the HTTP response code and message, i.e.
+'500 Internal Server Error'.
+
+response_headers is a hash reference of the response headers
+
+response_page is the raw content.
+
 =head2 result_code()
 
 Returns the precise result code that the processor returned, these are
@@ -602,6 +622,10 @@ normally one letter codes that don't mean much unless you understand
 the protocol they speak, you probably don't need this, but it's there
 just in case.
 
+=head2 avs_code()
+
+=head2 cvv2_response()
+
 =head1 MISCELLANEOUS INTERNAL METHODS
 
 =head2 transaction_type()