if ( !defined( $datein ) ) {

    maxFileDate('WSB826TB', @entries, \$yr, \$mth, \$dt );

  } # no date passed in
  else {
  
    $datea = $datein;
  }
    
  print "\nDownload WSB826TB for date: " . $yr. $mth. $dt . "\n";