X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2Fcust_main%2FBilling_Batch.pm;h=38d100ef68f1f8095fa908464a61ea174493b68f;hb=467d7dc761ec4492aa285771920be1def76ea831;hp=d8ae3b40f53c227584d1b62d26e561c73b3ccbd2;hpb=386c1c45a7cb9e8ad93862d9aa2d59cdb4ed0d3a;p=freeside.git diff --git a/FS/FS/cust_main/Billing_Batch.pm b/FS/FS/cust_main/Billing_Batch.pm index d8ae3b40f..38d100ef6 100644 --- a/FS/FS/cust_main/Billing_Batch.pm +++ b/FS/FS/cust_main/Billing_Batch.pm @@ -89,7 +89,7 @@ sub batch_card { #this needs to handle mysql as well as Pg, like svc_acct.pm #(make it into a common function if folks need to do batching with mysql) $dbh->do("LOCK TABLE pay_batch IN SHARE ROW EXCLUSIVE MODE") - or return "Cannot lock pay_batch: " . $dbh->errstr; + or die "Cannot lock pay_batch: " . $dbh->errstr; my %pay_batch = ( 'status' => 'O', @@ -157,7 +157,8 @@ sub batch_card { if ( $error ) { $dbh->rollback if $oldAutoCommit; - die $error; + #die $error; + return $error; # e.g. "Illegal zip" ala RT#75998 } my $unapplied = $self->total_unapplied_credits