$main::SQL="
SELECT oid,* 
FROM timeclock 
WHERE end_stamp = NULL 
AND use rname = '$username'";

common::sql::Do_SQL();
@clocked_in = $common::sql::sth->fetchrow();

if (! @clocked_in ){$checked = 0}
            #unless ($clocked_in[1] eq "$username"){
if ($checked == 0){
             clock_in_form($username, $date, $time);
}