      print "   <td valign=top><select NAME=\"usergrphosts\">\n";
      print "                <option VALUE=\"none\">",&hlink("<b>$text{'f_selecgrphosts'}</b>","fselecgrphosts"),"\n";
     %h_grphost=&list_grphosts();
     &out_htmlselobj(\%h_grphost,"name","alias",$usergrphosts);
      print "        </select>\n";
      print "<input type=button onClick='selfield = document.forms[0].usergrphosts; ifield = document.forms[0].usergrphosts.options[document.forms[0].usergrphosts.selectedIndex]; if ( ifield.value == \"$usergrphosts\" ) { ifield.value = \"\" } ; chooser = window.open(\"/stta/obj_chooser.cgi?type=grphosts&multi=$multiobj&ord=ens&deft=alias&f=select&obj=\"+escape(ifield.value), \"chooser\", \"toolbar=no,menubar=no,scrollbars=yes,width=700,height=500\"); chooser.ifield = ifield; window.ifield = ifield' value=\"$text{browse}\"></td>\n";
 }
 print "</tr>";
