Changeset 38089
- Timestamp:
- Apr 6, 2015, 3:15:58 PM (11 years ago)
- File:
-
- 1 edited
-
trunk/tools/checkexp (modified) (5 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/tools/checkexp
r29253 r38089 53 53 summitExp.fault AS summit_fault, 54 54 pzDownloadExp.state AS download_state, count(pzDownloadImfile.class_id) AS download_count, 55 newExp.state AS newExp_state, newExp.exp_id 55 newExp.state AS newExp_state, newExp.exp_id, 56 rawExp.state as rawExp_state 56 57 FROM summitExp LEFT JOIN pzDownloadExp USING(exp_name) 57 58 LEFT JOIN pzDownloadImfile USING(exp_name) … … 88 89 my $first_exp_id; 89 90 my $first_exp_name; 91 my $last_registered_exp_id = ""; 92 my $last_registered_exp_name = ""; 90 93 while (my $se_ref = $se_stmt->fetchrow_hashref()) { 91 94 push @summit_exps, $se_ref; … … 98 101 my $imfiles = $se_ref->{imfiles}; 99 102 my $dateobs = $se_ref->{dateobs}; 103 my $raw_state = $se_ref->{rawExp_state}; 100 104 if ($summit_fault) { 101 105 push @summit_faults, $se_ref; … … 115 119 $last_new_exp_id = $exp_id; 116 120 $last_new_exp_name = $exp_name; 121 } 122 if ($raw_state and $raw_state eq 'full') { 123 $last_registered_exp_id = $exp_id; 124 $last_registered_exp_name = $exp_name; 117 125 } 118 126 } … … 180 188 181 189 print "first exposure: $first_exp_name $first_exp_id\n"; 190 print "last registered: $last_registered_exp_name $last_registered_exp_id\n" 191 if $last_registered_exp_id ne $last_exp_id; 182 192 print "last copied: $last_new_exp_name $last_new_exp_id\n" 183 193 if $last_new_exp_id ne $last_exp_id;
Note:
See TracChangeset
for help on using the changeset viewer.
