Changeset 24902 for branches/czw_branch/cleanup/ippScripts/scripts/ipp_cleanup.pl

Timestamp:

Jul 22, 2009, 4:48:49 PM (17 years ago)

Author:

watersc1

Message:

New sql files to correctly select out files that are pending or done
with cleanup. This returns files marked as purged and scrubbed as
well as simpled cleaned.

Typo fixes in ipp_cleanup.pl .

File:

• branches/czw_branch/cleanup/ippScripts/scripts/ipp_cleanup.pl (modified) (4 diffs)

branches/czw_branch/cleanup/ippScripts/scripts/ipp_cleanup.pl

@@ -759 +759 @@
     # XXX may need a different my_die for each stage
     my $imfiles;                      # Array of component files
-    my $command = "$dettool -pendingcleanup_processedimfile -chip_id $stage_id"; # Command to run
+    my $command = "$dettool -pendingcleanup_processedimfile -det_id $stage_id"; # Command to run
     $command .= " -dbname $dbname" if defined $dbname;
     my ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) = run(command => $command, verbose => $verbose);
@@ -1239 +1239 @@
     # XXX may need a different my_die for each stage
     my $imfiles;                      # Array of component files
-    my $command = "$dettool -pendingcleanup_residimfile -chip_id $stage_id"; # Command to run
+    my $command = "$dettool -pendingcleanup_residimfile -det_id $stage_id"; # Command to run
     $command .= " -dbname $dbname" if defined $dbname;
     my ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) = run(command => $command, verbose => $verbose);
@@ -1326 +1326 @@
 
         if ($status)  {
-            my $command = "$dettool -updateresidimfile -chip_id $stage_id -exp_id $exp_id -iteration $iteration -class_id $class_id";
+            my $command = "$dettool -updateresidimfile -det_id $stage_id -exp_id $exp_id -iteration $iteration -class_id $class_id";
             if ($mode eq "goto_purged") {
                 $command .= " -data_state purged";
@@ -1346 +1346 @@
             }
         } else {
-            my $command = "$dettool -updateresidimfile -chip_id $stage_id -exp_id $exp_id -iteration $iteration -class_id $class_id -data_state $error_state";
+            my $command = "$dettool -updateresidimfile -det_id $stage_id -exp_id $exp_id -iteration $iteration -class_id $class_id -data_state $error_state";
             $command .= " -dbname $dbname" if defined $dbname;