foreach my $table (qw(
part_export_option
- payment_gateway
payment_gateway_option
agent_payment_gateway
- queue
queue_arg
+ queue
cust_pay_batch
)) {
print "DELETE FROM $table;\n";
print "DELETE FROM h_$table;\n";
}
+# don't break foreign keys in cust_pay_*, just scrub fields that could be
+# used to access the gateway
+print "UPDATE payment_gateway SET gateway_module = 'Test', disabled = 'Y', gateway_username = NULL, gateway_password = 'NULL';\n";
+print "DELETE FROM h_payment_gateway;\n";
+
foreach my $table (qw(
part_export
export_svc
foreach my $item (qw(
business-onlinepayment
business-onlinepayment-ach
+ smtpmachine
)) {
print "DELETE FROM conf WHERE name = '$item';\n";
print "DELETE FROM h_conf WHERE name = '$item';\n";