Changeset 18619 for trunk/pstamp/scripts/dqueryparse.pl

Timestamp:

Jul 18, 2008, 12:56:11 PM (18 years ago)

Author:

bills

Message:

Add the job id to the response file to support a dquery request generating
multiple jobs

File:

• trunk/pstamp/scripts/dqueryparse.pl (modified) (3 diffs)

trunk/pstamp/scripts/dqueryparse.pl

@@ -86 +86 @@
 my (undef, $extname, $extver, $req_name) = split " ", $fields_output;
 
+die "$req_file is missing one of EXTNAME EXTVER or QUERY_ID" 
+    if !(defined($extname) and defined($extver) and defined($req_name));
+
 die "$req_file has EXTNAME $extname not MOPS_DETECTABILITY_QUERY table"
                 if $extname ne         "MOPS_DETECTABILITY_QUERY";
-die "$req_file does not have a QUERY_ID" if ! $req_name;
 die "$req_file is version $extver expecting 1" if $extver ne 1;
 
@@ -130 +132 @@
         $job_id = join "", @$stdout_buf;
         chomp $job_id;
+        if ($job_id && -e $response_file) {
+            rename $response_file, "$out_dir/response${job_id}.fits";
+        }
         $result = 0;
     } else {
@@ -136 +141 @@
     }
 }
+
 
 {