diff options
| -rw-r--r-- | Changes | 6 | ||||
| -rw-r--r-- | PayflowPro.pm | 6 |
2 files changed, 11 insertions, 1 deletions
@@ -1,6 +1,10 @@ Revision history for Perl extension Business::OnlinePayment::PayflowPro. 0.07 + [0.07_03 Tue Mar 13 18:26:12 EDT 2007] + - add "shortcut" param 'client_certification_id' (can be + passed as an argument for B::OP->new() which will set the + X-VPS-VIT-CLIENT-CERTIFICATION-ID header [0.07_02 Tue Mar 13 12:32:57 EDT 2007] - made generic method for deprecating cert_path, etc. - doc'd vendor() and partner() as deprecated but will not put @@ -23,7 +27,7 @@ Revision history for Perl extension Business::OnlinePayment::PayflowPro. - renamed internal methods to start with an underscore - removed unused remap_fields() method - if unable to parse expiration given in %content no longer croak, - but let PayflowPro servers attempt to deal with the value as-is + but let PayflowPro servers attempt to deal with the value as-is - submit() now two phased per PFP HTTP protocol - X-VPS-VIT-CLIENT-CERTIFICATION-ID is required (supposedly this is a temporary requirement from PayPal) diff --git a/PayflowPro.pm b/PayflowPro.pm index b91e007..9d3c73f 100644 --- a/PayflowPro.pm +++ b/PayflowPro.pm @@ -249,6 +249,10 @@ sub submit { unless ( defined( $req_headers{"X-VPS-REQUEST-ID"} ) ) { $req_headers{"X-VPS-REQUEST-ID"} = $self->request_id(); } + unless ( defined( $req_headers{"X-VPS-VIT-CLIENT-CERTIFICATION-ID"} ) ) { + $req_headers{"X-VPS-VIT-CLIENT-CERTIFICATION-ID"} = + $self->param("client_certification_id"); + } my %options = ( "Content-Type" => "text/namevalue", @@ -322,6 +326,7 @@ Business::OnlinePayment::PayflowPro - Payflow Pro backend for Business::OnlinePa 'PayflowPro', 'vendor' => 'your_vendor', 'partner' => 'your_partner', + 'client_certification_id' => 'assigned_certification_id', ); # See the module documentation for details of content() @@ -342,6 +347,7 @@ Business::OnlinePayment::PayflowPro - Payflow Pro backend for Business::OnlinePa expiration => '12/09', cvv2 => '123', order_number => 'string', + request_id => 'unique_identifier_for_transaction', ); $tx->submit(); |