sub upgrade_schema_data {
my %opt = @_;
+ #auto-find tables/classes with an _update_schema method?
+
tie my %hash, 'Tie::IxHash',
#fix classnum character(1)
'cust_bill_pkg_detail' => [],
#add necessary columns to RT schema
'TicketSystem' => [],
+ #remove h_access_user_log if it exists (since our regular auto schema
+ # upgrade doesn't have the drop tables flag turned on)
+ 'access_user_log' => [],
#remove possible dangling records
'password_history' => [],
'cust_pay_pending' => [],
+ #remove records referencing removed things with their FKs
+ 'pkg_referral' => [],
+ 'cust_bill_pkg_discount' => [],
+ 'cust_msg' => [],
+ 'cust_bill_pay_batch' => [],
+ 'cust_event_fee' => [],
+ 'radius_attr' => [],
+ 'queue_depend' => [],
+ 'cust_main_invoice' => [],
+ #update records referencing removed things with their FKs
+ 'cust_pkg' => [],
;
\%hash;