ViewVC Help

View File | Revision Log | Show Annotations | Root Listing

root/cvsroot/UserCode/OSUT3Analysis/DBTools/scripts/osucrab

Comparing UserCode/OSUT3Analysis/DBTools/scripts/osucrab (file contents):
Revision 1.4 by ahart, Fri Aug 24 13:47:51 2012 UTC vs.
Revision 1.5 by ahart, Wed Oct 17 18:28:47 2012 UTC

#	Line 39 | Line 39 | if ($arg =~ m/-create/)
39
40		my $status = "created";
41		$status = "submitted" if $arg =~ m/-submit/;
42	<	my $results = dbInsert ($dataset, $ENV{"USER"}, $format, "", 0, 0, $status, $comment, $psetName, $crabCfgName, $jsonFileName, $submissionLogName);
42	>	my $results = dbInsert ($dataset, "$ENV{'USER'}\@$ENV{'HOSTNAME'}", $format, "", 0, 0, $status, $comment, $psetName, $crabCfgName, $jsonFileName, $submissionLogName);
43		}
44		elsif ($arg =~ m/-submit/)
45		{
#	Line 56 | Line 56 | elsif ($arg =~ m/-submit/)
56
57		system ("crab $arg");
58
59	<	my $results = dbUpdate ($id, "submitted", $submissionLogName, $ENV{"USER"}) if $id > -1;
59	>	my $results = dbUpdate ($id, "submitted", $submissionLogName, "$ENV{'USER'}\@$ENV{'HOSTNAME'}") if $id > -1;
60		}
61		elsif ($arg =~ m/-report/)
62		{
#	Line 73 | Line 73 | elsif ($arg =~ m/-report/)
73
74		system ("crab $arg");
75
76	<	my $results = dbReport ($id, "complete", $lumiSummaryName, $ENV{"USER"}) if $id > -1;
76	>	my $results = dbReport ($id, "complete", $lumiSummaryName, "$ENV{'USER'}\@$ENV{'HOSTNAME'}") if $id > -1;
77		}
78		elsif ($arg =~ m/-status/)
79		{
#	Line 89 | Line 89 | elsif ($arg =~ m/-status/)
89		my $currentStatusName = "$workingDir/log/.currentStatus";
90		unlink ($currentStatusName) if -e $currentStatusName;
91		system ("crab $arg | tee $currentStatusName");
92	<	my $results = dbStatus ($id, $currentStatusName, $ENV{"USER"}) if $id > -1;
92	>	my $results = dbStatus ($id, $currentStatusName, "$ENV{'USER'}\@$ENV{'HOSTNAME'}") if $id > -1;
93		unlink ($currentStatusName);
94		}
95		else

Diff Legend

–	Removed lines
+	Added lines
<	Changed lines
>	Changed lines