diff --git a/APPL/ALG/alg_delete.asp b/APPL/ALG/alg_delete.asp new file mode 100644 index 0000000000..b83164d6c0 --- /dev/null +++ b/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; +%> + + + +<% + // 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)); +%> \ No newline at end of file