diff options
| author | Christopher Burger <burgerc@freeside.biz> | 2017-05-18 11:58:26 -0400 |
|---|---|---|
| committer | Christopher Burger <burgerc@freeside.biz> | 2018-06-12 10:24:03 -0400 |
| commit | 8196faffdbc0abc43ce346119a76430c8a242b56 (patch) | |
| tree | b9e07acfffb56d9b79bf6279db5945e484ee95e8 /FS/FS/cust_main | |
| parent | 744bf508495023922d88a53fcd07467e3e01c2f1 (diff) | |
RT# 74435 - Adding option to allow refunds using electronic check batch with RBC format.
Diffstat (limited to 'FS/FS/cust_main')
| -rw-r--r-- | FS/FS/cust_main/Billing_Batch.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/FS/FS/cust_main/Billing_Batch.pm b/FS/FS/cust_main/Billing_Batch.pm index 48854d3..38d100e 100644 --- a/FS/FS/cust_main/Billing_Batch.pm +++ b/FS/FS/cust_main/Billing_Batch.pm @@ -114,7 +114,7 @@ sub batch_card { } ); foreach (qw( address1 address2 city state zip country latitude longitude - payby payinfo paydate payname )) + payby payinfo paydate payname paycode )) { $options{$_} = '' unless exists($options{$_}); } @@ -142,6 +142,7 @@ sub batch_card { 'payname' => $options{payname} || $cust_payby->payname, 'paytype' => $options{paytype} || $cust_payby->paytype, 'amount' => $amount, # consolidating + 'paycode' => $options{paycode} || $cust_payby->paycode, } ); $cust_pay_batch->paybatchnum($old_cust_pay_batch->paybatchnum) |