diff options
Diffstat (limited to 'bin/test_scrub')
-rw-r--r-- | bin/test_scrub | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/bin/test_scrub b/bin/test_scrub index 88edc335b..45a257ab9 100644 --- a/bin/test_scrub +++ b/bin/test_scrub @@ -42,10 +42,17 @@ my $dsth = dbh->prepare("DELETE FROM cust_main_invoice WHERE dest != 'POST'") or die dbh->errstr; $dsth->execute or die $dsth->errstr; +my $sth = dbh->prepare("UPDATE part_event SET disabled = 'Y'"); +$sth->execute or die $sth->errstr; + my $conf = new FS::Conf; foreach my $item (qw( business-onlinepayment business-onlinepayment-ach + dump-localdest + dump-scpdest + cust_bill-ftp_spool + smtpmachine )) { $conf->delete($item); } |