<%@language = "javascript" %>
<% /*
     $Revision$
     $Id$
*/ %>

<!--#include file="../Shared/common.inc"-->

<% /* Dynamic upload of Uitvoerende persons list */ %>

<html>
  <head>
    <script type="text/javascript">
      var opt_ports = new Array();

      function port(value, text, parent_key, ex_value)
      {
          this.value = value;
          this.text = text;
          this.parent_key = parent_key;
          this.ex_value = ex_value;
      }
    </script>
<%
    var sql = '';
    module = getQParamInt("module");
    name = getQParam("name");
    port = getQParam("port");
    outlet_key = getQParamInt("outlet");

    Response.Write("// {{ module = " + module);
    Response.Write("// {{ name = " + name);
    Response.Write("// {{ port = " + port);
    Response.Write("// {{ outlet_key = " + outlet_key);
%>
    <script type="text/javascript">
      opt_ports[opt_ports.length] = new port( '', " ", -1, "-1");
    </script>
<%
    if (module>0)
    { // Note: de poortnummer worden numeriek gesorteerd (1,2 ipv 1,10,2), wetende dat het nummers zijn.
      // voor ongeldige nummers wordt 0 gepresenteerd(!)
      // indien poort is text dan sortering op ins_deel_omschrijving
      sql = "SELECT d.ins_deel_key"         // 0
          + ", COALESCE(d.ins_deel_omschrijving,'0')"     // 1
          + ", COALESCE((SELECT MIN(kd.ins_deel_key)"
          + " FROM ins_kenmerkdeel kd"
          + " WHERE kd.ins_kenmerkdeel_waarde = TO_CHAR(d.ins_deel_key)"
          + " AND kd.ins_kenmerkdeel_verwijder IS NULL"
          + " AND kd.ins_deel_key != " + outlet_key + "), -1)"
          + " FROM ins_deel d"
          + ", ins_srtdeel sd"
          + " WHERE d.ins_deel_parent_key = " + module
          + " AND d.ins_srtdeel_key = sd.ins_srtdeel_key"
          + " AND ins_deel_verwijder IS NULL"
          + " ORDER BY fac.safe_to_number(d.ins_deel_omschrijving), d.ins_deel_omschrijving";

      oRs = Oracle.Execute( sql );
      c0=oRs(0);
      c1=oRs(1);
      c2=oRs(2);
%>
      <script type="text/javascript">
<%      while (!oRs.eof)
        { %>
          if (<%=c2.value%> == -1) // only load the free ports
            opt_ports[opt_ports.length] =
          new port(<%=c0.value%>, "<%=safe.jsstring(c1.value)%>", <%=module%>, "<%=c2.value%>");
<%        oRs.MoveNext();
        }
        oRs.close();
%>
      </script>
<%
    }
%>
  </head>

  <body onLoad="javascript:parent.PortsUploaded('<%=name%>', '<%=port%>')">
  </body>
</html>
