vervangt setAlgVerwijder.asp

svn path=/Website/trunk/; revision=24

APPL/ALG/alg_delete.asp

@@ -0,0 +1,54 @@
+<%@ LANGUAGE = JavaScript %>
+<% /*
+    $Revision: 1 $
+    $Modtime: 14-10-09 15:04 $
+
+    File:           alg_delete.asp (formerly setAlgverwijder.asp)
+    Status:         10% (new style)
+    Description:    Verwijderen alg-object
+
+    Parameters:     key (van het onroerend goed)
+                    level: "D", "RE", "L", "G", "V", "R", "W" (werkplek) of "PW" (perslid_werkplek)
+    Context:        Vanuit show-schermen en of vanuit overzichten
+    Result:         JSON object
+    Note:
+
+*/
+DOCTYPE_Disable = 1;
+%>
+<!--#include file="../../cust/install.inc"-->
+<!--#include file="../Shared/json2.js" -->
+<!--#include file="../Shared/funcodes.inc"-->
+<%
+    // Only deleting when WEB_ALGMAN authorisation
+    // TODO: Nauwkeuriger controleren
+    var autfunction="WEB_ALGMAN";
+    var authParams = user.checkAutorisation(autfunction);
+
+    var  key = getFParamInt('key');
+    var  level = getFParam('level');
+
+    var table = {D : "ALG_DISTRICT",
+                 RE: "ALG_REGIO",
+                 L : "ALG_LOCATIE",
+                 T : "ALG_TERREINSECTOR",
+                 G : "ALG_GEBOUW",
+                 V : "ALG_VERDIEPING",
+                 R : "ALG_RUIMTE",
+                 W : "PRS_WERKPLEK",
+                 PW: "PRS_PERSLIDWERKPLEK"}[level];
+
+    sql = "UPDATE " + table
+        + "   SET " + table + "_VERWIJDER = " + "SYSDATE"
+        + " WHERE " + table + "_key IN (" + key + ")";
+
+    result = { success: true};
+    var err = Oracle.Execute(sql, true);
+    if (err.friendlyMsg)
+    {
+        result.message = err.friendlyMsg;
+        result.success = false;
+    }
+
+    Response.Write(JSON.stringify(result));
+%>