Index: trunk/ippScripts/scripts/register_imfile.pl
===================================================================
--- trunk/ippScripts/scripts/register_imfile.pl	(revision 31572)
+++ trunk/ippScripts/scripts/register_imfile.pl	(revision 31603)
@@ -40,5 +40,5 @@
 
 my ($cache, $exp_id, $tmp_class_id, $tmp_exp_name, $uri, $bytes, $md5sum, $dbname, $verbose, $no_update, $no_op, $logfile);
-my ($sunrise, $sunset);
+my ($sunrise, $sunset, $summit_dateobs);
 GetOptions(
     'caches'           => \$cache,
@@ -51,4 +51,5 @@
     'sunrise=s'        => \$sunrise,
     'sunset=s'         => \$sunset,
+    'summit_dateobs=s' => \$summit_dateobs,
     'dbname|d=s'       => \$dbname,    # Database name
     'verbose'          => \$verbose,   # Print to stdout
@@ -181,4 +182,8 @@
 if (uc(&value_for_flag ($cmdflags, "NULL", "-exp_type"))  eq "NULL") { &my_die_for_add ("exp_type  not found", $exp_id, $tmp_exp_name, $tmp_class_id, $uri, $PS_EXIT_CONFIG_ERROR); }
 my $dateobs   = &value_for_flag($cmdflags, 0.0, "-dateobs");
+unless($summit_dateobs) {
+    $summit_dateobs = $dateobs;
+}
+
 my $exp_type  = &value_for_flag($cmdflags, "NULL", "-exp_type");
 
@@ -196,5 +201,5 @@
     $command .= " -data_state full";
 }
-elsif (is_daytime($dateobs,$sunrise,$sunset)) {
+elsif (is_daytime($summit_dateobs,$sunrise,$sunset)) {
     printf STDERR "This is a daytime exposure.\n";
     $command .= " -data_state full";
@@ -267,5 +272,5 @@
 
 if ((abs($burntoolStateCurrent) != $burntoolStateTarget)&&
-    (!is_daytime($dateobs,$sunrise,$sunset))&&
+    (!is_daytime($summit_dateobs,$sunrise,$sunset))&&
     (!is_ccim($tmp_exp_name,$exp_type))) {
     my $mdcParser  = PS::IPP::Metadata::Config->new;