NYBU#55433 Arrangementen bij reserveringen realiseren

svn path=/Website/trunk/; revision=40233
2018-12-13 16:18:30 +00:00
parent 478bb26504
commit 69bdd9b2fe
1 changed files with 142 additions and 0 deletions
--- a/APPL/RES/res_edit_arrangement_artikel_multi.asp
+++ b/APPL/RES/res_edit_arrangement_artikel_multi.asp
@@ -0,0 +1,142 @@
+<%@language = "javascript" %>
+<% /*
+     $Revision$
+     $Id$
+
+    File:               res_edit_arrangement_artikel_multi.asp
+    Description:        Multi toevoegen van artikelen aan een arrangement
+    Parameters:         id
+
+    Context:            res_artikel.asp
+    Note:               Nvt
+
+*/ %>
+<!-- #include file="../Shared/common.inc" -->
+<!-- #include file="../Shared/iface.inc" -->
+<!-- #include file="../Shared/save2db.inc" -->
+<!-- #include file="res.inc" -->
+
+<%
+FCLTHeader.Requires({ plugins:["suggest", "jQuery", "kenmerk"] });
+
+var art_key_arr = getQParamIntArray("id");
+var submitting = getQParamInt("submit", 0) == 1;
+var arrangement_key = -1;
+if (submitting) { arrangement_key = getFParamInt("arrangement", -1); }
+
+var warning = "";
+var result = {};
+var tobearranged = 0;
+var ingesloten = [];
+var aanwezig = {};
+// select items that are already attached to the arrangment
+if (submitting)
+{
+  var oRs = Oracle.Execute(
+    "SELECT res_artikel_key "+
+    "FROM   res_arrangement_artikel "+
+    "WHERE  res_arrangement_key = "+arrangement_key+" "+
+    "AND    res_artikel_key IN ("+art_key_arr.join(",")+")"
+  );
+  while (!oRs.eof)
+  {
+    aanwezig[oRs("res_artikel_key").Value]=1;
+    oRs.MoveNext();
+  }
+  oRs.close();
+}
+
+// Bepaal de reservering artikelen in de selectie die
+// ook echt aan het arrangement toegevoegd kunnen of mogen worden.
+for (var i = 0; i < art_key_arr.length; i++)
+{
+  if (!aanwezig[art_key_arr[i]])
+  {
+    ingesloten.push(art_key_arr[i]);
+    tobearranged++;
+  }
+}
+
+user.auth_required_or_abort(ingesloten.length); // We klagen niet over enkele wel en enkele niet
+%>
+
+<html>
+  <head>
+<%  FCLTHeader.Generate(); %>
+<%
+    if (submitting)
+    {
+      for (var i = 0; i < ingesloten.length; i++)
+      {
+        var fields = [
+          { dbs: "res_arrangement_key",  typ: "key",   val: arrangement_key,  track: L("res_arrangement_key"),  foreign: "res_arrangement" },
+          { dbs: "res_artikel_key",  typ: "key",   val: ingesloten[i],  track: L("res_artikel_key"),  foreign: "res_artikel" }
+        ];
+        var resIns = buildInsert("res_arrangement_artikel", fields);
+        var err = Oracle.Execute(resIns.sql, true);
+        if (err.friendlyMsg)
+            warning = err.friendlyMsg;
+      }
+
+%>    <script type="text/javascript">
+        $(function()
+        {
+          FcltMgr.closeDetail(window, { success: true } )
+        });
+      </script>
+<%    Response.End();
+    }
+%>
+
+    <script type="text/javascript">
+      function res_submit()
+      { // Invoer van velden wordt realtime gevalideerd.
+        document.forms.u2.submit();
+        return true; // disable button
+      }
+
+      function res_cancel()
+      {
+        FcltMgr.closeDetail(window, { cancel: true } );
+      }
+    </script>
+  </head>
+
+  <body class="modal" id="mod_resmultiedit">
+    <form name="u2" action="res_edit_arrangement_artikel_multi.asp?submit=1&id=<%=ingesloten.join(",")%>" method="post">
+<%    BLOCK_START("arrgArtikelen", L("res_arrangement")); %>
+      <table class="fcltblocktab" width="100%">
+        <tr>
+          <td class="label"><label class="selector" for="arrangement"><%=L("res_arrangement")%>:</label></td>
+          <td>
+            <select class="fldarrangement required" name="arrangement" id="arrangement">
+              <option value="-1" class=" required">&nbsp;</option>
+<%
+              // select arrangements
+              var oRs = Oracle.Execute(
+                "SELECT res_arrangement_key, res_arrangement_omschrijving "+
+                "FROM   res_arrangement"
+              );
+              while (!oRs.eof)
+              {
+%>              <option value=<%=oRs("res_arrangement_key").Value%>>
+                <%=oRs("res_arrangement_omschrijving").Value%>
+                </option>
+<%              oRs.MoveNext();
+              }
+              oRs.close();
+%>          </select>
+          </td>
+        </tr>
+      </table>
+<%    BLOCK_END();
+
+      var buttons =  [];
+      buttons.push({title: L("lcl_submit"), action:"res_submit()", singlepress: true, id: "btn_edit_submit"});
+      buttons.push({title: L("lcl_cancel"),  action:"res_cancel()"});
+      CreateButtons(buttons);
+      IFACE.FORM_END();
+%>
+    </form>
+  </body>
+</html>