15 lines
1.5 KiB
Plaintext
Executable File
15 lines
1.5 KiB
Plaintext
Executable File
if ( $multiobj eq "1" ) {
|
|
print "<textarea wrap=auto name=aliasgrpapps rows=5 cols=10>",
|
|
join("\n", split(/,/ , $aliasgrpapps)),"</textarea>\n";
|
|
print "<input type=button onClick='ifield = document.forms[0].aliasgrpapps; if ( ifield.value == \"$aliasgrpapps\" ) { ifield.value = \"\" } ; chooser = window.open(\"/stta/obj_chooser.cgi?type=grpapps&multi=$multiobj&ord=ens&deft=alias&f=textarea&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";
|
|
|
|
} else {
|
|
print " <td valign=top><select NAME=\"aliasgrpapps\">\n";
|
|
print " <option VALUE=\"none\">",&hlink("<b>$text{'f_selecgrpapps'}</b>","fselecgrpapps"),"\n";
|
|
%h_grpapp=&list_grpapps();
|
|
&out_htmlselobj(\%h_grpapp,"name","alias",$aliasgrpapps);
|
|
print " </select>\n";
|
|
print "<input type=button onClick='selfield = document.forms[0].aliasgrpapps; ifield = document.forms[0].aliasgrpapps.options[document.forms[0].aliasgrpapps.selectedIndex]; if ( ifield.value == \"$aliasgrpapps\" ) { ifield.value = \"\" } ; chooser = window.open(\"/stta/obj_chooser.cgi?type=grpapps&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>";
|