X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fpay_batch%2Fnacha.pm;h=23dda4c1c2eba63c1ed30a58fefb11eb24b671ac;hb=09af85fc0e7a48392c930c9672a99448cf9630d4;hp=befba09a2c403921438a8962bef6c501981195a7;hpb=8f1f857ffd2f01a543bdef6b8486ad8c90bd302a;p=freeside.git diff --git a/FS/FS/pay_batch/nacha.pm b/FS/FS/pay_batch/nacha.pm index befba09a2..23dda4c1c 100644 --- a/FS/FS/pay_batch/nacha.pm +++ b/FS/FS/pay_batch/nacha.pm @@ -136,8 +136,9 @@ $DEBUG = 0; #XXX paytype should actually be in the batch, but this will do for now #27 checking debit, 37 savings debit - my $transaction_code = ( $cust_main->paytype =~ /savings/i ? '37' : '27' ); + my $transaction_code = ( $cust_pay_batch->paytype =~ /savings/i ? '37' : '27' ); + # not $self->payname? my $cust_name = substr($cust_main->name. (' 'x22), 0, 22); $i++; my $tracenum = $dest. substr(('0'x7). $i, -6);