projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
turn debug off
[freeside.git]
/
FS
/
bin
/
freeside-daily
diff --git
a/FS/bin/freeside-daily
b/FS/bin/freeside-daily
index
3e4843b
..
b73d0b1
100755
(executable)
--- a/
FS/bin/freeside-daily
+++ b/
FS/bin/freeside-daily
@@
-7,15
+7,19
@@
use FS::Conf;
&untaint_argv; #what it sounds like (eww)
use vars qw(%opt);
&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:nmrkg:u
o
", \%opt);
my $user = shift or die &usage;
adminsuidsetup $user;
#you can skip this by not having a NetworkMonitoringSystem configured
my $user = shift or die &usage;
adminsuidsetup $user;
#you can skip this by not having a NetworkMonitoringSystem configured
-use FS::Cron::nms qw(nms_report);
+use FS::Cron::nms
_report
qw(nms_report);
nms_report(%opt);
nms_report(%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 setting the disable_cron_billing config
use FS::Cron::bill qw(bill);
bill(%opt);
@@
-28,6
+32,9
@@
reconcile_breakage(%opt);
use FS::Cron::upload qw(upload);
upload(%opt);
use FS::Cron::upload qw(upload);
upload(%opt);
+use FS::Cron::set_lata_have_usage qw(set_lata_have_usage);
+set_lata_have_usage(%opt);
+
# Send alerts about upcoming credit card expiration.
use FS::Cron::alert_expiration qw(alert_expiration);
my $conf = new FS::Conf;
# Send alerts about upcoming credit card expiration.
use FS::Cron::alert_expiration qw(alert_expiration);
my $conf = new FS::Conf;
@@
-51,12
+58,12
@@
if ( $opt{u} ) {
}
#you can skip this just by not having the config
}
#you can skip this just by not having the config
-use FS::Cron::backup qw(backup
_scp
);
-backup
_scp
();
+use FS::Cron::backup qw(backup);
+backup();
#same
#same
-use FS::Cron::rt_tasks qw(rt_
escalate
);
-rt_
escalate
(%opt);
+use FS::Cron::rt_tasks qw(rt_
daily
);
+rt_
daily
(%opt);
my $deldir = "$FS::UID::cache_dir/cache.$FS::UID::datasrc/";
unlink <${deldir}.invoice*>;
my $deldir = "$FS::UID::cache_dir/cache.$FS::UID::datasrc/";
unlink <${deldir}.invoice*>;
@@
-90,7
+97,7
@@
freeside-daily - Run daily billing and invoice collection events.
=head1 SYNOPSIS
=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 ] [ -p 'payby' ] [ -a agentnum,agentnum,... ] [ -s ] [ -
o ] [ -
v ] [ -l level ] [ -m ] [ -r ] [ -k ] user [ custnum custnum ... ]
=head1 DESCRIPTION
=head1 DESCRIPTION
@@
-121,6
+128,8
@@
the bill and collect methods of a cust_main object. See L<FS::cust_main>.
-s: re-charge setup fees
-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
-v: enable debugging
-l: debugging level