 print "     obj.links.value=\"\"\n"; 
 print "     for ( var i=0; i<obj.s_links.length; i++ ) {\n"; 
 print "         if (obj.s_links.options[i].selected) {\n"; 
 print "            if (obj.links.value.length > 0) {\n"; 
 print "               obj.links.value += \",\";     \n"; 
 print "            }\n"; 
 print "            obj.links.value +=\"'\"+obj.s_links.options[i].value+\"'\" \n"; 
 print "         }\n"; 
 print "   <tr><td valign=top>",&hlink("<b>$text{'f_links'}</b>","flinks"),"\n"; 
 print "      <td valign=top><select NAME=\"s_links\" size=4 multiple>\n"; 
$nItems=0;
foreach $item (&list_links()) {
     if ( $nItems == 0 ) {
          print " <option VALUE=\"".$item->{'alias'}."\" selected>". $item->{'name'}."\n";
    }
     else {
          print " <option VALUE=\"".$item->{'alias'}."\" >".$item->{'name'}."  ";
     }
     $nItems++;
}
 print "	   </select>\n"; 
 print "	<input TYPE=\"hidden\" NAME=\"links\" VALUE=\"\"></td></tr>\n"; 
 print "	\n"; 
                      foreach $lk (&list_links()) {
                      print $lk->{'alias'}."\n ";
                            if ( $lk->{'alias'} eq $in{links}) {
                               print TEMPF "  --links  \"$lk->{'obj'}\"\\\n";
                            }
                      }
 print "/******************************************************************\n"; 
 print "   setBandwidth(formObj)\n"; 
 print "   check for a NTdomain\n"; 
 print "*******************************************************************/\n"; 
 print "function setBandwidth(formObj) {\n"; 
 print "  if (emptyField(formObj.bandwidth)) {\n"; 
 print "        return\n"; 
 print "   }\n"; 
 print "  else {  \n"; 
 print "        if (isNroThis(formObj.bandwidth) == false ) {\n"; 
 print "           formObj.bandwidth.value=\"\"\n"; 
 print "        }\n"; 
 print "  }\n"; 
 print "}\n"; 
<input TYPE=\"text\" NAME=\"bandwidth\" VALUE=\"\" cols=\"8\" size=\"8\" ALIGN=left\n"; 
 print "			onChange=\"setBandwidth(modusr)\" ></td></tr>		\n"; 
