From f7df904821b442cb58ff9cbc646a218620c26dc2 Mon Sep 17 00:00:00 2001 From: Chris Sharp Date: Tue, 11 Sep 2012 08:22:22 -0400 Subject: [PATCH] minor edits --- change_reports_owner.pl | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/change_reports_owner.pl b/change_reports_owner.pl index ae1a7fd..86219ee 100755 --- a/change_reports_owner.pl +++ b/change_reports_owner.pl @@ -94,7 +94,7 @@ if ($response eq "n") { exit() } -my @tables = qw/reporter.template_folder reporter.report_folder reporter.template reporter.report/; +my @tables = qw/reporter.template_folder reporter.report_folder reporter.output_folder reporter.template reporter.report/; foreach my $table (@tables) { my $update_owner = qq/UPDATE $table SET owner = ? WHERE owner = ?/; $sth = $dbh->prepare("$update_owner"); @@ -102,7 +102,11 @@ foreach my $table (@tables) { print "Setting new owner for $table.\n"; } +my $update_schedule = qq/UPDATE reporter.schedule SET runner = $user_id2 WHERE runner = $user_id1 AND complete_time IS NULL/; + $dbh->commit; + + # clean up $dbh->disconnect(); -- 2.11.0