X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2FUpgrade.pm;h=f26c6a338ccd3f835952992e6f50021ab9385d37;hb=77ffd5cb8c802e43cad458e859ef9c035d3b39f0;hp=8b7d7337f884278dcb787709b3799c7134ac1beb;hpb=ddb601f6bb7bdce8e0912e78472335f5613d20db;p=freeside.git diff --git a/FS/FS/Upgrade.pm b/FS/FS/Upgrade.pm index 8b7d7337f..f26c6a338 100644 --- a/FS/FS/Upgrade.pm +++ b/FS/FS/Upgrade.pm @@ -311,7 +311,10 @@ sub upgrade { }); foreach my $object ( @objects ) { my $payinfo = $object->decrypt($object->payinfo); - die "error decrypting payinfo" if $payinfo eq $object->payinfo; + if ( $payinfo eq $object->payinfo ) { + warn "error decrypting payinfo for $table: $payinfo\n"; + next; + } $object->payinfo($payinfo); my $error = $object->replace; die $error if $error; @@ -332,7 +335,8 @@ sub upgrade_data { #fix whitespace - before cust_main 'cust_location' => [], - #cust_main (remove paycvv from history) + #cust_main (tokenizes cards, remove paycvv from history, locations, cust_payby, etc) + # (handles payinfo encryption/tokenization across all relevant tables) 'cust_main' => [], #msgcat @@ -348,6 +352,9 @@ sub upgrade_data { #customer credits 'cust_credit' => [], + # fix some tax allocation records + 'cust_bill_pkg_void' => [], + #duplicate history records 'h_cust_svc' => [], @@ -447,6 +454,10 @@ sub upgrade_data { #mark certain taxes as system-maintained, # and fix whitespace 'cust_main_county' => [], + + #upgrade part_event_condition_option agentnum to a multiple hash value + 'part_event_condition_option' =>[], + ; \%hash;