X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=PayflowPro.pm;fp=PayflowPro.pm;h=9d3c73f892c0a98ca2261a898d20cf61bc127bc8;hb=01c1be4b649247359d8a31059809c55e8619c418;hp=b91e0073a1320ac30ab47143c0182a96565c1242;hpb=2196c8ede5b967cbdc1c5ab02f6b3aa79656f8ac;p=Business-OnlinePayment-PayflowPro.git

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();