handle_edit_textbox

handle_edit_textbox   column   size   customsize   value

Helper proc to make_edit_form that makes a textbox for an edit page

Source code:

    set form_html ""
    switch $size {
        small {
            append form_html "<td><input type=text size=10 name=$column [export_form_value value]></td>"}
        medium {
            append form_html "<td><input type=text size=40 name=$column [export_form_value value]></td>"}
        large {
            append form_html "<td><input type=text size=70 name=$column [export_form_value value]></td>"}
        spec {
            append form_html "<td><input type=text size=$customsize name=$column [export_form_value value]></td>"}
        default {
            append form_html "<td><input type=text size=40 name=$column [export_form_value value]></td>"}
    }
    return $form_html