start_form,
$html .= popup_menu ( -name =>'changes',                                                               -values=>\@syschanges);
                }
                elsif ($db_type{$obj} eq "textarea") { # Makes the textarea
                        if ($record{$obj}) { $val = qq~$record{$obj}~; }
                        else { $val = ""; }
                        $html .= qq~<TEXTAREA NAME="$obj" ROWS="4" COLS="40">$val</TEXTAREA>~;
                }
                $html .= qq~</TD></TR>~;

        }
        $html .= "</TABLE><P>";
print $html;
                              
}