im_selection_to_select_box db sql select_name { default " " }What it does:
Expects selection to have a column named id and another named name. Runs through the selection and return a select bar named select_name, defaulted to $defaultDefined in: /web/philip/tcl/intranet-defs.tcl
Source code:
return " <select name=\"$select_name\"> <option value=\"\"> -- Please select -- [ad_db_optionlist $db $sql $default] </select> "