projects
/
freeside.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
71def0b
)
don't send countries other than US/CA/GB/UK to paymentech, RT#20222
author
Ivan Kohler
<ivan@freeside.biz>
Tue, 13 Nov 2012 07:54:00 +0000
(23:54 -0800)
committer
Ivan Kohler
<ivan@freeside.biz>
Tue, 13 Nov 2012 07:54:00 +0000
(23:54 -0800)
FS/FS/pay_batch/paymentech.pm
patch
|
blob
|
history
diff --git
a/FS/FS/pay_batch/paymentech.pm
b/FS/FS/pay_batch/paymentech.pm
index
133f8f1
..
c687cc8
100644
(file)
--- a/
FS/FS/pay_batch/paymentech.pm
+++ b/
FS/FS/pay_batch/paymentech.pm
@@
-72,7
+72,9
@@
my %paytype = (
'personal savings' => 'S',
'business checking' => 'X',
'business savings' => 'X',
'personal savings' => 'S',
'business checking' => 'X',
'business savings' => 'X',
- );
+);
+
+my %paymentech_countries = map { $_ => 1 } qw( US CA GB UK );
%export_info = (
init => sub {
%export_info = (
init => sub {
@@
-121,7
+123,10
@@
my %paytype = (
avsCity => substr($_->city, 0, 20),
avsState => $_->state,
avsName => substr($_->first . ' ' . $_->last, 0, 30),
avsCity => substr($_->city, 0, 20),
avsState => $_->state,
avsName => substr($_->first . ' ' . $_->last, 0, 30),
- avsCountryCode => $_->country,
+ avsCountryCode => ( $paymentech_countries{ $_->country }
+ ? $_->country
+ : ''
+ ),
orderID => $_->paybatchnum,
amount => $_->amount * 100,
);
orderID => $_->paybatchnum,
amount => $_->amount * 100,
);