X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2FCron%2Fbill.pm;h=30eb1ab281d9d21ac2deebc3467ac6df7cb9e997;hb=e95a28ea14289ffcfa652bff9b179d3820b56242;hp=a822654520b28cc2214fa3228244ce641088b8c7;hpb=b51f95ce19785983728938439d1e2027b8e27569;p=freeside.git diff --git a/FS/FS/Cron/bill.pm b/FS/FS/Cron/bill.pm index a82265452..30eb1ab28 100644 --- a/FS/FS/Cron/bill.pm +++ b/FS/FS/Cron/bill.pm @@ -123,7 +123,7 @@ sub bill { 'priority' => 99, #don't get in the way of provisioning jobs }; my $error = $queue->insert( 'custnum'=>$custnum, %args ); - + die $error if $error; } } else { @@ -132,7 +132,12 @@ sub bill { if ( $disable_bill ) { $cust_main->collect( %args, 'debug' => $debug ); } else { - $cust_main->bill_and_collect( %args, 'debug' => $debug ); + my $error = $cust_main->bill_and_collect( %args, 'fatal' => 'return', + 'debug' => $debug, ); + if ( $error ) { + $log->error($error); + warn $error; #die $error; + } } } @@ -161,8 +166,6 @@ sub bill { # with today's date, regardless of the pretend date used to pre-generate # the invoices. # -# -p: Only process customers with the specified payby (I, I, I, I, I, I, I) -# # -a: Only process customers with the specified agentnum # # -v: enable debugging