Changeset 30688 for trunk/ippScripts/scripts/nightly_science.pl
- Timestamp:
- Feb 18, 2011, 2:08:55 PM (15 years ago)
- File:
-
- 1 edited
-
trunk/ippScripts/scripts/nightly_science.pl (modified) (4 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/ippScripts/scripts/nightly_science.pl
r30575 r30688 1315 1315 my $cam_ref = $db->selectall_arrayref( $cam_sth ); 1316 1316 my $warp_ref = $db->selectall_arrayref( $warp_sth ); 1317 1318 1317 return($#{ $chip_ref } + 1, $#{ $cam_ref } + $#{ $warp_ref } + 2); 1319 1318 } … … 1439 1438 # $input_sth .= " ORDER BY dateobs "; 1440 1439 1441 my $input_sth = "select exp_id,warp_id,dateobs,rawExp.comment,warpRun.state AS warp_state FROM ";1442 $input_sth .= " rawExp LEFT JOIN chipRun USING (exp_id) LEFT JOIN camRun USING (chip_id) LEFT JOIN fakeRun USING (cam_id) LEFT JOIN warpRun USING (fake_id) ";1440 my $input_sth = "select exp_id,warp_id,dateobs,rawExp.comment,warpRun.state AS warp_state,camProcessedExp.quality FROM "; 1441 $input_sth .= " rawExp LEFT JOIN chipRun USING (exp_id) LEFT JOIN camRun USING (chip_id) LEFT JOIN camProcessedExp USING(cam_id) LEFT JOIN fakeRun USING (cam_id) LEFT JOIN warpRun USING (fake_id) "; 1443 1442 $input_sth .= " WHERE chipRun.label = '$label' AND chipRun.data_group = '$data_group' AND rawExp.filter = '$filter' AND rawExp.object = '$this_object' "; 1444 1443 $input_sth .= " ORDER BY dateobs "; … … 1461 1460 } 1462 1461 else { 1463 print STDERR ": I should declare an exposure to be faulty.\n";1462 print STDERR ": I should declare an exposure to be qualityy.\n"; 1464 1463 my @keep_warps = (); 1465 1464 # print "@{ $warps }\n"; … … 1494 1493 my $input_warp_state = ${ $input_warp }[4]; 1495 1494 my $template_warp_state = ${ $template_warp }[4]; 1496 1495 1496 my $input_warp_camQuality = ${ $input_warp }[5]; 1497 my $template_warp_camQuality = ${ $template_warp }[5]; 1498 1497 1499 $Npotential++; 1498 1500 1499 1501 unless (defined($input_warp_id) && defined($template_warp_id) && 1500 1502 ($input_warp_state eq 'full')&&($template_warp_state eq 'full')) { 1501 print STDERR "Diff for this $date $target $input_exp_id $template_exp_id not fully processed\n"; 1503 print STDERR "Diff for this $date $target $input_exp_id $template_exp_id not fully processed ($input_warp_state $template_warp_state) ($input_warp_camQuality $template_warp_camQuality)\n"; 1504 if (($input_warp_camQuality == 4007)||($template_warp_camQuality == 4007)) { 1505 print STDERR " ...but this is due to a camera stage astrometry quality\n"; 1506 $Npotential--; 1507 } 1502 1508 next; 1503 1509 }
Note:
See TracChangeset
for help on using the changeset viewer.
