summaryrefslogtreecommitdiff
path: root/FS/FS/pay_batch/td_eft1464.pm
diff options
context:
space:
mode:
authormark <mark>2011-04-21 06:07:14 +0000
committermark <mark>2011-04-21 06:07:14 +0000
commit38691d4d87bec5b1ceffd5a399cdf299af4b1bd5 (patch)
tree7bb8fae1ae88d1a70fa860fadac21bf51640a824 /FS/FS/pay_batch/td_eft1464.pm
parent849a709d89e78bec1ab19997b75de1b574969f1f (diff)
fix EFT1464 batch format, #10545
Diffstat (limited to 'FS/FS/pay_batch/td_eft1464.pm')
-rw-r--r--FS/FS/pay_batch/td_eft1464.pm16
1 files changed, 8 insertions, 8 deletions
diff --git a/FS/FS/pay_batch/td_eft1464.pm b/FS/FS/pay_batch/td_eft1464.pm
index 416e28d..afdc1be 100644
--- a/FS/FS/pay_batch/td_eft1464.pm
+++ b/FS/FS/pay_batch/td_eft1464.pm
@@ -65,11 +65,11 @@ $name = 'td_eft1464';
'retacct',
'cpacode',
} = $conf->config("batchconfig-td_eft1464");
- $opt{'origid'} = sprintf('%-10s', $opt{'origid'});
- $opt{'shortname'} = sprintf('%-15s', $opt{'shortname'});
- $opt{'longname'} = sprintf('%-30s', $opt{'longname'});
- $opt{'retbranch'} = '0004'.sprintf('%5s',$opt{'retbranch'});
- $opt{'retacct'} = sprintf('%-11s', $opt{'retacct'}). ' ';
+ $opt{'origid'} = sprintf('%-10.10s', $opt{'origid'});
+ $opt{'shortname'} = sprintf('%-15.15s', $opt{'shortname'});
+ $opt{'longname'} = sprintf('%-30.30s', $opt{'longname'});
+ $opt{'retbranch'} = '0004'.sprintf('%5.5s',$opt{'retbranch'});
+ $opt{'retacct'} = sprintf('%-11.11s', $opt{'retacct'}). ' ';
$i = 1;
},
header => sub {
@@ -115,17 +115,17 @@ $name = 'td_eft1464';
sprintf('%010.0f', $cust_pay_batch->amount*100),
$opt{'due'}, #due date...? XXX
sprintf('%09u', $aba),
- sprintf('%-12s', $account),
+ sprintf('%-12.12s', $account),
'0' x 22,
'0' x 3,
$opt{'shortname'},
- sprintf('%-30s',
+ sprintf('%-30.30s',
join(' ',
$cust_pay_batch->first, $cust_pay_batch->last)
),
$opt{'longname'},
$opt{'origid'},
- sprintf('%-19s', $cust_pay_batch->paybatchnum), # originator reference num
+ sprintf('%-19.19s', $cust_pay_batch->paybatchnum), # originator reference num
$opt{'retbranch'},
$opt{'retacct'},
' ' x 15,