summaryrefslogtreecommitdiff
path: root/FS
diff options
context:
space:
mode:
authorChristopher Burger <burgerc@freeside.biz>2018-08-08 19:35:34 -0400
committerChristopher Burger <burgerc@freeside.biz>2018-08-10 06:38:44 -0400
commitbcbc2580692528ee67b85f3d33f267a59ee530c8 (patch)
tree9cdfa8ac2aada8ac740eb3327e61792d8d0db65b /FS
parent9dfb97b6fb41274ac7990f092365657cb98fa007 (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.pm3
-rw-r--r--FS/FS/cust_pay_batch.pm1
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'},