<%@language = "javascript" %> <% /* $Revision$ $Id$ File: ins_change_parent.asp Description: Verander het objectsoort Impliciet: ins_deel.ins_deel_parent_key wordt aangepast Expliciet: Parameters: ins_key deel key submitting Mode {0=invoer / 1=opslaan} Context: ins_edit_deel.asp wijzigen object Note: */ %> <% FCLTHeader.Requires({ plugins:["jQuery"] , js: ["../ins/ins_onderdelen.js"] }); var autfunction = "WEB_INSMAN"; var authparams = user.checkAutorisation(autfunction); var ins_key = getQParamInt("ins_key"); // Het te wijzigen object. // Bepaal of het object ook echt gewijzigd kan of mag worden. this_ins = ins.func_enabled_deel(ins_key); user.anything_todo_or_abort(this_ins.canChange); %>
<% FCLTHeader.Generate(); var submitting = getQParamInt("submit", 0) == 1; if (submitting) { protectRequest.validateToken(); var sql = "SELECT CASE WHEN ins_alg_ruimte_key IS NULL THEN 1 ELSE 0 END sameasparent" + " FROM ins_deel" + " WHERE ins_deel_key = " + ins_key; var oRs = Oracle.Execute(sql); var sameasparent = oRs("sameasparent").Value == 1; oRs.Close(); if (sameasparent) { // Vul ook de plaats/eigenaar velden. // Haal deze waarden op. sql = "SELECT ins_alg_ruimte_key" + " , ins_alg_ruimte_type" + " FROM ins_v_deelenonderdeel" + " WHERE ins_deel_key = " + ins_key; var oRs = Oracle.Execute(sql); var ins_alg_ruimte_key_parent = oRs("ins_alg_ruimte_key").Value; var ins_alg_ruimte_type_parent = oRs("ins_alg_ruimte_type").Value; oRs.Close(); } var success = false; var parent_key = getFParamInt("deel_key"); // Nieuw parent object. sql = "UPDATE ins_deel" + " SET ins_deel_parent_key = " + (parent_key > 0? parent_key : "NULL") + (sameasparent ? " , ins_alg_ruimte_key = " + ins_alg_ruimte_key_parent + " , ins_alg_ruimte_type = '" + ins_alg_ruimte_type_parent + "'" : "") + " WHERE ins_deel_key = " + ins_key; Oracle.Execute(sql); %>
<% Response.End; } %>
<% MODAL_START(); %> " method="post" onSubmit="ins_submit();"> <% // Bepaal de discipline, soortgroep en soortdeel van het object. var sql = "SELECT d.ins_deel_parent_key" + " , g.ins_discipline_key" + " , g.ins_srtgroep_key" + " , s.ins_srtdeel_key" + " FROM ins_deel d" + " , ins_deel parent" + " , ins_srtdeel s" + " , ins_srtgroep g" + " WHERE d.ins_deel_parent_key = parent.ins_deel_key" + " AND parent.ins_srtdeel_key = s.ins_srtdeel_key" + " AND s.ins_srtgroep_key = g.ins_srtgroep_key" + " AND d.ins_deel_key = " + ins_key; var oRs = Oracle.Execute(sql); var parent_deel_key = oRs("ins_deel_parent_key").Value; var parent_disc_key = oRs("ins_discipline_key").Value; var parent_srtgroep_key = oRs("ins_srtgroep_key").Value; var parent_srtdeel_key = oRs("ins_srtdeel_key").Value; oRs.Close(); lcl.set_dialect(parent_disc_key, "INS_DISCIPLINE_KEY"); MODAL_BLOCK_START("srtdeelInfo", L("lcl_select_object"), { icon: "fa-file-signature" }); FCLTdisciplineselector("disc", "sgDisc", { label: L("lcl_discipline"), disc_key: parent_disc_key, module: "INS", perslidKey: user_key, autfunctionKey: authparams.autfunctionkey, autRW: "W", onChange: "onChangeDiscipline", required: true }); FCLTsrtgroepselector("srtgroep", "sgSrtgroep", { label: L("lcl_obj_group"), srtgroep_key: parent_srtgroep_key, autfunction: autfunction, onChange: "onChangeSrtgroep", urlAdd: [{urlParam: "disc_key", field: "disc"}], required: true }); FCLTsrtdeelselector("srtdeel", "sgSrtdeel", { label: L("lcl_obj_sort"), srtdeel_key: parent_srtdeel_key, autfunction: autfunction, module: "INS", autfunction: autfunction, onChange: "onChangeSrtdeel", urlAdd: [{urlParam: "srtgroep_key", field: "srtgroep"}, {urlParam: "disc_key", field: "disc"}], required: true }); // Identificatie/Object // LET OP: Onderdelen worden niet getoond in de objectselector (ins_v_aanwezigdeel sluit onderdelen uit). // Dat is ook precies wat we willen. Onderdelen kunnen geen onderdeel zijn/worden van twee objecten. FCLTobjectselector("deel_key", "sgDeel", { label: L("lcl_obj_identification"), objectKey: parent_deel_key, onChange: "onChangeDeel", urlAdd: [{urlParam: "disc_key", field: "disc"}, {urlParam: "srtgroep_key", field: "srtgroep"}, {urlParam: "srtdeel_key", field: "srtdeel"}], autfunction: autfunction, required: true }); MODAL_BLOCK_END(); SIMPLE_BLOCK_START(); CreateButtons([{ title: L("lcl_submit"), action: "ins_submit()", icon: "fa-fclt-save", importance: 1}, { title: L("lcl_delete"), action: "ins_delete()", icon: "fa-trash-alt", importance: 3}, { title: L("lcl_cancel"), action: "ins_cancel()", icon: "fa-fclt-cancel", importance: 3}]); SIMPLE_BLOCK_END(); IFACE.FORM_END(); %> <% MODAL_END(); %>
<% ASPPAGE_END(); %>