my ($bday, $bmon, $byear, $bhour, $bmin, $bsec);
     my ($eday, $emon, $eyear, $ehour, $emin, $esec);
     if(!$MISValue{ MIS_DBTYPE } || $MISValue{ MIS_DBTYPE } eq 'db2')
     {
         ($bday, $bmon, $byear, $bhour, $bmin, $bsec) =
           $beginningLine =~ /"(\d){2}-(\d){2}-(\d){4} (\d){2}:(\d){2}:(\d){2}/;
         ($eday, $emon, $eyear, $ehour, $emin, $esec) =
           $finishedLine =~ /"(\d){2}-(\d){2}-(\d){4} (\d){2}:(\d){2}:(\d){2}/;
     }
     else
     {
         ($byear, $bmon, $bday, $bhour, $bmin, $bsec) =
           $beginningLine =~ /^(.){10} (\d){4}-(\d){2}-(\d)}-(\d){2}\.(\d){2}\.(\d){2}/;
         ($eyear, $emon, $eday, $ehour, $emin, $esec) =
           $finishedLine =~ /^(.){10} (\d){4}-(\d){2}-(\d)}-(\d){2}\.(\d){2}\.(\d){2}/;
     }