BLCC#39847 Contracten zijn nu ook te scopen op verdieping en ruimte, deze zijn nu ook te vinden bij mld_edit_opdr

svn path=/Website/trunk/; revision=33673
2017-05-03 11:06:47 +00:00
parent 4acd4bccfe
commit 178b4c472d
2 changed files with 113 additions and 0 deletions
--- a/APPL/Shared/loadRuimte.asp
+++ b/APPL/Shared/loadRuimte.asp
@@ -0,0 +1,57 @@
+<%@language = "javascript" %>
+<% /*
+     $Revision$
+     $Id$
+*/ %>
+
+<%
+DOCTYPE_Disable = true;
+%>
+
+<!-- #include file="../Shared/common.inc" -->
+<!-- #include file="../Shared/selector.inc" -->
+
+<%
+// Build a building list
+var verdieping_key_arr = getFParamIntArray("verdieping_key_arr", [-1]); // Indien geen gebouw is aangegeven, nog geen verdiepingen lijst laden
+var autlevel = getFParamInt("autlevel", -1);
+var startmulti = getFParamInt("startmulti", 0);
+
+var filtClause = "";
+if (autlevel > -1) // Efficiente versie van FAC_V_MY_PR**S_AFDELINGEN_WRITE
+{
+  filtClause +=" AND v.alg_verdieping_key IN"
+             + " (SELECT alg_verdieping_key FROM fac_v_my_floors"
+             + " WHERE prs_perslid_key = " + user_key
+             + " AND niveau = " + autlevel + ")";
+}
+var sql = "SELECT r.alg_ruimte_key alg_key"
+       + ", v.alg_verdieping_code || ' - ' || r.alg_ruimte_nr"
+       + "       || DECODE (vr.alg_plaatsomschrijving, "
+       + "                  '', '', "
+       + "                  ' (' || vr.alg_plaatsomschrijving || ')')"
+       + ",      l.alg_locatie_code || '-' || vr.alg_plaatsaanduiding "
+       + "       || DECODE (vr.alg_plaatsomschrijving, "
+       + "                  '', '', "
+       + "                  ' (' || vr.alg_plaatsomschrijving || ')') text"
+       + " FROM alg_v_aanwezigruimte r, alg_verdieping v, alg_locatie l, alg_v_allonrgoed_gegevens vr"
+       + " WHERE v.alg_verdieping_key = r.alg_verdieping_key"
+       + " AND vr.alg_type = 'R'"
+       + " AND l.alg_locatie_key = vr.alg_locatie_key"
+       + " AND vr.alg_ruimte_key = r.alg_ruimte_key"
+       + " AND (r.alg_ruimte_verwijder IS NULL OR r.alg_ruimte_verwijder > TRUNC(SYSDATE))"
+       + (verdieping_key_arr.length != 0 ? " AND r.alg_verdieping_key IN (" + verdieping_key_arr.join(",") + ")" : "")
+       + filtClause
+       + " ORDER BY 2";
+
+FCLTselector("rooms",
+             sql,
+             { initKey: -1,
+               initEmpty: true,
+               multi: true,
+               startmulti: startmulti,
+               size: 10,
+               extraParamValue: "text",
+               initEmpty: true
+             });
+%>
--- a/APPL/Shared/loadVerdieping.asp
+++ b/APPL/Shared/loadVerdieping.asp
@@ -0,0 +1,56 @@
+<%@language = "javascript" %>
+<% /*
+     $Revision$
+     $Id$
+*/ %>
+
+<%
+DOCTYPE_Disable = true;
+%>
+
+<!-- #include file="../Shared/common.inc" -->
+<!-- #include file="../Shared/selector.inc" -->
+
+<%
+// Build a building list
+var gebouw_key_arr = getFParamIntArray("gebouw_key_arr", [-1]); // Indien geen gebouw is aangegeven, nog geen verdiepingen lijst laden
+var autlevel = getFParamInt("autlevel", -1);
+var startmulti = getFParamInt("startmulti", 0);
+
+var filtClause = "";
+if (autlevel > -1) // Efficiente versie van FAC_V_MY_PR**S_AFDELINGEN_WRITE
+{
+  filtClause +=" AND g.alg_gebouw_key IN"
+             + " (SELECT alg_gebouw_key FROM fac_v_my_buildings"
+             + " WHERE prs_perslid_key = " + user_key
+             + " AND niveau = " + autlevel + ")";
+}
+var sql = "SELECT v.alg_verdieping_key alg_key"
+       + ", g.alg_gebouw_code || ' - ' || v.alg_verdieping_code"
+       + ",      l.alg_locatie_code || '-' || vv.alg_plaatsaanduiding "
+       + "       || DECODE (vv.alg_plaatsomschrijving, "
+       + "                  '', '', "
+       + "                  ' (' || vv.alg_plaatsomschrijving || ')') text"
+       + " FROM alg_v_aanwezigverdieping v, alg_gebouw g, alg_locatie l, alg_v_allonrgoed_gegevens vv"
+       + " WHERE g.alg_gebouw_key = v.alg_gebouw_key"
+       + " AND g.alg_locatie_key = l.alg_locatie_key"
+       + " AND vv.alg_type = 'V'"
+       + " AND l.alg_locatie_key = vv.alg_locatie_key"
+       + " AND vv.alg_verdieping_key = v.alg_verdieping_key"
+       + " AND (v.alg_verdieping_verwijder IS NULL OR v.alg_verdieping_verwijder > TRUNC(SYSDATE))"
+       + (gebouw_key_arr.length != 0 ? " AND v.alg_gebouw_key IN (" + gebouw_key_arr.join(",") + ")" : "")
+       + filtClause
+       + " ORDER BY 2";
+
+FCLTselector("flrs",
+             sql,
+             { initKey: -1,
+               initEmpty: true,
+               multi: true,
+               startmulti: startmulti,
+               size: 10,
+               extraParamValue: "text",
+               initEmpty: true,
+               onChange: 'updateRoo("' + autlevel + '");'
+             });
+%>