diff options
| -rw-r--r-- | FS/FS/pay_batch/paymentech.pm | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/FS/FS/pay_batch/paymentech.pm b/FS/FS/pay_batch/paymentech.pm index d62a1f11f..89f0c7723 100644 --- a/FS/FS/pay_batch/paymentech.pm +++ b/FS/FS/pay_batch/paymentech.pm @@ -87,12 +87,12 @@ my %paytype = ( ecpBankAcctType => $paytype{lc($_->cust_main->paytype)}, ecpDelvMethod => 'A', ), - avsZip => $_->zip, - avsAddress1 => $_->address1, - avsAddress2 => $_->address2, - avsCity => $_->city, + avsZip => substr($_->zip, 0, 10), + avsAddress1 => substr($_->address1, 0, 30), + avsAddress2 => substr($_->address2, 0, 30), + avsCity => substr($_->city, 0, 20), avsState => $_->state, - avsName => $_->first . ' ' . $_->last, + avsName => substr($_->first . ' ' . $_->last, 0, 30), avsCountryCode => $_->country, orderID => $_->paybatchnum, amount => $_->amount * 100, |