X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2FUpgrade.pm;h=d4ba7b8289bbc19e788b0ddcae2bd19e7bc7a5ed;hb=ad3bcb39580173f0ac1b6357cb49515d48af7ddf;hp=263be80b1c0f9e0cdd27c999ef4a0e0f05ad1eaf;hpb=92c9e14aa28f017837fb94e4da1d9862e30b02f8;p=freeside.git diff --git a/FS/FS/Upgrade.pm b/FS/FS/Upgrade.pm index 263be80b1..d4ba7b828 100644 --- a/FS/FS/Upgrade.pm +++ b/FS/FS/Upgrade.pm @@ -10,6 +10,7 @@ use FS::Conf; use FS::Record qw(qsearchs qsearch str2time_sql); use FS::queue; use FS::upgrade_journal; +use FS::Setup qw( enable_banned_pay_pad ); use FS::svc_domain; $FS::svc_domain::whois_hack = 1; @@ -146,6 +147,8 @@ If you need to continue using the old Form 477 report, turn on the $conf->delete('tax-cust_exempt-groups-require_individual_nums'); } + enable_banned_pay_pad() unless length($conf->config('banned_pay-pad')); + } sub upgrade_overlimit_groups { @@ -312,6 +315,9 @@ sub upgrade_data { #payby conditions to new ones 'part_event_condition' => [], + #payby actions to new ones + 'part_event' => [], + #cust_main (remove paycvv from history, locations, cust_payby, etc) 'cust_main' => [], @@ -424,6 +430,9 @@ sub upgrade_data { #populate state FIPS codes if not already done 'state' => [], + #set default locations on quoted packages + 'quotation_pkg' => [], + #populate tax statuses 'tax_status' => [], ;