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 9716e4d..d9eb379 100644 (file)
--- 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,