fix error return / db rollback with freeside-daily -m, RT#26773
authorIvan Kohler <ivan@freeside.biz>
Thu, 30 Jan 2014 01:30:16 +0000 (17:30 -0800)
committerIvan Kohler <ivan@freeside.biz>
Thu, 30 Jan 2014 01:30:16 +0000 (17:30 -0800)
FS/FS/cust_main.pm

index 0da2364..054d6c2 100644 (file)
@@ -5053,6 +5053,9 @@ sub queued_bill {
   my $cust_main = qsearchs( 'cust_main', { custnum => $args{'custnum'} } );
   warn 'bill_and_collect custnum#'. $cust_main->custnum. "\n";#log custnum w/pid
 
+  #without this errors don't get rolled back
+  $args{'fatal'} = 1; # runs from job queue, will be caught
+
   $cust_main->bill_and_collect( %args );
 }