Changeset 27840 for branches/simtest_nebulous_branches/pstamp/scripts/detect_query_read

Timestamp:

May 3, 2010, 8:50:52 AM (16 years ago)

Author:

eugene

Message:

updates from trunk

Location:

branches/simtest_nebulous_branches

Files:

• . (modified) (1 prop)
• pstamp/scripts/detect_query_read (modified) (2 diffs)

branches/simtest_nebulous_branches/pstamp/scripts/detect_query_read

@@ -78 +78 @@
                         comment => 'site identifier (MPC observatory code)',
                         value => undef
-              }
+                      },
+        'STAGE'    => { 
+                        name => 'STAGE',
+                        writetype => TSTRING,
+                        comment => 'processing stage to examine',
+                        value => undef
+                      }
 };
 
 # key_array insures that the order that the keywords is printed out is
 # the same as the ICD
-my @key_array = qw( QUERY_ID FPA_ID MJD_OBS FILTER OBSCODE );
+my @key_array = qw( QUERY_ID FPA_ID MJD_OBS FILTER OBSCODE STAGE);
 
 # Specification of columns
@@ -144 +150 @@
         my $name = $header->{$key}->{name};
         my $value = $inHeader->{$name};
+        if (($key eq 'STAGE')&& !(defined($value))) {
+            $value = 'DIFF';
+        }
         # get rid of quotes and whitespace
         $value =~ s/\'//g;