summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorivan <ivan>2011-05-05 23:21:22 +0000
committerivan <ivan>2011-05-05 23:21:22 +0000
commit69aeadc496d86a86bb87cf56c629c85684dcce29 (patch)
tree921a98e1ddcfb2ea99a2976b3285e14d3b9e6077
parent691fa49ab2c8d0076ba15825b4e683c87516eba3 (diff)
fix double insert of overpayments, RT#12655
-rw-r--r--FS/FS/cust_main/Billing_Realtime.pm1
1 files changed, 1 insertions, 0 deletions
diff --git a/FS/FS/cust_main/Billing_Realtime.pm b/FS/FS/cust_main/Billing_Realtime.pm
index bee1e0311..500d2c289 100644
--- a/FS/FS/cust_main/Billing_Realtime.pm
+++ b/FS/FS/cust_main/Billing_Realtime.pm
@@ -849,6 +849,7 @@ sub _realtime_bop_result {
my $error = $cust_pay->insert($options{'manual'} ? ( 'manual' => 1 ) : () );
if ( $error ) {
+ $dbh->rollback or die $dbh->errstr if $oldAutoCommit;
$cust_pay->invnum(''); #try again with no specific invnum
$cust_pay->paynum('');
my $error2 = $cust_pay->insert( $options{'manual'} ?