X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=FS%2FFS%2FCron%2Fbill.pm;h=30eb1ab281d9d21ac2deebc3467ac6df7cb9e997;hp=98f1c2e6f425ca6b96abf2acf103b2d5e27adfc9;hb=2cdb0b3f9e3b778fd914d847fc7851948a9930e4;hpb=6b28d0bd4b422d0fff32b559d0785665b1c46b27 diff --git a/FS/FS/Cron/bill.pm b/FS/FS/Cron/bill.pm index 98f1c2e6f..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 @@ -190,8 +193,6 @@ sub bill_where { push @search, "( cust_main.archived != 'Y' OR archived IS NULL )"; #disable? - push @search, "cust_main.payby = '". $opt{'p'}. "'" - if $opt{'p'}; push @search, "cust_main.agentnum IN ( ". $opt{'a'}. " ) " if $opt{'a'};