Changeset 29130 for trunk/pstamp/scripts/detect_query_read

Timestamp:

Sep 8, 2010, 4:50:07 PM (16 years ago)

Author:

watersc1

Message:

Convert bad query row data from "Not Set" to "Not_Set" so this can be treated like a standard fpa_id in the detectability_respond.pl script.

Fix the handling of bad components so they append correctly when re-reading the wisdom file.

File:

• trunk/pstamp/scripts/detect_query_read (modified) (4 diffs)

trunk/pstamp/scripts/detect_query_read

@@ -164 +164 @@
     }
     elsif ($status == 219) {
-        @{ $colData{$col->{name}} } = map { "Not Set" } (0 .. $numRows - 1);
+        @{ $colData{$col->{name}} } = map { "Not_Set" } (0 .. $numRows - 1);
         $status = 0;
     }
@@ -173 +173 @@
 # Simple stuff first.
     my %known_filters = ();
-    if ($colData{STAGE}[$i] eq "Not Set") {
+    if ($colData{STAGE}[$i] eq "Not_Set") {
         $colData{STAGE}[$i] = 'diff';
     }
-    if ($colData{OBSCODE}[$i] eq "Not Set") {
+    if ($colData{OBSCODE}[$i] eq "Not_Set") {
         $colData{OBSCODE}[$i] = 566;
     }
 # Define filter and MJD from FPA_ID
-    if (($colData{FILTER}[$i] eq "Not Set")&&($colData{FPA_ID}[$i] ne "Not Set")) {
+    if (($colData{FILTER}[$i] eq "Not_Set")&&($colData{FPA_ID}[$i] ne "Not_Set")) {
         if (exists($known_filters{$colData{FPA_ID}[$i]})) {
             $colData{FILTER}[$i] = $known_filters{$colData{FPA_ID}[$i]};
@@ -210 +210 @@
         }
     }
-    if (($colData{'MJD-OBS'}[$i] eq "Not Set")&&($colData{FPA_ID}[$i] ne "Not Set")) {
+    if (($colData{'MJD-OBS'}[$i] eq "Not_Set")&&($colData{FPA_ID}[$i] ne "Not_Set")) {
         # HACK!
         my $mjd = $colData{FPA_ID}[$i];
@@ -217 +217 @@
         $colData{'MJD-OBS'}[$i] = $mjd;
     }
-    if (($colData{FPA_ID}[$i] eq "Not Set")&&(($colData{'FILTER'}[$i] ne "Not Set")&&
-                                              ($colData{'MJD-OBS'}[$i] ne "Not Set"))) {
+    if (($colData{FPA_ID}[$i] eq "Not_Set")&&(($colData{'FILTER'}[$i] ne "Not_Set")&&
+                                              ($colData{'MJD-OBS'}[$i] ne "Not_Set"))) {
         my $dateobs_begin = mjd_to_dateobs($colData{'MJD-OBS'}[$i]);
         my $dateobs_end = mjd_to_dateobs($colData{'MJD-OBS'}[$i] + 1);