one of the documented procedures in this installation of the ACS
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 $default
Defined in: /web/philip/tcl/intranet-defs.tcl

Source code:

    return "
<select name=\"$select_name\">
<option value=\"\"> -- Please select --
[ad_db_optionlist $db $sql $default]