Skip Menu |

This queue is for tickets about the Business-OnlinePayment-Vanco CPAN distribution.

Report information
The Basics
Id: 42340
Status: new
Priority: 0/
Queue: Business-OnlinePayment-Vanco

People
Owner: Nobody in particular
Requestors: bradoaks [...] gmail.com
Cc:
AdminCc:

Bug Information
Severity: Normal
Broken in:
  • 0.01
  • 0.02
Fixed in: (no value)



Subject: request to add 'CardBillingCountryCode' support
Vanco has added support for international contributions and added another field to the message. I will attach the patch I have used locally to accommodate this change. --bradoaks
a patch of the changes since ticket 42189.
diff -rub Business-OnlinePayment-Vanco-0.023/Changes Business-OnlinePayment-Vanco-0.024/Changes --- Business-OnlinePayment-Vanco-0.023/Changes 2009-01-06 15:28:40.000000000 -0500 +++ Business-OnlinePayment-Vanco-0.024/Changes 2009-01-08 12:53:46.000000000 -0500 @@ -1,6 +1,9 @@ Revision history for Perl extension Business::OnlinePayment::Vanco. +0.024 Thu Jan 8 12:52:09 EST 2009 + - adding CardBillingCountryCode (specified using 'country') to the feed. + 0.023 Tue Jan 6 15:27:30 EST 2009 - - specify CustomerName using 'ship_name' and CardBillingName using 'name' in %contents; + - specify CustomerName using 'ship_name' and CardBillingName using 'name' in %contents. 0.022 Tue Sep 16 08 18:42:00 2008 - stripping off leading characters seen on Vanco production server. diff -rub Business-OnlinePayment-Vanco-0.023/Vanco.pm Business-OnlinePayment-Vanco-0.024/Vanco.pm --- Business-OnlinePayment-Vanco-0.023/Vanco.pm 2009-01-06 15:32:23.000000000 -0500 +++ Business-OnlinePayment-Vanco-0.024/Vanco.pm 2009-01-08 12:28:34.000000000 -0500 @@ -335,6 +335,7 @@ CardBillingCity => 'city', CardBillingState => 'state', CardBillingZip => 'zip', + CardBillingCountryCode => 'country', Amount => 'amount', Funds => $funds, StartDate => 'StartDate', @@ -639,6 +640,7 @@ CardBillingCity => 'city', CardBillingState => 'state', CardBillingZip => 'zip', + CardBillingCountryCode => 'country', Amount => 'amount', Funds => \( $funds ), # list of funds with fund amounts and fund ids StartDate => 'start',