diff options
author | Jonathan Prykop <jonathan@freeside.biz> | 2016-11-29 04:21:46 -0600 |
---|---|---|
committer | Jonathan Prykop <jonathan@freeside.biz> | 2016-11-29 04:21:46 -0600 |
commit | 51f97ec141f77064ca020634e7eccd85d9ead753 (patch) | |
tree | 9cb85be334b240b375c40c5415e8b13f17cfe87c /FS/FS/Cron/cleanup.pm | |
parent | 4cc0d96d34316ac01d2e204905bbe8de8dcd1469 (diff) |
71513: Card tokenization [upgrade implemented]
Diffstat (limited to 'FS/FS/Cron/cleanup.pm')
-rw-r--r-- | FS/FS/Cron/cleanup.pm | 16 |
1 files changed, 15 insertions, 1 deletions
diff --git a/FS/FS/Cron/cleanup.pm b/FS/FS/Cron/cleanup.pm index 6ec4013..9d0c067 100644 --- a/FS/FS/Cron/cleanup.pm +++ b/FS/FS/Cron/cleanup.pm @@ -8,12 +8,26 @@ use FS::Record qw( qsearch ); # start janitor jobs sub cleanup { -# fix locations that are missing coordinates + my %opt = @_; + + # fix locations that are missing coordinates my $job = FS::queue->new({ 'job' => 'FS::cust_location::process_set_coord', 'status' => 'new' }); $job->insert('_JOB'); + + # check card number tokenization + $job = FS::queue->new({ + 'job' => 'FS::cust_main::Billing_Realtime::token_check', + 'status' => 'new' + }); + $job->insert( + %opt, + 'queue' => 1, + 'daily' => 1, + ); + } sub cleanup_before_backup { |