Changeset 29193 for trunk/ippToPsps/perl/makeDetections.pl

Timestamp:

Sep 22, 2010, 9:15:55 AM (16 years ago)

Author:

rhenders

Message:

Added ability to choose starting exp ID when generating list of exposures to process

File:

• trunk/ippToPsps/perl/makeDetections.pl (modified) (4 diffs)

trunk/ippToPsps/perl/makeDetections.pl

@@ -21 +21 @@
 my $output = undef;
 my $singleExpId = undef;
+my $lastExpId = undef;
 my $datastoreProduct = undef;
 my $force = undef;
@@ -33 +34 @@
         'dvolocation|l=s' => \$dvoPath,
         'expid|e=s' => \$singleExpId,
+        'lastexpid|x=s' => \$lastExpId,
         'product|p=s' => \$datastoreProduct,
         'verbose|v' => \$verbose,
@@ -66 +68 @@
     $singleExpId = -1;
     print "* OPTIONAL: a single exposure ID            -e <expID>           (default = none)\n";
+}
+if (!defined $lastExpId) {
+    $lastExpId = 0;
+    print "* OPTIONAL: process from last exp ID        -x <expID>           (default = $lastExpId)\n";
 }
 if (!defined $datastoreProduct) {
@@ -107 +113 @@
 else {
 
-    if (!$gpc1Db->getExposureListFromDvoDb($dvoDb, \$exposures)) {exit;}
+    if (!$gpc1Db->getExposureListFromDvoDb($dvoDb, \$exposures, $lastExpId)) {exit;}
 }