From: Bill Erickson <berickxx@gmail.com>
Date: Tue, 19 Jul 2016 14:03:28 +0000 (-0400)
Subject: JBAS-1494 PayFlow hosted page comment1=barcode
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=2ddbe995de360c62265007ac0ede43df52aa013e;p=working%2FEvergreen.git

JBAS-1494 PayFlow hosted page comment1=barcode

Send the patron's barcode as the transaction comment1 so it will appear
within the PayPal Manager for the business office.

Signed-off-by: Bill Erickson <berickxx@gmail.com>
---

diff --git a/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Account.pm b/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Account.pm
index 9716e4d42d..d9eb379822 100644
--- a/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Account.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/WWW/EGCatLoader/Account.pm
@@ -1897,6 +1897,9 @@ sub generate_payflow_secure_token {
     # amount comes from prepare_fines()
     $payflow_params{AMT} = sprintf("%.2f", $ctx->{fines}->{balance_owed});
 
+    $payflow_params{COMMENT1} = 
+        $ctx->{user}->card->barcode if $ctx->{user}->card;
+
     # Generate the PayPal secure token.
     my $tokens = OpenILS::WWW::EGCatLoader::PayflowHosted::create_xact_token(
         billing_org => $org,