Changeset 40835

Timestamp:

Jul 19, 2019, 10:55:35 AM (7 years ago)

Author:

tdeboer

Message:

added explicit warning and exposure name when raw exp not downloaded

File:

• trunk/ippScripts/scripts/night_report.pl (modified) (3 diffs)

trunk/ippScripts/scripts/night_report.pl

@@ -140 +140 @@
     $summitPending = 0;
 
-#   my $query = "SELECT exp_name, exp_type, fault, state, count(*)";
     my $query = "SELECT exp_type, fault, state, count(*)";
     $query .= " FROM summitExp";
@@ -149 +148 @@
     $query .= " GROUP BY exp_type, fault, state";
 
-#    print "$query\n";
-#    die;
-
     my $result = &mysql_select ($query);
 
@@ -164 +160 @@
         }
     }
-    if ($summitSkipped || $summitPending) { print "*** WARNING: $summitSkipped skipped rawExp, $summitPending incomplete rawExp ***\n\n"; } else { if ($verbose) { print "\n"; }}
+    if ($summitSkipped || $summitPending) { 
+        print "*** WARNING: $summitSkipped skipped rawExp, $summitPending incomplete rawExp ***\n\n"; 
+
+        my $query = "SELECT summitExp.exp_name,exp_type, fault, state";
+        $query .= " FROM summitExp";
+        $query .= " LEFT JOIN pzDownloadExp USING (summit_id)";
+        $query .= " WHERE dateobs like '$date%'";
+        $query .= " AND (state like 'new' or state IS NULL)";
+        $query .= " AND fault != 1042";
+
+        my $result = &mysql_select ($query);
+        printf "%12s %8s %15s %6s\n", "exp_name", "exp_type", "fault", "state"; 
+        while (@row = $result->fetchrow_array()) {
+            if ($row[3] eq "") { $row[3] = "NULL"; }
+            printf "%12s %8s %15s %6s\n", $row[0], $row[1], $row[2], $row[3]; 
+        }
+    }
+    print "\n";
 }