while (@row = $sth->fetchrow()){
    
    ## Make our HTML look better if no data.
    $oid = " " if($oid eq "");
    $date = " " if($date eq "");
    $username = " " if($username eq "");
    

   print <<HTML;
    <TR BGCOLOR="#FFFFFF">
     
     <TD><FONT SIZE=2 FACE=ARIAL>$row[0]</FONT></TD>
     <TD><FONT SIZE=2 FACE=ARIAL>$row[1]</FONT></TD>
     <TD><FONT SIZE=2 FACE=ARIAL><B>$row[2]</B></FONT></TD>
     <TD><FONT SIZE=1 FACE=ARIAL>
      [<A HREF="out_form.cgi?$row[0]">Clock Out</A>]
     </FONT></TD>

          
   </TR>
HTML
  } # End of while.


##</code><code>##

<FORM action=""><select size=10>
HTML

  while (@row = $sth->fetchrow()){
       
    
   ## Make our HTML look better if no data.
    $oid = "&nbsp;" if($oid eq "");
    $date = "&nbsp;" if($date eq "");
    $username = "&nbsp;" if($username eq "");
    

   print <<HTML;
         
     <OPTION>$row[0] $row[1] $row[2]</option>
HTML
  } # End of while.