Changeset 29616 for trunk/pstamp/scripts/detectability_respond.pl

Timestamp:

Oct 29, 2010, 3:34:22 PM (16 years ago)

Author:

watersc1

Message:

Fix string/ulong typo identified in Baltimore.

File:

• trunk/pstamp/scripts/detectability_respond.pl (modified) (2 diffs)

trunk/pstamp/scripts/detectability_respond.pl

@@ -644 +644 @@
         $columns = [
             # matching rownum from detectability original request
-            { name => 'ROWNUM',   type => '20A', writetype => TULONG }, 
+            { name => 'ROWNUM',   type => '20A', writetype => TSTRING}, 
             # any errors that occurred during processing
             { name => 'ERROR_CODE',   type => 'V', writetype => TULONG }, 
@@ -757 +757 @@
             print "column name undefined for $i\n";
         }
-#       print STDERR "$writeType $i $numRows $colName $status @{ $colData{$colName} }\n";
+        print STDERR "$writeType $i $numRows $colName $status @{ $colData{$colName} }\n";
         $outFits->write_col( $writeType, $i + 1, 1, 1, $numRows, $colData{$colName}, $status );
-#       print "$writeType $i $numRows $colName $status\n";
+        print STDERR "$writeType $i $numRows $colName $status\n";
         check_fitsio( $status );
     }