X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=FS%2Fbin%2Ffreeside-daily;h=6d4182b79ba02a17fe0561138df77997dd10a3f4;hp=ac0a82391d9db15460f119156a9ea6ca006fb03f;hb=HEAD;hpb=07c89b3d2c2b306ed04f1e12306e74fd7381d004 diff --git a/FS/bin/freeside-daily b/FS/bin/freeside-daily index ac0a82391..6d4182b79 100755 --- a/FS/bin/freeside-daily +++ b/FS/bin/freeside-daily @@ -4,22 +4,42 @@ use strict; use Getopt::Std; use FS::UID qw(adminsuidsetup); use FS::Conf; +use FS::Log; &untaint_argv; #what it sounds like (eww) use vars qw(%opt); -getopts("p:a:d:vl:sy:nmrkg:u", \%opt); +getopts("p:a:d:vl:sy:nmqrkg:ox", \%opt); my $user = shift or die &usage; adminsuidsetup $user; +die "The -p option has been removed in version 4 -- customers no longer have ". + "a single, specific payment type\n" + if $opt{'p'}; + +my $log = FS::Log->new('daily'); +$log->info('start'); + #you can skip this by not having a NetworkMonitoringSystem configured use FS::Cron::nms_report qw(nms_report); nms_report(%opt); +#you can skip this by not having any vitelity exports configured +use FS::Cron::lnp_vitelity qw(lnp_vitelity); +lnp_vitelity(%opt); + +#no way to skip this yet, but should be harmless/quick +use FS::Cron::expire_banned_pay qw(expire_banned_pay); +expire_banned_pay(%opt); + #you can skip this by setting the disable_cron_billing config use FS::Cron::bill qw(bill); bill(%opt); +#you can skip this by not setting enable_taxproducts to 'billsoft' +use FS::Cron::tax_batch qw(process_tax_batch); +process_tax_batch(%opt); + #you can skip this just by not having the config use FS::Cron::breakage qw(reconcile_breakage); reconcile_breakage(%opt); @@ -28,10 +48,12 @@ reconcile_breakage(%opt); use FS::Cron::upload qw(upload); upload(%opt); -# Send alerts about upcoming credit card expiration. -use FS::Cron::alert_expiration qw(alert_expiration); -my $conf = new FS::Conf; -alert_expiration(%opt) if($conf->exists('alert_expiration')); +#this only takes effect if WA sales taxes are enabled +use FS::Cron::tax_rate_update qw(tax_rate_update); +tax_rate_update(%opt); + +use FS::Cron::set_lata_have_usage qw(set_lata_have_usage); +set_lata_have_usage(%opt); #what to do about the below when using -m? that is the question. @@ -44,24 +66,40 @@ unless ( $opt{k} ) { notify_flat_delay(%opt); } -#debian Pg 8.1+ auto-vaccums, 7.4 w/postgresql-contrib -if ( $opt{u} ) { - use FS::Cron::vacuum qw(vacuum); - vacuum(); -} +#same +use FS::Cron::rt_tasks qw(rt_daily); +rt_daily(%opt); -#you can skip this just by not having the config +#does nothing unless batch-gateway-* configs are set +use FS::Cron::pay_batch qw(pay_batch_submit pay_batch_receive); +pay_batch_submit(%opt); +pay_batch_receive(%opt); + +#does nothing unless there are batch-style exports with batches +use FS::Cron::export_batch qw(export_batch_submit); +export_batch_submit(%opt); + +#does nothing unless there are users with subscribed searches +use FS::Cron::send_subscribed qw(send_subscribed); +send_subscribed(%opt); + +#does nothing unless quotation_disable_after_days is set. +use FS::Cron::disable_quotation qw(disable_quotation); +disable_quotation(); + +#clears out cacti imports & deletes select database cache files +use FS::Cron::cleanup qw( cleanup cleanup_before_backup ); +cleanup_before_backup(); + +#backup should be last +#you can skip this just by not having the config (or with the -x option) use FS::Cron::backup qw(backup); -backup(); +backup() unless $opt{'x'}; -#same -use FS::Cron::rt_tasks qw(rt_escalate); -rt_escalate(%opt); +#except we'd rather not start cleanup jobs until the backup is done +cleanup( quiet => !$opt{'v'} ); -my $deldir = "$FS::UID::cache_dir/cache.$FS::UID::datasrc/"; -unlink <${deldir}.invoice*>; -unlink <${deldir}.letter*>; -unlink <${deldir}.CGItemp*>; +$log->info('finish'); ### # subroutines @@ -77,7 +115,7 @@ sub untaint_argv { } sub usage { - die "Usage:\n\n freeside-daily [ -d 'date' ] [ -y days ] [ -p 'payby' ] [ -a agentnum,agentnum,... ] [ -s ] [ -v ] [ -l level ] [ -m ] [ -k ] user [ custnum custnum ... ]\n"; + die "Usage:\n\n freeside-daily [ -d 'date' ] [ -y days ] [ -a agentnum,agentnum,... ] [ -s ] [ -v ] [ -l level ] [ -m ] [ -k ] [ -x ] user [ custnum custnum ... ]\n"; } ### @@ -90,7 +128,7 @@ freeside-daily - Run daily billing and invoice collection events. =head1 SYNOPSIS - freeside-daily [ -d 'date' ] [ -y days ] [ -p 'payby' ] [ -a agentnum,agentnum,... ] [ -s ] [ -v ] [ -l level ] [ -m ] [ -r ] [ -k ] user [ custnum custnum ... ] + freeside-daily [ -d 'date' ] [ -y days ] [ -a agentnum,agentnum,... ] [ -s ] [ -o ] [ -v ] [ -l level ] [ -m [ -q ] [ -r ] ] [ -k ] user [ custnum custnum ... ] =head1 DESCRIPTION @@ -112,7 +150,7 @@ the bill and collect methods of a cust_main object. See L. with today's date, irregardless of the pretend date used to pre-generate the invoices. - -p: Only process customers with the specified payby (CARD, DCRD, CHEK, DCHK, BILL, COMP, LECB) + -p: Deprecated, will produce a fatal error (formerly was: Only process customers with the specified payby (CARD, DCRD, CHEK, DCHK, BILL, COMP, LECB)) -a: Only process customers with the specified agentnum. Multiple agentnums can be specified, separated with commas. @@ -121,19 +159,23 @@ the bill and collect methods of a cust_main object. See L. -s: re-charge setup fees + -o: For packages which are more than one billing period behind, only charge for one billing period rather than catching up. + -v: enable debugging -l: debugging level - -m: Experimental multi-process mode uses the job queue for multi-process and/or multi-machine billing. + -m: Multi-process mode uses the job queue for multi-process and/or multi-machine billing. + + -q: When using multi-process mode, queue a additional billing job even if ones for the customer are already in the queue -r: Multi-process mode dry run option -k: skip notify_flat_delay - -u: Do a vacuum (starting with version 1.9, this is not run by default). + -x: skip backup -user: From the mapsecrets file - see config.html from the base documentation +user: Typically "fs_daily" custnum: if one or more customer numbers are specified, only bills those customers. Otherwise, bills all customers.