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

    File:           sle_srtdeel.asp
    Description:    wrapper voor sleutels/cilinders bewerk / show

    Parameters:     ins_srtdeel_key

    Context:
    Note:

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

<%
FCLTHeader.Requires({ plugins:["suggest","jQuery"],
                      js: ["jquery-ui.js"]})

var autfunction = ["WEB_SLEFOF", "WEB_SLEBOF"];

// De functie checkAutorisation(autfunction) geeft een Response.End indien er geen autorisatie voor autfunction wordt gevonden
var authparams = user.checkAutorisation(autfunction);
var authparamsSLEFOF = user.checkAutorisation("WEB_SLEFOF", true);
var authparamsSLEBOF = user.checkAutorisation("WEB_SLEBOF", true);

var ins_srtdeel_key = getQParamInt("ins_srtdeel_key", -1);
var couple = getQParamInt("couple", 0) == 1;

// OVERIGE PARAMETERS
var transitParam = buildTransitParam(["couple", "sletype"]);

var ins_name = "";
var ins_srtcode = "";
var ins_parentkey;

if (ins_srtdeel_key > 0)
{
  var sql = "SELECT s.ins_srtdeel_code"
        + "     , s.ins_srtdeel_omschrijving"
        + "     , g.ins_srtgroep_key"
        + " FROM ins_srtdeel s"
        + "    , ins_srtgroep g"
        + " WHERE s.ins_srtgroep_key = g.ins_srtgroep_key"
        + "   AND ins_srtdeel_key = " + ins_srtdeel_key;
  oRs = Oracle.Execute(sql);
  var ins_srtcode = oRs("ins_srtdeel_code").value;
  var sletype = (oRs("ins_srtgroep_key").value == S("sle_ins_srt_groep_key")? "S" : "C");
  oRs.close();
}
%>
<html>
  <head>
<%
    FCLTHeader.Generate();
%>
    <script  type="text/javascript" >
<%    if (ins_srtdeel_key > 0)
      { %>
        FcltMgr.setTitle("<%=safe.jsstring(ins_srtcode)%>", {hot: false});
<%    }
      else
      { %>
        FcltMgr.startEdit(window);
<%    } %>

      function sleClose(params)
      {
<%      if (ins_srtdeel_key == -1)
        { %>
          if (params.cancel)
          {
            FcltMgr.closeDetail(window, params );
            return true;
          }
          if (!params.keepForm)
            window.location.href = "sle_srtdeel.asp?ins_srtdeel_key=" + params.ins_srtdeel_key + (params.couple? "&couple=1" : "");
<%      }
        else
        { // Bestaand object bewerkt, switch naar show-mode
%>
          if (params.close)
          {
            FcltMgr.closeDetail(window, { close: true})
          }
          if (!params.keepForm)
            $("#sleframe")[0].src = "sle_show_srtdeel.asp?ins_srtdeel_key=<%=ins_srtdeel_key%>";
<%      } %>
      }
    </script>
  </head>

  <body>
<%PAGE_START();
    if (ins_srtdeel_key == -1)
      var page="sle_edit_srtdeel.asp"; // Maak een nieuw
    else
      var page = "sle_show_srtdeel.asp";
    page += "?ins_srtdeel_key=" + ins_srtdeel_key + transitParam;

    IFRAMER("sleframe", page, { FcltClose: "sleClose", title: (sletype == "S"? L("lcl_sle_sleutel_set") : L("lcl_cil_cilinder_set")) } );

    // Bijbehorende onderdelen, ook als er geen zijn (om toe te kunnen voegen) //TODO: alleen zien bij bo, klopt dat? volgens mij niet nodig bij uitlenen innemen.
    if ((authparamsSLEFOF && authparamsSLEFOF.ALGreadlevel < 9 && authparamsSLEFOF.PRSreadlevel < 9) &&
        (ins_srtdeel_key > 0))
    {
      page = "slecil_list.asp?tiny=1&user_key="+user_key+"&ins_srtdeel_key=" + ins_srtdeel_key + transitParam;
      IFRAMER( "sle_list",
               page,
               { title: (sletype == "S" ? L("lcl_sle_sleutels") : L("lcl_cil_cilinders")),
                 icon: (sletype == "S" ? "fa-key" : "fa-minus-circle fa-rotate-90"),
                 FcltClose: "insClose"
               });
    }

    if ((authparamsSLEBOF && authparamsSLEBOF.ALGreadlevel < 9 && authparamsSLEBOF.PRSreadlevel < 9) &&
        (ins_srtdeel_key > 0 && couple))
    {
      // Vind gekoppelde ruimten (cilinders)
      var sql = "SELECT iss.ins_srtdeel_key_2 ins_srtdeel_key"
              + "  FROM ins_srtdeel_srtdeel iss"
              + " WHERE iss.ins_srtdeel_key_1 = " + ins_srtdeel_key
              + " UNION"
              + " SELECT iss.ins_srtdeel_key_1 ins_srtdeel_key"
              + "   FROM ins_srtdeel_srtdeel iss"
              + "  WHERE iss.ins_srtdeel_key_2 = " + ins_srtdeel_key;
      oRs = Oracle.Execute(sql);
      if (!oRs.eof)
      {
        var cil_ins_srtdeel_key = oRs("ins_srtdeel_key").value;

        page = "slecil_list.asp?tiny=1&user_key="+user_key+"&ins_srtdeel_key=" + cil_ins_srtdeel_key + transitParam;
        IFRAMER( "cil_list",
                 page,
                 { title: L("lcl_cil_cilinders"),
                   icon: "fa-minus-circle fa-rotate-90",
                   FcltClose: "insClose"
                 });
      }
    }
PAGE_END();%>
  </body>
</html>
<% ASPPAGE_END(); %>
