diff options
author | Christopher Burger <burgerc@freeside.biz> | 2018-08-08 19:35:34 -0400 |
---|---|---|
committer | Christopher Burger <burgerc@freeside.biz> | 2018-08-10 06:38:44 -0400 |
commit | bcbc2580692528ee67b85f3d33f267a59ee530c8 (patch) | |
tree | 9cdfa8ac2aada8ac740eb3327e61792d8d0db65b /FS | |
parent | 9dfb97b6fb41274ac7990f092365657cb98fa007 (diff) |
RT# 34134 - updated select invoice to actually pay the invoice being selected not the oldest one.
Diffstat (limited to 'FS')
-rw-r--r-- | FS/FS/cust_main/Billing_Batch.pm | 3 | ||||
-rw-r--r-- | FS/FS/cust_pay_batch.pm | 1 |
2 files changed, 3 insertions, 1 deletions
diff --git a/FS/FS/cust_main/Billing_Batch.pm b/FS/FS/cust_main/Billing_Batch.pm index 35e2714..0774781 100644 --- a/FS/FS/cust_main/Billing_Batch.pm +++ b/FS/FS/cust_main/Billing_Batch.pm @@ -55,7 +55,8 @@ sub batch_card { return; } - my $invnum = delete $options{invnum}; + #my $invnum = delete $options{invnum}; + my $invnum = $options{invnum}; #pay fields should all come from either cust_payby or options, not both # in theory, could just pass payby, and use it to select cust_payby, diff --git a/FS/FS/cust_pay_batch.pm b/FS/FS/cust_pay_batch.pm index d29c6d0..614c117 100644 --- a/FS/FS/cust_pay_batch.pm +++ b/FS/FS/cust_pay_batch.pm @@ -302,6 +302,7 @@ sub approve { '_date' => $new->_date, 'usernum' => $new->usernum, 'batchnum' => $new->batchnum, + 'invnum' => $old->invnum, 'gatewaynum' => $opt{'gatewaynum'}, 'processor' => $opt{'processor'}, 'auth' => $opt{'auth'}, |