#------------- Company_Name
    print "<tr>\n";
    print "<td align=\"right\">\n";
    print "Userid:\n";
    print "</td>\n";
    
    print "<td>\n";
    print $query->textfield(-name=>'Company_Name',
            -size=>20);
    print "</td>\n";
    print "</tr>\n";