<%
- if (!multi)
+ if (groupby == 7 && !multi)
{
BLOCK_START("insFlex2", ""); //block over gehele breedte
%><% // Wrapper div voor dynamisch herladen
diff --git a/APPL/INS/ins_flexkenmerk.inc b/APPL/INS/ins_flexkenmerk.inc
index 293bc8d089..d420401a28 100644
--- a/APPL/INS/ins_flexkenmerk.inc
+++ b/APPL/INS/ins_flexkenmerk.inc
@@ -112,7 +112,7 @@ function generateFlexKenmerkBlock(params)
function isReadonly (volgnummer, oRs)
{ // Zonder WEB_INSMAN of WEB_SLEBOF rechten zijn flexkenmerken met volgnummer <= 100 readonly.
- if (volgnummer <= 100 && ins_key > 0 && ( (!writeman && !writeslebof) && (!this_ins.canChangeAlg && !this_ins.canChangeOwn)) )
+ if (volgnummer <= 100 && ins_key > 0 && ( (!writeman && !writeslebof) && (!this_ins.canChangeAlg && !(this_ins.canChange || this_ins.canChangeOwn))) )
return true;
if (volgnummer >= 900 && lendout && fronto) // Fronto mag uitleenkenmerken altijd bewerken
diff --git a/APPL/INS/ins_inspect_list.inc b/APPL/INS/ins_inspect_list.inc
index 39a23060ce..0d2bc159cf 100644
--- a/APPL/INS/ins_inspect_list.inc
+++ b/APPL/INS/ins_inspect_list.inc
@@ -78,7 +78,7 @@ insp = {
+ " , NULL ins_deelsrtcontrole_key"
+ " , di.ins_srtcontrole_periode periode"
+ " , di.ins_srtcontrole_eenheid eenheid"
- + " , di.ins_srtcontrole_kosten kosten"
+ + " , (COALESCE(di.ins_srtcontrole_kosten, 0) + COALESCE(di.ins_srtcontrole_kosten2, 0) + COALESCE(di.ins_srtcontrole_kosten3, 0)) kosten"
+ " , di.ins_srtcontrole_mode isc_mode"
+ " , NULL plandatum"
+ " , '' ins_deelsrtcontrole_opmerking"
@@ -172,7 +172,7 @@ insp = {
+ " , idsc.ins_deelsrtcontrole_key"
+ " , di.ins_srtcontrole_periode periode"
+ " , di.ins_srtcontrole_eenheid eenheid"
- + " , di.ins_srtcontrole_kosten kosten"
+ + " , (COALESCE(di.ins_srtcontrole_kosten, 0) + COALESCE(di.ins_srtcontrole_kosten2, 0) + COALESCE(di.ins_srtcontrole_kosten3, 0)) kosten"
+ " , di.ins_srtcontrole_mode isc_mode"
+ " , idsc.ins_deelsrtcontrole_plandatum plandatum"
+ " , idsc.ins_deelsrtcontrole_opmerking"
diff --git a/APPL/INS/ins_inspect_save.asp b/APPL/INS/ins_inspect_save.asp
index 98361c4778..169290e1c2 100644
--- a/APPL/INS/ins_inspect_save.asp
+++ b/APPL/INS/ins_inspect_save.asp
@@ -21,6 +21,7 @@ var JSON_Result = true;
+
<%
@@ -38,9 +39,11 @@ var scen_key_arr = getFParamIntArray("scen_key_arr", []);
var savemode = getFParam("savemode");
var finish = getFParamInt("finish", 0) == 1; // Inspectie direct afronden.
+var groupby = getFParamInt("groupby", 7);
var mjob = getFParamInt("mjob", 0) == 1;
+
// Als multi dan moet de ins_deel array even groot zijn als de srtcontrole array en deelsrtcontrole array.
-user.auth_required_or_abort(!multi || (ins_key_arr.length == srtcont_key_arr.length));
+user.auth_required_or_abort(groupby < 7 || !multi || (ins_key_arr.length == srtcont_key_arr.length));
var deelsrtcontrole_datum;
var plandatum, moveyears;
@@ -75,7 +78,7 @@ else if (savemode == "R")
{
Response.Clear();
Response.Write(JSON.stringify({ success: false, savemode: "R", warning: "" }));
- Response.End();
+ Response.End;
}
deelsrtcont_key = getFParamInt("deelsrtcont_key", -1); // Specifieke inspectie die gewijzigd is.
var silent = true;
@@ -86,533 +89,736 @@ var result = {};
var tobehandled = 0;
var ingesloten = [];
var canMsuEdit = false; // Alleen voor het wijzigen van inspectie (insEdit). Er geldt dan altijd !multi.
-// Bepaal de objecten in de selectie die ook echt geinspecteerd kunnen of mogen worden.
-for (var i = 0; i < ins_key_arr.length; i++)
+
+var inflatiepct = S("mjb_inflation");
+var inflatiefactor = 1 + (inflatiepct / 100);
+var mjb_start_year = S("mjb_start_year");
+var mjb_freeze_year = S("mjb_freeze_year");
+
+if (groupby < 7)
{
- var dlsrtcont_key = -1;
- var sql = "SELECT *"
- + " FROM (SELECT xcp.ins_srtcontrole_key"
- + " , idsc.ins_deelsrtcontrole_key"
- + " , (SELECT MAX (idsc2.ins_deelsrtcontrole_datum)"
- + " FROM ins_deelsrtcontrole idsc2"
- + " WHERE idsc2.ins_deel_key = idsc.ins_deel_key"
- + " AND idsc2.ins_srtcontrole_key = idsc.ins_srtcontrole_key"
- + (scen_key_arr.length > 0 && scen_key_arr[i] > 1
- ? " AND idsc2.ins_scenario_key = " + scen_key_arr[i]
- : " AND idsc2.ins_scenario_key = 1")
- + " ) ins_deelsrtcontrole_datum"
- + (deelsrtcont_key > 0
- ? " , idsc.ins_deelsrtcontrole_plandatum"
- : "")
- + " , xcp.ins_srtcontrole_eenheid eenheid"
- + " , xcp.ins_srtcontrole_mode"
- + " , idsc.ins_deelsrtcontrole_status"
- + " , xcp.ins_deel_aanmaak"
- + " , xcp.ctr_discipline_key"
- + " , xcp.ins_srtcontrole_options options"
- + " , cd.ins_discipline_omschrijving"
- + " , xcp.ins_srtcontroledl_xcp_startdat"
- + " , CASE"
- + " WHEN (SELECT COUNT(sdc.ins_deelsrtcontrole_key)"
- + " FROM ins_deelsrtcontrole sdc"
- + " WHERE sdc.ins_deel_key = idsc.ins_deel_key"
- + " AND sdc.ins_srtcontrole_key = idsc.ins_srtcontrole_key"
- + " AND sdc.ins_deelsrtcontrole_status = 6"
- + " AND sdc.ins_scenario_key = 1) > 0"
- + " THEN 1"
- + " ELSE 0"
- + " END hascontroles"
- + " FROM ins_v_defined_inspect_xcp xcp"
- + " , ins_deelsrtcontrole idsc"
- + " , ctr_v_aanwezigdiscipline cd"
- + " WHERE xcp.ins_srtcontrole_key = idsc.ins_srtcontrole_key(+)" // Er kan nog voor de eerste keer geinspecteerd moeten worden.
- + " AND xcp.ctr_discipline_key = cd.ins_discipline_key"
- + " AND xcp.ins_deel_key = " + ins_key_arr[i]
- + " AND idsc.ins_deel_key(+) = " + ins_key_arr[i]
- + " AND xcp.ins_srtcontrole_periode > 0"
- + " AND xcp.ins_srtcontrole_key = " + srtcont_key_arr[i]
- + (deelsrtcont_key > 0
- ? " AND idsc.ins_deelsrtcontrole_key = " + deelsrtcont_key
- : "")
- + (scen_key_arr.length > 0 && scen_key_arr[i] > 1
- ? " AND xcp.ins_scenario_key(+) = " + scen_key_arr[i]
- + " AND idsc.ins_scenario_key(+) = " + scen_key_arr[i]
- : " AND xcp.ins_scenario_key(+) = 1"
- + " AND idsc.ins_scenario_key(+) = 1")
- + " )"
- + " ORDER BY ins_deelsrtcontrole_key DESC";
- var oRs = Oracle.Execute(sql);
- lcl.set_dialect(oRs("ctr_discipline_key").Value, "INS_TAB_DISCIPLINE_KEY");
+ var dist_key = getFParamInt("dist_key", -1); // District
+ var loc_key = getFParamInt("loc_key", -1); // Locatie
+ var bld_key = getFParamInt("bld_key", -1); // Gebouw
+ var disc_key = getFParamInt("disc_key", -1);
+ var srtgroep_key = getFParamInt("srtgroep_key", -1);
+ var srtdeel_key = getFParamInt("srtdeel_key", -1);
+ var groep = getFParam("groep", ""); // Groep
+ var categorie_key = getFParamInt("categorie_key", -1); // Categorie
+ var srtcontrole = getFParamIntArray("srtcontrole", []); // Taak
+ var frequentie = getFParamIntArray("frequentie", []); // Array met frequenties.
+ var incbtw = getFParamInt("incbtw", 0) == 1; // Lijst inclusief BTW weergeven.
+ var deel = getFParam("deel", ""); // Identieficatie
+ var mjbMoved = getFParamInt("mjbMoved", 0) == 1; // Verschoven.
+ var mjbFreezed = getFParamInt("mjbFreezed", 0) == 1; // In behandeling.
+ var mjbXcped = getFParamInt("mjbXcped", 0) == 1; // Aangepast.
- // Waarden moeten aanwezig zijn. Mocht dat niet zo zijn dan is er iets fout.
- var ins_srtcontrole_mode = oRs("ins_srtcontrole_mode").Value;
- var ins_deelsrtcontrole_status = oRs("ins_deelsrtcontrole_status").Value != null? oRs("ins_deelsrtcontrole_status").Value : -1; // Als er nog geen inspectie is geweest is de status -1.
- var ins_deel_aanmaak = new Date(oRs("ins_deel_aanmaak").Value);
- var eenheid = oRs("eenheid").Value;
- var ins_deelsrtcontrole_datum_max = oRs("ins_deelsrtcontrole_datum").Value;
- var ins_deelsrtcontrole_key = oRs("ins_deelsrtcontrole_key").Value;
- var isc_options = oRs("options").Value;
- var disc_oms = oRs("ins_discipline_omschrijving").Value;
- var deelsrtcontrole_plandatum = (deelsrtcont_key > 0 ? oRs("ins_deelsrtcontrole_plandatum").Value : -1);
- var ins_startdatum = oRs("ins_srtcontroledl_xcp_startdat").Value != null? new Date(oRs("ins_srtcontroledl_xcp_startdat").Value) : -1;
- var hascontroles = oRs("hascontroles").Value == 1;
+ var sel_controlemode123 = [];
+ var sel_controlemode1 = getFParamIntArray("sel_controlemode1", -1); // Taakafhandeling 1.
+ var sel_controlemode2 = getFParamIntArray("sel_controlemode2", -1); // Taakafhandeling 2.
+ var sel_controlemode3 = getFParamIntArray("sel_controlemode3", -1); // Taakafhandeling 3.
+ if (sel_controlemode1 > 0)
+ sel_controlemode123.push(sel_controlemode1);
+ if (sel_controlemode2 > 0)
+ sel_controlemode123.push(sel_controlemode2);
+ if (sel_controlemode3 > 0)
+ sel_controlemode123.push(sel_controlemode3);
- var this_ins = ins.func_enabled_deel(ins_key_arr[i],
- {srtcont_key: srtcont_key_arr[i],
- deelsrtcont_key: (ins_deelsrtcontrole_key != null? ins_deelsrtcontrole_key : -1),
- scen_key: (scen_key_arr.length > 0? scen_key_arr[i] : 1)
- });
- canMsuEdit = savemode == "E" && this_ins.canMsuEdit;
- oRs.Close();
+ var opmerk = getFParam("opmerk", ""); // Opmerking.
- if (savemode == "R")
+ // Start building the query to fetch all objects satisfying
+ var mjbparams = { scenario: 1,
+ fulldetails: true,
+ toyear: mjb_freeze_year,
+ jaren: [mjb_freeze_year],
+ //actsit: actsit,
+ keys: ins_key_arr,
+ niveau: groupby, // Het niveau (betekenis) van de keys (district(1), gebouw(2), discipline(3), groep(4), objectsoort(5), object(6))
+ dist_key: dist_key,
+ loc_key: loc_key,
+ bld_key: bld_key,
+ disc_key: disc_key,
+ srtgroep_key: srtgroep_key,
+ srtdeel_key: srtdeel_key,
+ groep: groep,
+ categorie_key: categorie_key,
+ srtcontrole: srtcontrole,
+ frequentie: frequentie,
+ incbtw: incbtw,
+ deel: deel,
+ mjbMoved: mjbMoved,
+ mjbFreezed: mjbFreezed,
+ mjbXcped: mjbXcped,
+ groupby: 7, // Ik wil alle objecten opvragen.
+ sel_controlemode123: sel_controlemode123,
+ finish: true
+ };
+
+ var mjblist_sql = ins.getmjblist_sql(mjbparams);
+ // De mjblist_sql bevat nu alle objecten (ins_deel_key) van de aangevinkte regels uit het mjb overzicht en levert voor elk object de waarden voor de insert op.
+
+ var result = { success: true, deelsrtcontrole_datum: deelsrtcontrole_datum, savemode: savemode, warning: "" };
+
+ var oRs = Oracle.Execute(mjblist_sql);
+ user.anything_todo_or_abort(!oRs.eof); // We klagen niet over enkele wel en enkele niet
+
+ var dlsrtcont_key_array = [];
+ var trackarray = [];
+ var update_sql = "BEGIN ";
+ while (!oRs.eof)
{
- var minyear = S("mjb_freeze_year") || (new Date()).getFullYear();
- if (ins_deelsrtcontrole_status == 0) // Er is nog geen inspectie geweest.
+ var ins_key = oRs("ins_deel_key").Value;
+ var srtcont_key = oRs("ins_srtcontrole_key").Value;
+ var dlsrtcont_key = oRs("ins_deelsrtcontrole_key").Value;
+ var sctype = oRs("ctr_controle_type").Value;
+ var nextdate = new Date(oRs("nextdate").Value);
+ var cm_oms = oRs("cm_oms").Value;
+ var ctr_disc_oms = oRs("ctr_disc_oms").Value;
+ var dlsrtcont_opm = oRs("ins_deelsrtcontrole_opmerking").Value;
+ var sel_controlemode;
+ var dlsrtcontr_trackarray = [];
+ switch(sctype)
{
- if (deelsrtcontrole_plandatum != -1)
- plandatum = new Date(deelsrtcontrole_plandatum);
- else
- continue;
- savemode = "E"; // bestaat al dus 'edit'
+ case 1: sel_controlemode = sel_controlemode1; break;
+ case 2: sel_controlemode = sel_controlemode2; break;
+ case 3: sel_controlemode = sel_controlemode3; break;
}
- else
- {
- sql = "SELECT ins.nextcyclusdate (" + ins_key_arr[i] + ", " + srtcont_key_arr[i] + ", 1) nextdate FROM DUAL";
- oRs_nextdate = Oracle.Execute(sql);
- plandatum = new Date(oRs_nextdate("nextdate").Value);
- oRs_nextdate.Close();
+ var nextdate = oRs("nextdate").Value != null? new Date(oRs("nextdate").Value) : null;
- if (ins_deelsrtcontrole_status == -1)
- {
- var aanmaakyear = ins_deel_aanmaak.getFullYear();
- minyear = Math.max(minyear, aanmaakyear);
- }
- else if (ins_deelsrtcontrole_status == 5 || ins_deelsrtcontrole_status == 6)
- {
- var lastinsdate = new Date(ins_deelsrtcontrole_datum_max);
- var lastinsyear = lastinsdate.getFullYear();
- minyear = Math.max(minyear, lastinsyear);
- }
- else // ins_deelsrtcontrole_status == 2
- continue;
+ update_sql += "UPDATE ins_deelsrtcontrole"
+ + " SET ins_deelsrtcontrole_opmerking = " + safe.quoted_sql((dlsrtcont_opm != ""? dlsrtcont_opm + "\n" : "") + opmerk)
+ + " , prs_perslid_key = " + user_key
+ + " , ins_deelsrtcontrole_datum = SYSDATE"
+ + " , ins_deelsrtcontrole_datum_org = " + nextdate.toSQL(true)
+ + " , ins_controlemode_key = " + sel_controlemode
+ + " WHERE ins_deelsrtcontrole_key = " + dlsrtcont_key
+ + ";";
+ if (opmerk != "")
+ dlsrtcontr_trackarray.push(L("lcl_remark") + ": " + (dlsrtcont_opm != ""? dlsrtcont_opm : L("lcl_trackfromempty")) + L("lcl_trackto") + (dlsrtcont_opm != ""? dlsrtcont_opm + "\n" : "") + opmerk);
+ dlsrtcontr_trackarray.push(L("lcl_ins_controle_datum") + ": " + L("lcl_trackfromempty") + L("lcl_trackto") + toDateTimeString(new Date()));
+ dlsrtcontr_trackarray.push(L("lcl_ins_controle_mode") + ": " + L("lcl_trackfromempty") + L("lcl_trackto") + cm_oms);
- savemode = "P"; // moet nog ingepland worden
- }
- var newyear = plandatum.getFullYear() + moveyears;
- if (moveyears === 0 || newyear < minyear)
- continue;
+ dlsrtcont_key_array.push(dlsrtcont_key);
+ trackarray.push(dlsrtcontr_trackarray)
- plandatum = new Date(newyear, 11, 31);
+ oRs.MoveNext();
}
- // Inplannen (dlsrtcont_key = -1).
- // Het is de eerste inspectie of de laatste inspectie moet verwerkt(6) zijn, anders kan de inspectie niet ingepland worden.
+ update_sql += " END;"
- // Het planjaar moet na het startjaar ligggen.
- // Als er al een inspectie is geweest dan niet meer naar startdatum kijken.
- // Als er nog geen inspectie is geweest en er is een startdatum ingevuld, dan moet de plandatum verwijderd worden afhankelijk van mjob.
- // Voor mjob = false: als de plandatum eerder is als de startdatum (kan eigenlijk niet ingevoerd worden in edit scherm).
- // mjob = true: als de plandatum in hetzelfde jaar of eerder is als de startdatum.
- if (savemode == "P" && !(this_ins.canInspPlan || this_ins.canInspPlanMjb)) // Inplannen.
- { // Ik heb geen Plan (inplannen) rechten of er was al een planrecord.
- if (ins_deelsrtcontrole_status == 0 && !multi)
- savemode = "E";
- else
- continue;
+ var err = Oracle.Execute(update_sql, true);
+ if (err.friendlyMsg)
+ result.message = err.friendlyMsg;
+
+ for (var i = 0; i < dlsrtcont_key_array.length; i++)
+ {
+ // Nu nog de status zetten, tracking genereren en notificaties sturen.
+ ins.setinspectstatus(dlsrtcont_key_array[i], 6); // History/Verwerkt(6).
+
+ ins.trackinspectupdate(dlsrtcont_key_array[i], L("lcl_ins_controle_is_upd").format(ctr_disc_oms) + "\n" + trackarray[i].join("\n"));
}
- else if (savemode == "P" && !hascontroles && ins_startdatum != -1)
- { // Eerste controle en er is een startdatum ingevuld.
- if ((mjob && plandatum.getFullYear() <= ins_startdatum.getFullYear()) || (!mjob && plandatum.getTime() <= ins_startdatum.getTime()))
- continue; // Plandatum is gelijk voor de startdatum. Plandatum niet opslaan.
- }
-
-
- if (savemode == "C") // Afmelden/Afronden.
- { // Is er op de inspectiedatum of op het inspectieuur al geinspecteerd voor dit object en het objectsoort?
- // Voor niet multi is dit al gecontroleerd in ins_edit_inspect.asp. Hier voor de veiligheid opnieuw controleren is niet verkeerd.
- var deelsrtcontrole_midnighttime = deelsrtcontrole_datum.midnight().getTime();
- var deelsrtcontrole_hourtime = deelsrtcontrole_datum; // deelsrtcontrole_datum moet niet worden aangepast door setMinutes(0,0,0).
- var deelsrtcontrole_hourtime = new Date(new Date(parseInt(deelsrtcontrole_hourtime.getTime())).setMinutes(0,0,0)).getTime();
- // Controle of er op de inspectiedatum of op het inspectieuur al inspecties zijn geweest
- // TODO: Wat te doen met extra inspecties. En per week/maand/jaar enz.
- if ((eenheid > 0) && ins_srtcontrole_mode == 0 && // Geldt alleen voor momentmodus.
- (deelsrtcontrole_midnighttime == new Date(ins_deelsrtcontrole_datum_max).midnight().getTime()))
- { // Op dezelfde dag mag niet. Overslaan.
- continue;
- }
- else if ((eenheid == 0) && ins_srtcontrole_mode == 0 && // Geldt alleen voor momentmodus.
- (deelsrtcontrole_hourtime == new Date(new Date(ins_deelsrtcontrole_datum_max).setMinutes(0,0,0)).getTime()))
- { // In dezelfde minuut (tijdstip) mag niet. Overslaan.
- continue;
- }
- else if (new Date(deelsrtcontrole_datum.setSeconds(0, 0)).getTime() == new Date(new Date(ins_deelsrtcontrole_datum_max)).getTime() &&
- ins_srtcontrole_mode == 1)
- { // Een inspectie doen op dezelfde datumtijd (controledatum hetzelfde) mag niet omdat je daarna dan niet meer de volgende inspectie kunt doen.
- // De geplande _org tijd is dan hetzelfde als de laatste inspectie omdat de volgende inspectie dan niet opgeschoven is.
- // Inspecties op dezelfde datumtijd moeten dus afgevangen worden.
- // Dit kan alleen voorkomen in de interval mode.
- continue;
- }
-
- if (!this_ins.canInspClose && !(this_ins.canInspFinish || this_ins.canInspFinishMjb))
- { // Ik heb geen Close (gereedmelden/afronden) rechten of laatste inspectie is niet verwerkt (dan moet ins_inspect_finish.asp aangeroepen worden). Overslaan.
- continue;
- }
- else if (ins_deelsrtcontrole_status >= 0 && ins_deelsrtcontrole_status != 6)
- dlsrtcont_key = ins_deelsrtcontrole_key;
- }
-
- if (savemode == "E") // Wijzigen.
- { // Dit is al gecontroleerd in ins_edit_inspect.asp. Hier voor de veiligheid opnieuw controleren is niet verkeerd.
- if (!this_ins.canInspEdit)
- { // Ik heb geen Edit rechten.
- continue;
- }
- else
- dlsrtcont_key = ins_deelsrtcontrole_key;
-
- // De uitvoerdatum/inspectiedatum moet vallen tussen de uitvoerdatum/inspectiedatum van de vorige en volgende inspectie.
- // De edit mode zorgt ervoor dat er alleen juiste inspectiedatums gekozen kunnen worden, maar het is goed dat het hier ook nog getest wordt.
- var aanmaakdatum = ins_deel_aanmaak;
- var minDate = new Date();
- var maxDate = new Date();
- if (ins_deelsrtcontrole_status >= 5 && getDeelsrtcontroleDate)
- {
- // Vooralsnog kan inspectiedatum niet aangepast worden als de eenheid uren(0) is (readonly).
- sql = "SELECT MAX(idsc.ins_deelsrtcontrole_datum) lastinspectdatum"
- + " , MAX(idsc.ins_deelsrtcontrole_datum + 1) dag_na_lastinspectdatum"
- + " , CASE"
- + " WHEN COALESCE(xcp.ins_srtcontroledl_xcp_eenheid, isc.ins_srtcontrole_eenheid) != 0" // Geen tijd eenheid maar dag, maand of jaar.
- + " THEN 1" // Dag, maand of jaar.
- + " ELSE 0" // Tijd.
- + " END dmj_eenheid"
- + " , isc.ins_srtcontrole_mode"
- + " FROM ins_deelsrtcontrole idsc"
- + " , ins_srtcontrole isc"
- + " , ins_srtcontroledl_xcp xcp"
- + " WHERE idsc.ins_srtcontrole_key = isc.ins_srtcontrole_key"
- + " AND idsc.ins_srtcontrole_key = xcp.ins_srtcontrole_key(+)"
- + " AND idsc.ins_deel_key = xcp.ins_deel_key(+)"
- + " AND COALESCE(xcp.ins_srtcontroledl_xcp_periode, isc.ins_srtcontrole_periode) > 0"
- + " AND idsc.ins_deel_key IN (" + ins_key_arr[i] + ")"
- + " AND idsc.ins_srtcontrole_key IN (" + srtcont_key_arr[i] + ")"
- + " AND ins_deelsrtcontrole_key < " + dlsrtcont_key
- + " AND idsc.ins_scenario_key = 1" // Status >= 0 dus kan geen scenario zijn.
- + " AND xcp.ins_scenario_key(+) = 1" // Status >= 0 dus kan geen scenario zijn.
- + " GROUP BY isc.ins_srtcontrole_mode"
- + " , xcp.ins_srtcontroledl_xcp_eenheid"
- + " , isc.ins_srtcontrole_eenheid";
- var oRs = Oracle.Execute(sql);
- if (!oRs.eof && oRs("lastinspectdatum").Value != null)
- {
- lastinspectdatum = new Date(oRs("lastinspectdatum").Value); // Kan uiterlijk vandaag zijn.
- dag_na_lastinspectdatum = new Date(oRs("dag_na_lastinspectdatum").Value); // Kan uiterlijk morgen zijn.
- dmj_eenheid = oRs("dmj_eenheid").Value;
- mode = oRs("ins_srtcontrole_mode").Value;
- if (mode == 0)
- // Momentmode.
- minDate = dmj_eenheid == 1? new Date(dag_na_lastinspectdatum.midnight()) : lastinspectdatum;
- else
- // Intervalmode.
- minDate = lastinspectdatum;
- }
- else
- minDate = aanmaakdatum;
-
- // Vooralsnog kan inspectiedatum niet aangepast worden als de eenheid uren(0) is (readonly).
- sql = "SELECT MIN(COALESCE(idsc.ins_deelsrtcontrole_datum, ins_deelsrtcontrole_plandatum)) firstinspectdatum"
- + " , MIN(COALESCE(idsc.ins_deelsrtcontrole_datum, ins_deelsrtcontrole_plandatum) - 1) dag_voor_firstinspectdatum"
- + " , CASE"
- + " WHEN COALESCE(xcp.ins_srtcontroledl_xcp_eenheid, isc.ins_srtcontrole_eenheid) != 0" // Geen tijd eenheid maar dag, maand of jaar.
- + " THEN 1" // Dag, maand of jaar.
- + " ELSE 0" // Tijd.
- + " END dmj_eenheid"
- + " , isc.ins_srtcontrole_mode"
- + " FROM ins_deelsrtcontrole idsc"
- + " , ins_srtcontrole isc"
- + " , ins_srtcontroledl_xcp xcp"
- + " WHERE idsc.ins_srtcontrole_key = isc.ins_srtcontrole_key"
- + " AND idsc.ins_srtcontrole_key = xcp.ins_srtcontrole_key(+)"
- + " AND idsc.ins_deel_key = xcp.ins_deel_key(+)"
- + " AND COALESCE(xcp.ins_srtcontroledl_xcp_periode, isc.ins_srtcontrole_periode) > 0"
- + " AND idsc.ins_deel_key IN (" + ins_key_arr[i] + ")"
- + " AND idsc.ins_srtcontrole_key IN (" + srtcont_key_arr[i] + ")"
- + " AND ins_deelsrtcontrole_key > " + dlsrtcont_key
- + " AND idsc.ins_scenario_key = 1" // Status >= 0 dus kan geen scenario zijn.
- + " AND xcp.ins_scenario_key(+) = 1" // Status >= 0 dus kan geen scenario zijn.
- + " GROUP BY isc.ins_srtcontrole_mode"
- + " , xcp.ins_srtcontroledl_xcp_eenheid"
- + " , isc.ins_srtcontrole_eenheid";
- oRs = Oracle.Execute(sql);
- if (!oRs.eof)
- {
- firstinspectdatum = new Date(oRs("firstinspectdatum").Value); // Kan uiterlijk vandaag zijn.
- dag_voor_firstinspectdatum = new Date(oRs("dag_voor_firstinspectdatum").Value); // Kan uiterlijk morgen zijn.
- dmj_eenheid = oRs("dmj_eenheid").Value;
- mode = oRs("ins_srtcontrole_mode").Value;
- if (mode == 0)
- // Momentmode.
- maxDate = dmj_eenheid == 1? new Date(dag_voor_firstinspectdatum.setHours(23,59,59,99)) : firstinspectdatum;
- else
- // Intervalmode.
- maxDate = firstinspectdatum;
- }
- //else //maxDate = new Date();
- oRs.Close();
-
- // Huidige inspectie moet tussen voorgaande en volgende inspectie inliggen.
- if (deelsrtcontrole_datum.getTime() <= minDate.getTime() || deelsrtcontrole_datum.getTime() >= maxDate.getTime())
- { // De uitvoerdatum/inspectiedatum valt niet tussen de uitvoerdatum/inspectiedatum van de vorige en volgende inspectie.
- continue;
- }
- }
- }
-
- ingesloten.push({ins_key: ins_key_arr[i], srtcont_key: srtcont_key_arr[i], dlsrtcont_key: dlsrtcont_key, scen_key: (scen_key_arr.length > 0? scen_key_arr[i] : 1),
- inspectiemode: ins_srtcontrole_mode, inspectiestatus: ins_deelsrtcontrole_status, ins_deel_aanmaak: ins_deel_aanmaak,
- disc_oms: disc_oms, startdatum: ins_startdatum, hascontroles: hascontroles});
- tobehandled++;
-}
-
-if (tobehandled == 0 && silent)
-{
- Response.Clear();
- Response.Write(JSON.stringify({ success: false, savemode: savemode, warning: "" }));
- Response.End();
}
else
- user.anything_todo_or_abort(tobehandled > 0); // We klagen niet over enkele wel en enkele niet
-
-function saveFlexKenmerkenInspection(pdlsrtcont_key, pinsPresent, pdelete)
{
- // HIER WORDEN DE SAVEFLEXKENMERKEN GEREGELD
- if (pdelete)
- currentKenmerkenSQL = "SELECT 1 FROM DUAL WHERE 1 = 0"; // Geen flexkenmerken opslaan en alle waarden verwijderen.
- else
- currentKenmerkenSQL = " SELECT kd.ins_kenmerk_key"
- + " , kd.ins_kmdeelsrtcontr_waarde"
- + " FROM ins_kmdeelsrtcontr kd"
- + " , ins_kenmerk k"
- + " WHERE kd.ins_kenmerk_key = k.ins_kenmerk_key"
- + " AND kd.ins_kmdeelsrtcontr_verwijder IS NULL"
- + " AND kd.ins_deelsrtcontrole_key = " + pdlsrtcont_key;
-
- var ftrack = saveFlexKenmerken( pdlsrtcont_key
- , { kenmerkTable: "ins_kmdeelsrtcontr"
- , kenmerkParentKey : "ins_deelsrtcontrole_key"
- , kenmerkWaarde: "ins_kmdeelsrtcontr_waarde"
- , kenmerkKey: "ins_kenmerk_key"
- , currentKenmerkenSQL: currentKenmerkenSQL
- , requestQF: Request.Form
- , isNew: !pinsPresent
- , flexPath: "INS/I"
- , module: "INS"
- }
- );
- return ftrack;
-}
-
-
-if (savemode == "P")
-{ // Inplannen inspectie. Er is nog geen inspectierecord aanwezig.
- var result = { success: true, plandatum: plandatum, savemode: savemode, warning: "" };
-
- if (ingesloten.length == 1)
- { // Vindt het ins_srtcontrole_type.
- var sql = "SELECT ctr_disc_params_controle_type"
- + " FROM ins_srtcontrole isc,"
- + " ctr_disc_params cdp"
- + " WHERE ins_srtcontrole_key = " + ingesloten[0].srtcont_key
- + " AND isc.ctr_discipline_key = cdp.ctr_ins_discipline_key";
+ // Bepaal de objecten in de selectie die ook echt geinspecteerd kunnen of mogen worden.
+ for (var i = 0; i < ins_key_arr.length; i++)
+ {
+ var dlsrtcont_key = -1;
+ var sql = "SELECT *"
+ + " FROM (SELECT xcp.ins_srtcontrole_key"
+ + " , idsc.ins_deelsrtcontrole_key"
+ + " , (SELECT MAX (idsc2.ins_deelsrtcontrole_datum)"
+ + " FROM ins_deelsrtcontrole idsc2"
+ + " WHERE idsc2.ins_deel_key = idsc.ins_deel_key"
+ + " AND idsc2.ins_srtcontrole_key = idsc.ins_srtcontrole_key"
+ + (scen_key_arr.length > 0 && scen_key_arr[i] > 1
+ ? " AND idsc2.ins_scenario_key = " + scen_key_arr[i]
+ : " AND idsc2.ins_scenario_key = 1")
+ + " ) ins_deelsrtcontrole_datum"
+ + (deelsrtcont_key > 0
+ ? " , idsc.ins_deelsrtcontrole_plandatum"
+ : "")
+ + " , xcp.ins_srtcontrole_eenheid eenheid"
+ + " , xcp.ins_srtcontrole_mode"
+ + " , idsc.ins_deelsrtcontrole_status"
+ + " , xcp.ins_deel_aanmaak"
+ + " , xcp.ctr_discipline_key"
+ + " , xcp.ins_srtcontrole_options options"
+ + " , cd.ins_discipline_omschrijving"
+ + " , xcp.ins_srtcontroledl_xcp_startdat"
+ + " , CASE"
+ + " WHEN (SELECT COUNT(sdc.ins_deelsrtcontrole_key)"
+ + " FROM ins_deelsrtcontrole sdc"
+ + " WHERE sdc.ins_deel_key = idsc.ins_deel_key"
+ + " AND sdc.ins_srtcontrole_key = idsc.ins_srtcontrole_key"
+ + " AND sdc.ins_deelsrtcontrole_status = 6"
+ + " AND sdc.ins_scenario_key = 1) > 0"
+ + " THEN 1"
+ + " ELSE 0"
+ + " END hascontroles"
+ + " FROM ins_v_defined_inspect_xcp xcp"
+ + " , ins_deelsrtcontrole idsc"
+ + " , ctr_v_aanwezigdiscipline cd"
+ + " WHERE xcp.ins_srtcontrole_key = idsc.ins_srtcontrole_key(+)" // Er kan nog voor de eerste keer geinspecteerd moeten worden.
+ + " AND xcp.ctr_discipline_key = cd.ins_discipline_key"
+ + " AND xcp.ins_deel_key = " + ins_key_arr[i]
+ + " AND idsc.ins_deel_key(+) = " + ins_key_arr[i]
+ + " AND xcp.ins_srtcontrole_periode > 0"
+ + " AND xcp.ins_srtcontrole_key = " + srtcont_key_arr[i]
+ + (deelsrtcont_key > 0
+ ? " AND idsc.ins_deelsrtcontrole_key = " + deelsrtcont_key
+ : "")
+ + (scen_key_arr.length > 0 && scen_key_arr[i] > 1
+ ? " AND xcp.ins_scenario_key(+) = " + scen_key_arr[i]
+ + " AND idsc.ins_scenario_key(+) = " + scen_key_arr[i]
+ : " AND xcp.ins_scenario_key(+) = 1"
+ + " AND idsc.ins_scenario_key(+) = 1")
+ + " )"
+ + " ORDER BY ins_deelsrtcontrole_key DESC";
var oRs = Oracle.Execute(sql);
- result.srtcontrole_type = oRs("ctr_disc_params_controle_type").Value;
+ lcl.set_dialect(oRs("ctr_discipline_key").Value, "INS_TAB_DISCIPLINE_KEY");
+ // Waarden moeten aanwezig zijn. Mocht dat niet zo zijn dan is er iets fout.
+ var ins_srtcontrole_mode = oRs("ins_srtcontrole_mode").Value;
+ var ins_deelsrtcontrole_status = oRs("ins_deelsrtcontrole_status").Value != null? oRs("ins_deelsrtcontrole_status").Value : -1; // Als er nog geen inspectie is geweest is de status -1.
+ var ins_deel_aanmaak = new Date(oRs("ins_deel_aanmaak").Value);
+ var eenheid = oRs("eenheid").Value;
+ var ins_deelsrtcontrole_datum_max = oRs("ins_deelsrtcontrole_datum").Value;
+ var ins_deelsrtcontrole_key = oRs("ins_deelsrtcontrole_key").Value;
+ var isc_options = oRs("options").Value;
+ var disc_oms = oRs("ins_discipline_omschrijving").Value;
+ var deelsrtcontrole_plandatum = (deelsrtcont_key > 0 ? oRs("ins_deelsrtcontrole_plandatum").Value : -1);
+ var ins_startdatum = oRs("ins_srtcontroledl_xcp_startdat").Value != null? new Date(oRs("ins_srtcontroledl_xcp_startdat").Value) : -1;
+ var hascontroles = oRs("hascontroles").Value == 1;
+
+ var this_ins = ins.func_enabled_deel(ins_key_arr[i],
+ {srtcont_key: srtcont_key_arr[i],
+ deelsrtcont_key: (ins_deelsrtcontrole_key != null? ins_deelsrtcontrole_key : -1),
+ scen_key: (scen_key_arr.length > 0? scen_key_arr[i] : 1)
+ });
+ canMsuEdit = savemode == "E" && this_ins.canMsuEdit;
oRs.Close();
+
+ if (savemode == "R")
+ {
+ var minyear = S("mjb_freeze_year") || (new Date()).getFullYear();
+ if (ins_deelsrtcontrole_status == 0) // Er is nog geen inspectie geweest.
+ {
+ if (deelsrtcontrole_plandatum != -1)
+ plandatum = new Date(deelsrtcontrole_plandatum);
+ else
+ continue;
+ savemode = "E"; // bestaat al dus 'edit'
+ }
+ else
+ {
+ sql = "SELECT ins.nextcyclusdate (" + ins_key_arr[i] + ", " + srtcont_key_arr[i] + ", 1) nextdate FROM DUAL";
+ oRs_nextdate = Oracle.Execute(sql);
+ plandatum = new Date(oRs_nextdate("nextdate").Value);
+ oRs_nextdate.Close();
+
+ if (ins_deelsrtcontrole_status == -1)
+ {
+ var aanmaakyear = ins_deel_aanmaak.getFullYear();
+ minyear = Math.max(minyear, aanmaakyear);
+ }
+ else if (ins_deelsrtcontrole_status == 5 || ins_deelsrtcontrole_status == 6)
+ {
+ var lastinsdate = new Date(ins_deelsrtcontrole_datum_max);
+ var lastinsyear = lastinsdate.getFullYear();
+ minyear = Math.max(minyear, lastinsyear);
+ }
+ else // ins_deelsrtcontrole_status == 2
+ continue;
+
+ savemode = "P"; // moet nog ingepland worden
+ }
+ var newyear = plandatum.getFullYear() + moveyears;
+ if (moveyears === 0 || newyear < minyear)
+ continue;
+
+ plandatum = new Date(newyear, 11, 31);
+ }
+
+ // Inplannen (dlsrtcont_key = -1).
+ // Het is de eerste inspectie of de laatste inspectie moet verwerkt(6) zijn, anders kan de inspectie niet ingepland worden.
+
+ // Het planjaar moet na het startjaar ligggen.
+ // Als er al een inspectie is geweest dan niet meer naar startdatum kijken.
+ // Als er nog geen inspectie is geweest en er is een startdatum ingevuld, dan moet de plandatum verwijderd worden afhankelijk van mjob.
+ // Voor mjob = false: als de plandatum eerder is als de startdatum (kan eigenlijk niet ingevoerd worden in edit scherm).
+ // mjob = true: als de plandatum in hetzelfde jaar of eerder is als de startdatum.
+ if (savemode == "P" && !(this_ins.canInspPlan || this_ins.canInspPlanMjb)) // Inplannen.
+ { // Ik heb geen Plan (inplannen) rechten of er was al een planrecord.
+ if (ins_deelsrtcontrole_status == 0 && !multi)
+ savemode = "E";
+ else
+ continue;
+ }
+ else if (savemode == "P" && !hascontroles && ins_startdatum != -1)
+ { // Eerste controle en er is een startdatum ingevuld.
+ if ((mjob && plandatum.getFullYear() <= ins_startdatum.getFullYear()) || (!mjob && plandatum.getTime() <= ins_startdatum.getTime()))
+ continue; // Plandatum is gelijk voor de startdatum. Plandatum niet opslaan.
+ }
+
+
+ if (savemode == "C") // Afmelden/Afronden.
+ { // Is er op de inspectiedatum of op het inspectieuur al geinspecteerd voor dit object en het objectsoort?
+ // Voor niet multi is dit al gecontroleerd in ins_edit_inspect.asp. Hier voor de veiligheid opnieuw controleren is niet verkeerd.
+ var deelsrtcontrole_midnighttime = deelsrtcontrole_datum.midnight().getTime();
+ var deelsrtcontrole_hourtime = deelsrtcontrole_datum; // deelsrtcontrole_datum moet niet worden aangepast door setMinutes(0,0,0).
+ var deelsrtcontrole_hourtime = new Date(new Date(parseInt(deelsrtcontrole_hourtime.getTime())).setMinutes(0,0,0)).getTime();
+ // Controle of er op de inspectiedatum of op het inspectieuur al inspecties zijn geweest
+ // TODO: Wat te doen met extra inspecties. En per week/maand/jaar enz.
+ if ((eenheid > 0) && ins_srtcontrole_mode == 0 && // Geldt alleen voor momentmodus.
+ (deelsrtcontrole_midnighttime == new Date(ins_deelsrtcontrole_datum_max).midnight().getTime()))
+ { // Op dezelfde dag mag niet. Overslaan.
+ continue;
+ }
+ else if ((eenheid == 0) && ins_srtcontrole_mode == 0 && // Geldt alleen voor momentmodus.
+ (deelsrtcontrole_hourtime == new Date(new Date(ins_deelsrtcontrole_datum_max).setMinutes(0,0,0)).getTime()))
+ { // In dezelfde minuut (tijdstip) mag niet. Overslaan.
+ continue;
+ }
+ else if (new Date(deelsrtcontrole_datum.setSeconds(0, 0)).getTime() == new Date(new Date(ins_deelsrtcontrole_datum_max)).getTime() &&
+ ins_srtcontrole_mode == 1)
+ { // Een inspectie doen op dezelfde datumtijd (controledatum hetzelfde) mag niet omdat je daarna dan niet meer de volgende inspectie kunt doen.
+ // De geplande _org tijd is dan hetzelfde als de laatste inspectie omdat de volgende inspectie dan niet opgeschoven is.
+ // Inspecties op dezelfde datumtijd moeten dus afgevangen worden.
+ // Dit kan alleen voorkomen in de interval mode.
+ continue;
+ }
+
+ if (!this_ins.canInspClose && !(this_ins.canInspFinish || this_ins.canInspFinishMjb))
+ { // Ik heb geen Close (gereedmelden/afronden) rechten of laatste inspectie is niet verwerkt (dan moet ins_inspect_finish.asp aangeroepen worden). Overslaan.
+ continue;
+ }
+ else if (ins_deelsrtcontrole_status >= 0 && ins_deelsrtcontrole_status != 6)
+ dlsrtcont_key = ins_deelsrtcontrole_key;
+ }
+
+ if (savemode == "E") // Wijzigen.
+ { // Dit is al gecontroleerd in ins_edit_inspect.asp. Hier voor de veiligheid opnieuw controleren is niet verkeerd.
+ if (!this_ins.canInspEdit)
+ { // Ik heb geen Edit rechten.
+ continue;
+ }
+ else
+ dlsrtcont_key = ins_deelsrtcontrole_key;
+
+ // De uitvoerdatum/inspectiedatum moet vallen tussen de uitvoerdatum/inspectiedatum van de vorige en volgende inspectie.
+ // De edit mode zorgt ervoor dat er alleen juiste inspectiedatums gekozen kunnen worden, maar het is goed dat het hier ook nog getest wordt.
+ var aanmaakdatum = ins_deel_aanmaak;
+ var minDate = new Date();
+ var maxDate = new Date();
+ if (ins_deelsrtcontrole_status >= 5 && getDeelsrtcontroleDate)
+ {
+ // Vooralsnog kan inspectiedatum niet aangepast worden als de eenheid uren(0) is (readonly).
+ sql = "SELECT MAX(idsc.ins_deelsrtcontrole_datum) lastinspectdatum"
+ + " , MAX(idsc.ins_deelsrtcontrole_datum + 1) dag_na_lastinspectdatum"
+ + " , CASE"
+ + " WHEN COALESCE(xcp.ins_srtcontroledl_xcp_eenheid, isc.ins_srtcontrole_eenheid) != 0" // Geen tijd eenheid maar dag, maand of jaar.
+ + " THEN 1" // Dag, maand of jaar.
+ + " ELSE 0" // Tijd.
+ + " END dmj_eenheid"
+ + " , isc.ins_srtcontrole_mode"
+ + " FROM ins_deelsrtcontrole idsc"
+ + " , ins_srtcontrole isc"
+ + " , ins_srtcontroledl_xcp xcp"
+ + " WHERE idsc.ins_srtcontrole_key = isc.ins_srtcontrole_key"
+ + " AND idsc.ins_srtcontrole_key = xcp.ins_srtcontrole_key(+)"
+ + " AND idsc.ins_deel_key = xcp.ins_deel_key(+)"
+ + " AND COALESCE(xcp.ins_srtcontroledl_xcp_periode, isc.ins_srtcontrole_periode) > 0"
+ + " AND idsc.ins_deel_key IN (" + ins_key_arr[i] + ")"
+ + " AND idsc.ins_srtcontrole_key IN (" + srtcont_key_arr[i] + ")"
+ + " AND ins_deelsrtcontrole_key < " + dlsrtcont_key
+ + " AND idsc.ins_scenario_key = 1" // Status >= 0 dus kan geen scenario zijn.
+ + " AND xcp.ins_scenario_key(+) = 1" // Status >= 0 dus kan geen scenario zijn.
+ + " GROUP BY isc.ins_srtcontrole_mode"
+ + " , xcp.ins_srtcontroledl_xcp_eenheid"
+ + " , isc.ins_srtcontrole_eenheid";
+ var oRs = Oracle.Execute(sql);
+ if (!oRs.eof && oRs("lastinspectdatum").Value != null)
+ {
+ lastinspectdatum = new Date(oRs("lastinspectdatum").Value); // Kan uiterlijk vandaag zijn.
+ dag_na_lastinspectdatum = new Date(oRs("dag_na_lastinspectdatum").Value); // Kan uiterlijk morgen zijn.
+ dmj_eenheid = oRs("dmj_eenheid").Value;
+ mode = oRs("ins_srtcontrole_mode").Value;
+ if (mode == 0)
+ // Momentmode.
+ minDate = dmj_eenheid == 1? new Date(dag_na_lastinspectdatum.midnight()) : lastinspectdatum;
+ else
+ // Intervalmode.
+ minDate = lastinspectdatum;
+ }
+ else
+ minDate = aanmaakdatum;
+
+ // Vooralsnog kan inspectiedatum niet aangepast worden als de eenheid uren(0) is (readonly).
+ sql = "SELECT MIN(COALESCE(idsc.ins_deelsrtcontrole_datum, ins_deelsrtcontrole_plandatum)) firstinspectdatum"
+ + " , MIN(COALESCE(idsc.ins_deelsrtcontrole_datum, ins_deelsrtcontrole_plandatum) - 1) dag_voor_firstinspectdatum"
+ + " , CASE"
+ + " WHEN COALESCE(xcp.ins_srtcontroledl_xcp_eenheid, isc.ins_srtcontrole_eenheid) != 0" // Geen tijd eenheid maar dag, maand of jaar.
+ + " THEN 1" // Dag, maand of jaar.
+ + " ELSE 0" // Tijd.
+ + " END dmj_eenheid"
+ + " , isc.ins_srtcontrole_mode"
+ + " FROM ins_deelsrtcontrole idsc"
+ + " , ins_srtcontrole isc"
+ + " , ins_srtcontroledl_xcp xcp"
+ + " WHERE idsc.ins_srtcontrole_key = isc.ins_srtcontrole_key"
+ + " AND idsc.ins_srtcontrole_key = xcp.ins_srtcontrole_key(+)"
+ + " AND idsc.ins_deel_key = xcp.ins_deel_key(+)"
+ + " AND COALESCE(xcp.ins_srtcontroledl_xcp_periode, isc.ins_srtcontrole_periode) > 0"
+ + " AND idsc.ins_deel_key IN (" + ins_key_arr[i] + ")"
+ + " AND idsc.ins_srtcontrole_key IN (" + srtcont_key_arr[i] + ")"
+ + " AND ins_deelsrtcontrole_key > " + dlsrtcont_key
+ + " AND idsc.ins_scenario_key = 1" // Status >= 0 dus kan geen scenario zijn.
+ + " AND xcp.ins_scenario_key(+) = 1" // Status >= 0 dus kan geen scenario zijn.
+ + " GROUP BY isc.ins_srtcontrole_mode"
+ + " , xcp.ins_srtcontroledl_xcp_eenheid"
+ + " , isc.ins_srtcontrole_eenheid";
+ oRs = Oracle.Execute(sql);
+ if (!oRs.eof)
+ {
+ firstinspectdatum = new Date(oRs("firstinspectdatum").Value); // Kan uiterlijk vandaag zijn.
+ dag_voor_firstinspectdatum = new Date(oRs("dag_voor_firstinspectdatum").Value); // Kan uiterlijk morgen zijn.
+ dmj_eenheid = oRs("dmj_eenheid").Value;
+ mode = oRs("ins_srtcontrole_mode").Value;
+ if (mode == 0)
+ // Momentmode.
+ maxDate = dmj_eenheid == 1? new Date(dag_voor_firstinspectdatum.setHours(23,59,59,99)) : firstinspectdatum;
+ else
+ // Intervalmode.
+ maxDate = firstinspectdatum;
+ }
+ //else //maxDate = new Date();
+ oRs.Close();
+
+ // Huidige inspectie moet tussen voorgaande en volgende inspectie inliggen.
+ if (deelsrtcontrole_datum.getTime() <= minDate.getTime() || deelsrtcontrole_datum.getTime() >= maxDate.getTime())
+ { // De uitvoerdatum/inspectiedatum valt niet tussen de uitvoerdatum/inspectiedatum van de vorige en volgende inspectie.
+ continue;
+ }
+ }
+ }
+
+ ingesloten.push({ins_key: ins_key_arr[i], srtcont_key: srtcont_key_arr[i], dlsrtcont_key: dlsrtcont_key, scen_key: (scen_key_arr.length > 0? scen_key_arr[i] : 1),
+ inspectiemode: ins_srtcontrole_mode, inspectiestatus: ins_deelsrtcontrole_status, ins_deel_aanmaak: ins_deel_aanmaak,
+ disc_oms: disc_oms, startdatum: ins_startdatum, hascontroles: hascontroles});
+ tobehandled++;
}
- for (var i = 0; i < ingesloten.length; i++)
- { // Ik mag een planrecord aanmaken anders was het object niet toegevoegd aan ingesloten (hierboven getest).
- // Zetten van de status en afhandelen van de tracking van het starten.
- // Eerst maar eens een inspectie record aanmaken.
- // Zijn er inspecties geweest voor dit object of is er een plandatum voor dit object ingevuld zodat we de volgende inspectiedatum kunnen berekenen?
- var sql = "SELECT ins_deelsrtcontrole_datum"
+ if (tobehandled == 0 && silent)
+ {
+ Response.Clear();
+ Response.Write(JSON.stringify({ success: false, savemode: savemode, warning: "" }));
+ Response.End;
+ }
+ else
+ user.anything_todo_or_abort(tobehandled > 0); // We klagen niet over enkele wel en enkele niet
+
+ function saveFlexKenmerkenInspection(pdlsrtcont_key, pinsPresent, pdelete)
+ {
+ // HIER WORDEN DE SAVEFLEXKENMERKEN GEREGELD
+ if (pdelete)
+ currentKenmerkenSQL = "SELECT 1 FROM DUAL WHERE 1 = 0"; // Geen flexkenmerken opslaan en alle waarden verwijderen.
+ else
+ currentKenmerkenSQL = " SELECT kd.ins_kenmerk_key"
+ + " , kd.ins_kmdeelsrtcontr_waarde"
+ + " FROM ins_kmdeelsrtcontr kd"
+ + " , ins_kenmerk k"
+ + " WHERE kd.ins_kenmerk_key = k.ins_kenmerk_key"
+ + " AND kd.ins_kmdeelsrtcontr_verwijder IS NULL"
+ + " AND kd.ins_deelsrtcontrole_key = " + pdlsrtcont_key;
+
+ var ftrack = saveFlexKenmerken( pdlsrtcont_key
+ , { kenmerkTable: "ins_kmdeelsrtcontr"
+ , kenmerkParentKey : "ins_deelsrtcontrole_key"
+ , kenmerkWaarde: "ins_kmdeelsrtcontr_waarde"
+ , kenmerkKey: "ins_kenmerk_key"
+ , currentKenmerkenSQL: currentKenmerkenSQL
+ , requestQF: Request.Form
+ , isNew: !pinsPresent
+ , flexPath: "INS/I"
+ , module: "INS"
+ }
+ );
+ return ftrack;
+ }
+
+
+ if (savemode == "P")
+ { // Inplannen inspectie. Er is nog geen inspectierecord aanwezig.
+ var result = { success: true, plandatum: plandatum, savemode: savemode, warning: "" };
+
+ if (ingesloten.length == 1)
+ { // Vindt het ins_srtcontrole_type.
+ var sql = "SELECT ctr_disc_params_controle_type"
+ + " FROM ins_srtcontrole isc,"
+ + " ctr_disc_params cdp"
+ + " WHERE ins_srtcontrole_key = " + ingesloten[0].srtcont_key
+ + " AND isc.ctr_discipline_key = cdp.ctr_ins_discipline_key";
+ var oRs = Oracle.Execute(sql);
+ result.srtcontrole_type = oRs("ctr_disc_params_controle_type").Value;
+
+ oRs.Close();
+ }
+
+ for (var i = 0; i < ingesloten.length; i++)
+ { // Ik mag een planrecord aanmaken anders was het object niet toegevoegd aan ingesloten (hierboven getest).
+ // Zetten van de status en afhandelen van de tracking van het starten.
+ // Eerst maar eens een inspectie record aanmaken.
+ // Zijn er inspecties geweest voor dit object of is er een plandatum voor dit object ingevuld zodat we de volgende inspectiedatum kunnen berekenen?
+ var sql = "SELECT ins_deelsrtcontrole_datum"
+ + " FROM ins_deelsrtcontrole idsc"
+ + " WHERE idsc.ins_srtcontrole_key = " + ingesloten[i].srtcont_key
+ + " AND idsc.ins_deel_key = " + ingesloten[i].ins_key
+ + " AND idsc.ins_scenario_key = " + ingesloten[i].scen_key
+ + " AND idsc.ins_deelsrtcontrole_datum IS NOT NULL";
+ var oRs = Oracle.Execute(sql);
+ var nextdate = null;
+ if (!oRs.eof)
+ { // Bereken de volgende inspectiedatum. Het object is minstens 1 keer geinspecteerd.
+ sql = "SELECT ins.nextcyclusdate (" + ingesloten[i].ins_key
+ + ", " + ingesloten[i].srtcont_key
+ + ", " + (mjob? ingesloten[i].scen_key : "1")
+ + ", 1) nextdate FROM DUAL";
+ oRsN = Oracle.Execute(sql);
+ nextdate = new Date(oRsN("nextdate").Value);
+ oRsN.Close();
+ }
+ oRs.Close();
+ //else Er zijn nog geen inspecties geweest voor dit object en er is nog geen plandatum voor dit object ingevuld.
+ // Volgende inspectiedatum kun je niet berekenen en is dus onbekend (leeg)
+
+ var fields = [{dbs: "ins_deelsrtcontrole_key", typ: "key", seq: "ins_s_ins_deelsrtcontrole_key"},
+ {dbs: "ins_deel_key", typ: "key", val: ingesloten[i].ins_key},
+ {dbs: "ins_srtcontrole_key", typ: "key", val: ingesloten[i].srtcont_key},
+ {dbs: "ins_deelsrtcontrole_opmerking", typ: "varchar", frm: "opmerk", track: L("lcl_remark"), len: 4000 },
+ {dbs: "ins_deelsrtcontrole_status", typ: "key", val: 0},
+ {dbs: "prs_perslid_key", typ: "key", val: user_key},
+ {dbs: "ins_deelsrtcontrole_plandatum", typ: "datetime", val: plandatum},
+ {dbs: "ins_deelsrtcontrole_datum_org", typ: "datetime", val: nextdate}
+ ];
+
+ if (mjob && ingesloten[i].scen_key > 1)
+ fields.push({dbs: "ins_scenario_key", typ: "key", val: ingesloten[i].scen_key});
+
+ var insIns = buildInsert("ins_deelsrtcontrole", fields);
+ ingesloten[i].dlsrtcont_key = insIns.sequences["ins_deelsrtcontrole_key"];
+ var err = Oracle.Execute(insIns.sql, true);
+ if (ingesloten.length == 1)
+ result.deelsrtcontrole_key = ingesloten[i].dlsrtcont_key;
+
+ if (err.friendlyMsg)
+ {
+ result.warning = err.friendlyMsg;
+ result.success = false;
+ }
+
+ // Nu nog de status zetten, tracking genereren en notificaties sturen.
+ ins.setinspectstatus(ingesloten[i].dlsrtcont_key, 0); // Gepland(0).
+ }
+ }
+ else if (savemode == "C")
+ { // Afmelden inspectie.
+ var result = { success: true, deelsrtcontrole_datum: deelsrtcontrole_datum, savemode: savemode, warning: "" };
+
+ for (var i = 0; i < ingesloten.length; i++)
+ {
+ // Nieuwe inspectie: de ins_deelsrtcontrole_key is NULL of als deze een waarde heeft dan is de status 0 of 2.
+ var isNew = ingesloten[i].dlsrtcont_key < 0 || ingesloten[i].inspectiestatus < 5;
+ // Is er een inspectie (ins_deelsrtcontrole) record aanwezig (ins_deelsrtcontrole_key is NULL).
+ var insPresent = ingesloten[i].dlsrtcont_key > 0;
+
+ if (isNew) // Nieuwe inspectie: de ins_deelsrtcontrole_key is NULL of als deze een waarde heeft dan is de status 0 of 2.
+ { // Bepaal de eerste niet successvolle controle methode. Is deze er niet dan kies maar de eerste successvolle controlemode.
+ sql = "SELECT ins_controlemode_key"
+ + " , 1"
+ + " FROM ins_controlemode"
+ + " WHERE ins_controlemode_success IS NULL"
+ + " UNION "
+ + "SELECT ins_controlemode_key"
+ + " , 2"
+ + " FROM ins_controlemode"
+ + " WHERE ins_controlemode_success = 1"
+ + " ORDER BY 2, 1";
+ oRs = Oracle.Execute(sql);
+ var controlemode = oRs("ins_controlemode_key").Value;
+ oRs.Close();
+
+ // Bepaal eenheid van de soort controle.
+ sql = "SELECT COALESCE((SELECT xcp.ins_srtcontroledl_xcp_eenheid"
+ + " FROM ins_srtcontroledl_xcp xcp"
+ + " WHERE ins_deel_key = " + ingesloten[i].ins_key
+ + " AND ins_srtcontrole_key = " + ingesloten[i].srtcont_key
+ + " AND ins_scenario_key = 1"
+ + " )"
+ + " , (SELECT isc.ins_srtcontrole_eenheid"
+ + " FROM ins_srtcontrole isc"
+ + " WHERE ins_srtcontrole_key = " + ingesloten[i].srtcont_key + ")) eenheid"
+ + " FROM DUAL";
+ oRs = Oracle.Execute(sql);
+ var eenheid = oRs("eenheid").Value;
+ oRs.Close();
+
+ var firstinspect = false;
+ // Zijn er inspecties geweest voor dit object of is er een plandatum voor dit object ingevuld zodat we de volgende inspectiedatum kunnen berekenen?
+ sql = "SELECT ins_deelsrtcontrole_datum"
+ " FROM ins_deelsrtcontrole idsc"
+ " WHERE idsc.ins_srtcontrole_key = " + ingesloten[i].srtcont_key
+ " AND idsc.ins_deel_key = " + ingesloten[i].ins_key
- + " AND idsc.ins_scenario_key = " + ingesloten[i].scen_key
- + " AND idsc.ins_deelsrtcontrole_datum IS NOT NULL";
- var oRs = Oracle.Execute(sql);
- var nextdate = null;
- if (!oRs.eof)
- { // Bereken de volgende inspectiedatum. Het object is minstens 1 keer geinspecteerd.
- sql = "SELECT ins.nextcyclusdate (" + ingesloten[i].ins_key
- + ", " + ingesloten[i].srtcont_key
- + ", " + (mjob? ingesloten[i].scen_key : "1")
- + ", 1) nextdate FROM DUAL";
- oRsN = Oracle.Execute(sql);
- nextdate = new Date(oRsN("nextdate").Value);
- oRsN.Close();
- }
- oRs.Close();
- //else Er zijn nog geen inspecties geweest voor dit object en er is nog geen plandatum voor dit object ingevuld.
- // Volgende inspectiedatum kun je niet berekenen en is dus onbekend (leeg)
-
- var fields = [{dbs: "ins_deelsrtcontrole_key", typ: "key", seq: "ins_s_ins_deelsrtcontrole_key"},
- {dbs: "ins_deel_key", typ: "key", val: ingesloten[i].ins_key},
- {dbs: "ins_srtcontrole_key", typ: "key", val: ingesloten[i].srtcont_key},
- {dbs: "ins_deelsrtcontrole_opmerking", typ: "varchar", frm: "opmerk", track: L("lcl_remark"), len: 4000 },
- {dbs: "ins_deelsrtcontrole_status", typ: "key", val: 0},
- {dbs: "prs_perslid_key", typ: "key", val: user_key},
- {dbs: "ins_deelsrtcontrole_plandatum", typ: "datetime", val: plandatum},
- {dbs: "ins_deelsrtcontrole_datum_org", typ: "datetime", val: nextdate}
- ];
-
- if (mjob && ingesloten[i].scen_key > 1)
- fields.push({dbs: "ins_scenario_key", typ: "key", val: ingesloten[i].scen_key});
-
- var insIns = buildInsert("ins_deelsrtcontrole", fields);
- ingesloten[i].dlsrtcont_key = insIns.sequences["ins_deelsrtcontrole_key"];
- var err = Oracle.Execute(insIns.sql, true);
- if (ingesloten.length == 1)
- result.deelsrtcontrole_key = ingesloten[i].dlsrtcont_key;
-
- if (err.friendlyMsg)
- {
- result.warning = err.friendlyMsg;
- result.success = false;
- }
-
- // Nu nog de status zetten, tracking genereren en notificaties sturen.
- ins.setinspectstatus(ingesloten[i].dlsrtcont_key, 0); // Gepland(0).
- }
-}
-else if (savemode == "C")
-{ // Afmelden inspectie.
- var result = { success: true, deelsrtcontrole_datum: deelsrtcontrole_datum, savemode: savemode, warning: "" };
-
- for (var i = 0; i < ingesloten.length; i++)
- {
- // Nieuwe inspectie: de ins_deelsrtcontrole_key is NULL of als deze een waarde heeft dan is de status 0 of 2.
- var isNew = ingesloten[i].dlsrtcont_key < 0 || ingesloten[i].inspectiestatus < 5;
- // Is er een inspectie (ins_deelsrtcontrole) record aanwezig (ins_deelsrtcontrole_key is NULL).
- var insPresent = ingesloten[i].dlsrtcont_key > 0;
-
- if (isNew) // Nieuwe inspectie: de ins_deelsrtcontrole_key is NULL of als deze een waarde heeft dan is de status 0 of 2.
- { // Bepaal de eerste niet successvolle controle methode. Is deze er niet dan kies maar de eerste successvolle controlemode.
- sql = "SELECT ins_controlemode_key"
- + " , 1"
- + " FROM ins_controlemode"
- + " WHERE ins_controlemode_success IS NULL"
- + " UNION "
- + "SELECT ins_controlemode_key"
- + " , 2"
- + " FROM ins_controlemode"
- + " WHERE ins_controlemode_success = 1"
- + " ORDER BY 2, 1";
- oRs = Oracle.Execute(sql);
- var controlemode = oRs("ins_controlemode_key").Value;
- oRs.Close();
-
- // Bepaal eenheid van de soort controle.
- sql = "SELECT COALESCE((SELECT xcp.ins_srtcontroledl_xcp_eenheid"
- + " FROM ins_srtcontroledl_xcp xcp"
- + " WHERE ins_deel_key = " + ingesloten[i].ins_key
- + " AND ins_srtcontrole_key = " + ingesloten[i].srtcont_key
- + " AND ins_scenario_key = 1"
- + " )"
- + " , (SELECT isc.ins_srtcontrole_eenheid"
- + " FROM ins_srtcontrole isc"
- + " WHERE ins_srtcontrole_key = " + ingesloten[i].srtcont_key + ")) eenheid"
- + " FROM DUAL";
- oRs = Oracle.Execute(sql);
- var eenheid = oRs("eenheid").Value;
- oRs.Close();
-
- var firstinspect = false;
- // Zijn er inspecties geweest voor dit object of is er een plandatum voor dit object ingevuld zodat we de volgende inspectiedatum kunnen berekenen?
- sql = "SELECT ins_deelsrtcontrole_datum"
- + " FROM ins_deelsrtcontrole idsc"
- + " WHERE idsc.ins_srtcontrole_key = " + ingesloten[i].srtcont_key
- + " AND idsc.ins_deel_key = " + ingesloten[i].ins_key
- + " AND idsc.ins_deelsrtcontrole_datum IS NOT NULL"
- + " AND idsc.ins_scenario_key = 1"; // Afmelden inspectie.
- oRs = Oracle.Execute(sql);
- if (oRs.eof)
- { // Er zijn nog geen inspecties geweest voor dit object.
- // Volgende inspectiedatum kun je niet berekenen
- // De eerstvolgende inspectiedatum gelijk aan de controledatum stellen.
- firstinspect = true;
- nextdate = new Date(deelsrtcontrole_datum);
- oRs.Close();
- }
- else
- { // Bereken de volgende inspectiedatum.
- // Alleen Active Situatie (AS) soort controle's kunnen afgemeld worden dus voor scenario key moet "null" genomen worden.
- sql = "SELECT ins.nextcyclusdate (" + ingesloten[i].ins_key + ", " + ingesloten[i].srtcont_key + ", 1, 1) nextdate FROM DUAL"
+ + " AND idsc.ins_deelsrtcontrole_datum IS NOT NULL"
+ + " AND idsc.ins_scenario_key = 1"; // Afmelden inspectie.
oRs = Oracle.Execute(sql);
- nextdate = new Date(oRs("nextdate").Value);
- oRs.Close();
- }
-
- var isPlanned = false;
- if (insPresent)
- {
- // Is er een plandatum? Dan is dit de volgende inspectiedatum.
- sql = "SELECT ins_deelsrtcontrole_plandatum"
- + " FROM ins_deelsrtcontrole idsc"
- + " WHERE idsc.ins_deelsrtcontrole_status <= 5"
- + " AND idsc.ins_deelsrtcontrole_key = " + ingesloten[i].dlsrtcont_key
- + " AND idsc.ins_srtcontrole_key = " + ingesloten[i].srtcont_key
- + " AND idsc.ins_deel_key = " + ingesloten[i].ins_key;
- oRs = Oracle.Execute(sql);
-
- if (!oRs.eof && oRs("ins_deelsrtcontrole_plandatum").Value != null)
- {
- // De plandatum is de volgende inspectiedatum
- // Als het de allereerste inspectie is dan is er nooit sprake van isPlanned.
- isPlanned = !firstinspect;
+ if (oRs.eof)
+ { // Er zijn nog geen inspecties geweest voor dit object.
+ // Volgende inspectiedatum kun je niet berekenen
+ // De eerstvolgende inspectiedatum gelijk aan de controledatum stellen.
+ firstinspect = true;
+ nextdate = new Date(deelsrtcontrole_datum);
+ oRs.Close();
+ }
+ else
+ { // Bereken de volgende inspectiedatum.
+ // Alleen Active Situatie (AS) soort controle's kunnen afgemeld worden dus voor scenario key moet "null" genomen worden.
+ sql = "SELECT ins.nextcyclusdate (" + ingesloten[i].ins_key + ", " + ingesloten[i].srtcont_key + ", 1, 1) nextdate FROM DUAL"
+ oRs = Oracle.Execute(sql);
+ nextdate = new Date(oRs("nextdate").Value);
+ oRs.Close();
}
- oRs.Close();
- }
- // Truncate datums op de dag of het uur afhankelijk van de eenheid.
- if (eenheid == 0)
- {
- var nextdate_trunc = new Date(new Date(nextdate).setMinutes(0, 0, 0));
- var deelsrtcontrole_datum_trunc = new Date(new Date(deelsrtcontrole_datum).setMinutes(0, 0, 0));
- }
- else
- {
- var nextdate_trunc = new Date(nextdate.midnight());
- var deelsrtcontrole_datum_trunc = new Date(deelsrtcontrole_datum.midnight());
- }
-
- // De periodieke taken direct afronden indien mogelijk.
- var hasActionFinish = false;
- if (finish)
- { // Wel even checken of de actie "Afronden" is ingeschakeld voor de periodiek taak of dat het een mjob taak is.
- ingesloten[i].srtcont_key
- sql = "SELECT ins_srtcontrole_options"
- + " , ctr_ismjob"
- + " FROM ins_v_defined_inspect_xcp"
- + " WHERE ins_deel_key = " + ingesloten[i].ins_key
- + " AND ins_srtcontrole_key = " + ingesloten[i].srtcont_key
- + " AND ins_scenario_key = " + ingesloten[i].scen_key;
- oRs = Oracle.Execute(sql);
- hasActionFinish = (oRs("ins_srtcontrole_options").Value & 8) == 8 || oRs("ctr_ismjob").Value == 1;
- }
-
- // Afhankelijk van de modus de inspectie(s) opslaan.
- if (ingesloten[i].inspectiemode == 0)
- { // Moment modus
- // De laatste datum die opgeslagen wordt is uiterlijk de opgegeven controledatum
- // De trunc waarde van de controle datum gebruiken.
- var firstone = true;
- while (isPlanned || (!isPlanned && nextdate_trunc <= deelsrtcontrole_datum_trunc))
+ var isPlanned = false;
+ if (insPresent)
{
- var fields = [ { dbs: "prs_perslid_key", typ: "key", val: user_key, track: L("lcl_name"), foreign: "prs_perslid" },
+ // Is er een plandatum? Dan is dit de volgende inspectiedatum.
+ sql = "SELECT ins_deelsrtcontrole_plandatum"
+ + " FROM ins_deelsrtcontrole idsc"
+ + " WHERE idsc.ins_deelsrtcontrole_status <= 5"
+ + " AND idsc.ins_deelsrtcontrole_key = " + ingesloten[i].dlsrtcont_key
+ + " AND idsc.ins_srtcontrole_key = " + ingesloten[i].srtcont_key
+ + " AND idsc.ins_deel_key = " + ingesloten[i].ins_key;
+ oRs = Oracle.Execute(sql);
+
+ if (!oRs.eof && oRs("ins_deelsrtcontrole_plandatum").Value != null)
+ {
+ // De plandatum is de volgende inspectiedatum
+ // Als het de allereerste inspectie is dan is er nooit sprake van isPlanned.
+ isPlanned = !firstinspect;
+ }
+ oRs.Close();
+ }
+
+ // Truncate datums op de dag of het uur afhankelijk van de eenheid.
+ if (eenheid == 0)
+ {
+ var nextdate_trunc = new Date(new Date(nextdate).setMinutes(0, 0, 0));
+ var deelsrtcontrole_datum_trunc = new Date(new Date(deelsrtcontrole_datum).setMinutes(0, 0, 0));
+ }
+ else
+ {
+ var nextdate_trunc = new Date(nextdate.midnight());
+ var deelsrtcontrole_datum_trunc = new Date(deelsrtcontrole_datum.midnight());
+ }
+
+ // De periodieke taken direct afronden indien mogelijk.
+ var hasActionFinish = false;
+ if (finish)
+ { // Wel even checken of de actie "Afronden" is ingeschakeld voor de periodiek taak of dat het een mjob taak is.
+ ingesloten[i].srtcont_key
+ sql = "SELECT ins_srtcontrole_options"
+ + " , ctr_ismjob"
+ + " FROM ins_v_defined_inspect_xcp"
+ + " WHERE ins_deel_key = " + ingesloten[i].ins_key
+ + " AND ins_srtcontrole_key = " + ingesloten[i].srtcont_key
+ + " AND ins_scenario_key = " + ingesloten[i].scen_key;
+ oRs = Oracle.Execute(sql);
+ hasActionFinish = (oRs("ins_srtcontrole_options").Value & 8) == 8 || oRs("ctr_ismjob").Value == 1;
+ }
+
+ // Afhankelijk van de modus de inspectie(s) opslaan.
+ if (ingesloten[i].inspectiemode == 0)
+ { // Moment modus
+ // De laatste datum die opgeslagen wordt is uiterlijk de opgegeven controledatum
+ // De trunc waarde van de controle datum gebruiken.
+ var firstone = true;
+ while (isPlanned || (!isPlanned && nextdate_trunc <= deelsrtcontrole_datum_trunc))
+ {
+ var fields = [ { dbs: "prs_perslid_key", typ: "key", val: user_key, track: L("lcl_name"), foreign: "prs_perslid" },
+ { dbs: "ins_deelsrtcontrole_datum", typ: "datetime", val: deelsrtcontrole_datum, track: L("lcl_ins_controle_datum") }, // De controledatum met tijd opslaan.
+ { dbs: "ins_deelsrtcontrole_datum_org", typ: "datetime", val: nextdate } // De orginele controledatum met tijd opslaan. Kan al gevuld zijn met dezelfde waarde.
+ ];
+ if (!insPresent)
+ { // Er is nog geen inspectie record aangemaakt. De volgende velden dienen dan nog ingevuld te worden.
+ fields.push({ dbs: "ins_deel_key", typ: "key", val: ingesloten[i].ins_key });
+ fields.push({ dbs: "ins_srtcontrole_key", typ: "key", val: ingesloten[i].srtcont_key });
+ fields.push({ dbs: "ins_deelsrtcontrole_key", typ: "key", seq: "ins_s_ins_deelsrtcontrole_key" });
+ }
+
+ // Kan moeilijk bepalen of dit de laatste inspectie is in de reeks omdat huidige inspectie nog niet opgeslagen is (Veel uitrekenwerk).
+ // Gemakkelijker is om altijd de niet succesvolle controlemode op te slaan.
+ // Na afloop van de while lus kan dan de controlemode van de laatst opgeslagen inspectie goed gezet worden.
+ fields.push({ dbs: "ins_controlemode_key", typ: "key", val: controlemode, track: L("lcl_ins_controle_mode"), foreign: "ins_controlemode" } ); // Controlemode die niet succesvol is
+
+ if (insPresent && firstone) // Alleen voor de alle eerste inspectie kan een inspectie record aanwezig zijn.
+ { // Er is al een inspectie record (ins_deelsrtcontrole) aangemaakt. De status is Gepland(0) of In behandeling(2).
+ // Plandatum kan gevuld blijven met de huidige waarde.
+ var insUpd = buildTrackingUpdate("ins_deelsrtcontrole", " ins_deelsrtcontrole_key = " + ingesloten[i].dlsrtcont_key, fields);
+ var err = Oracle.Execute(insUpd.sql, true);
+ }
+ else
+ { // Er is nog geen inspectie record aangemaakt.
+ if (!firstone)
+ ins.setinspectstatus(ingesloten[i].dlsrtcont_key, 6); // Vorige inspectie record Afronden(6).
+ fields.push({dbs: "ins_deelsrtcontrole_status", typ: "key", val: (finish && hasActionFinish? 6: 5)});
+ var insIns = buildInsert("ins_deelsrtcontrole", fields);
+ ingesloten[i].dlsrtcont_key = insIns.sequences["ins_deelsrtcontrole_key"];
+ var err = Oracle.Execute(insIns.sql, true);
+ }
+ result.deelsrtcontrole_key = ingesloten[i].dlsrtcont_key;
+
+ if (err.friendlyMsg)
+ {
+ result.warning = err.friendlyMsg;
+ result.success = false;
+ break;
+ }
+
+ // Nu nog de status zetten, tracking genereren en notificaties sturen.
+ ins.setinspectstatus(ingesloten[i].dlsrtcont_key, (finish && hasActionFinish? 6: 5)); // Afgemeld(5), History/Verwerkt(6).
+
+ isPlanned = false;
+ insPresent = false; // Als er terug in de while lus wordt gesprongen is er geen inspectie record aanwezig.
+ firstone = false;
+
+ // Bereken de volgende inspectiedatum.
+ // De functie ins.nextcyclusdate levert de volgende inspectie datum met tijd op onafhankelijk van de eenheid.
+ // Alleen Active Situatie (AS) soort controle's kunnen afgemeld worden dus voor scenario key moet "null" genomen worden.
+ sql = "SELECT ins.nextcyclusdate (" + ingesloten[i].ins_key + ", " + ingesloten[i].srtcont_key + ", 1, 1) nextdate FROM DUAL"
+ var oRs = Oracle.Execute(sql);
+ nextdate = new Date(oRs("nextdate").Value);
+ oRs.Close();
+
+ if (eenheid == 0)
+ nextdate_trunc = new Date(new Date(nextdate).setMinutes(0, 0, 0));
+ else
+ nextdate_trunc = new Date(nextdate.midnight());
+ }
+ if (!firstone)
+ { // De controlemode en de opmerking van de laatste inspectie nog even op de aangegeven waarde zetten (i.p.v. niet succes waarde (controlemode) en lege waarde (opmerking)).
+ var fields = [ { dbs: "ins_controlemode_key", typ: "key", frm: "sel_controlemode", track: L("lcl_ins_controle_mode"), foreign: "ins_controlemode" },
+ { dbs: "ins_deelsrtcontrole_opmerking", typ: "varchar", frm: "opmerk", track: L("lcl_remark"), len: 4000 } ];
+ var insUpd = buildTrackingUpdate("ins_deelsrtcontrole", " ins_deelsrtcontrole_key = " + result.deelsrtcontrole_key, fields);
+ var err = Oracle.Execute(insUpd.sql, true);
+ }
+ }
+ else
+ { // Interval modus
+ var fields = [ { dbs: "ins_deelsrtcontrole_opmerking", typ: "varchar", frm: "opmerk", track: L("lcl_remark"), len: 4000 },
+ { dbs: "prs_perslid_key", typ: "key", val: user_key, track: L("lcl_name"), foreign: "prs_perslid" },
{ dbs: "ins_deelsrtcontrole_datum", typ: "datetime", val: deelsrtcontrole_datum, track: L("lcl_ins_controle_datum") }, // De controledatum met tijd opslaan.
+ { dbs: "ins_controlemode_key", typ: "key", frm: "sel_controlemode", track: L("lcl_ins_controle_mode"), foreign: "ins_controlemode" },
{ dbs: "ins_deelsrtcontrole_datum_org", typ: "datetime", val: nextdate } // De orginele controledatum met tijd opslaan. Kan al gevuld zijn met dezelfde waarde.
];
if (!insPresent)
@@ -620,24 +826,17 @@ else if (savemode == "C")
fields.push({ dbs: "ins_deel_key", typ: "key", val: ingesloten[i].ins_key });
fields.push({ dbs: "ins_srtcontrole_key", typ: "key", val: ingesloten[i].srtcont_key });
fields.push({ dbs: "ins_deelsrtcontrole_key", typ: "key", seq: "ins_s_ins_deelsrtcontrole_key" });
+ fields.push({ dbs: "ins_deelsrtcontrole_status", typ: "key", val: (finish && hasActionFinish? 6: 5) });
}
- // Kan moeilijk bepalen of dit de laatste inspectie is in de reeks omdat huidige inspectie nog niet opgeslagen is (Veel uitrekenwerk).
- // Gemakkelijker is om altijd de niet succesvolle controlemode op te slaan.
- // Na afloop van de while lus kan dan de controlemode van de laatst opgeslagen inspectie goed gezet worden.
- fields.push({ dbs: "ins_controlemode_key", typ: "key", val: controlemode, track: L("lcl_ins_controle_mode"), foreign: "ins_controlemode" } ); // Controlemode die niet succesvol is
-
- if (insPresent && firstone) // Alleen voor de alle eerste inspectie kan een inspectie record aanwezig zijn.
- { // Er is al een inspectie record (ins_deelsrtcontrole) aangemaakt. De status is Gepland(0) of In behandeling(2).
+ if (insPresent)
+ { // Er is al een inspectie record (ins_deelsrtcontrole) aangemaakt. De status is Gepland(0) of In behandeling(2)
// Plandatum kan gevuld blijven met de huidige waarde.
var insUpd = buildTrackingUpdate("ins_deelsrtcontrole", " ins_deelsrtcontrole_key = " + ingesloten[i].dlsrtcont_key, fields);
var err = Oracle.Execute(insUpd.sql, true);
}
else
{ // Er is nog geen inspectie record aangemaakt.
- if (!firstone)
- ins.setinspectstatus(ingesloten[i].dlsrtcont_key, 6); // Vorige inspectie record Afronden(6).
- fields.push({dbs: "ins_deelsrtcontrole_status", typ: "key", val: (finish && hasActionFinish? 6: 5)});
var insIns = buildInsert("ins_deelsrtcontrole", fields);
ingesloten[i].dlsrtcont_key = insIns.sequences["ins_deelsrtcontrole_key"];
var err = Oracle.Execute(insIns.sql, true);
@@ -655,294 +854,229 @@ else if (savemode == "C")
ins.setinspectstatus(ingesloten[i].dlsrtcont_key, (finish && hasActionFinish? 6: 5)); // Afgemeld(5), History/Verwerkt(6).
isPlanned = false;
- insPresent = false; // Als er terug in de while lus wordt gesprongen is er geen inspectie record aanwezig.
- firstone = false;
-
- // Bereken de volgende inspectiedatum.
- // De functie ins.nextcyclusdate levert de volgende inspectie datum met tijd op onafhankelijk van de eenheid.
- // Alleen Active Situatie (AS) soort controle's kunnen afgemeld worden dus voor scenario key moet "null" genomen worden.
- sql = "SELECT ins.nextcyclusdate (" + ingesloten[i].ins_key + ", " + ingesloten[i].srtcont_key + ", 1, 1) nextdate FROM DUAL"
- var oRs = Oracle.Execute(sql);
- nextdate = new Date(oRs("nextdate").Value);
- oRs.Close();
-
- if (eenheid == 0)
- nextdate_trunc = new Date(new Date(nextdate).setMinutes(0, 0, 0));
- else
- nextdate_trunc = new Date(nextdate.midnight());
- }
- if (!firstone)
- { // De controlemode en de opmerking van de laatste inspectie nog even op de aangegeven waarde zetten (i.p.v. niet succes waarde (controlemode) en lege waarde (opmerking)).
- var fields = [ { dbs: "ins_controlemode_key", typ: "key", frm: "sel_controlemode", track: L("lcl_ins_controle_mode"), foreign: "ins_controlemode" },
- { dbs: "ins_deelsrtcontrole_opmerking", typ: "varchar", frm: "opmerk", track: L("lcl_remark"), len: 4000 } ];
- var insUpd = buildTrackingUpdate("ins_deelsrtcontrole", " ins_deelsrtcontrole_key = " + result.deelsrtcontrole_key, fields);
- var err = Oracle.Execute(insUpd.sql, true);
}
}
else
- { // Interval modus
- var fields = [ { dbs: "ins_deelsrtcontrole_opmerking", typ: "varchar", frm: "opmerk", track: L("lcl_remark"), len: 4000 },
- { dbs: "prs_perslid_key", typ: "key", val: user_key, track: L("lcl_name"), foreign: "prs_perslid" },
- { dbs: "ins_deelsrtcontrole_datum", typ: "datetime", val: deelsrtcontrole_datum, track: L("lcl_ins_controle_datum") }, // De controledatum met tijd opslaan.
+ { // uitgevoerde inspectie.
+ // Datum kan niet meer aangepast worden.
+ var fields = [ { dbs: "ins_deel_key", typ: "key", val: ingesloten[i].ins_key },
+ { dbs: "ins_srtcontrole_key", typ: "key", val: ingesloten[i].srtcont_key },
{ dbs: "ins_controlemode_key", typ: "key", frm: "sel_controlemode", track: L("lcl_ins_controle_mode"), foreign: "ins_controlemode" },
- { dbs: "ins_deelsrtcontrole_datum_org", typ: "datetime", val: nextdate } // De orginele controledatum met tijd opslaan. Kan al gevuld zijn met dezelfde waarde.
+ { dbs: "prs_perslid_key", typ: "key", val: user_key }
];
- if (!insPresent)
- { // Er is nog geen inspectie record aangemaakt. De volgende velden dienen dan nog ingevuld te worden.
- fields.push({ dbs: "ins_deel_key", typ: "key", val: ingesloten[i].ins_key });
- fields.push({ dbs: "ins_srtcontrole_key", typ: "key", val: ingesloten[i].srtcont_key });
- fields.push({ dbs: "ins_deelsrtcontrole_key", typ: "key", seq: "ins_s_ins_deelsrtcontrole_key" });
- fields.push({ dbs: "ins_deelsrtcontrole_status", typ: "key", val: (finish && hasActionFinish? 6: 5) });
- }
- if (insPresent)
- { // Er is al een inspectie record (ins_deelsrtcontrole) aangemaakt. De status is Gepland(0) of In behandeling(2)
- // Plandatum kan gevuld blijven met de huidige waarde.
- var insUpd = buildTrackingUpdate("ins_deelsrtcontrole", " ins_deelsrtcontrole_key = " + ingesloten[i].dlsrtcont_key, fields);
- var err = Oracle.Execute(insUpd.sql, true);
- }
- else
- { // Er is nog geen inspectie record aangemaakt.
- var insIns = buildInsert("ins_deelsrtcontrole", fields);
- ingesloten[i].dlsrtcont_key = insIns.sequences["ins_deelsrtcontrole_key"];
- var err = Oracle.Execute(insIns.sql, true);
- }
- result.deelsrtcontrole_key = ingesloten[i].dlsrtcont_key;
+ if (!multi) // Bij multi de opmerking niet opslaan. De opmerking kon ook niet ingevuld worden.
+ fields.push({ dbs: "ins_deelsrtcontrole_opmerking", typ: "varchar", frm: "opmerk", track: L("lcl_remark"), len: 4000 });
+
+ var insUpd = buildTrackingUpdate("ins_deelsrtcontrole", " ins_deelsrtcontrole_key = " + ingesloten[i].dlsrtcont_key, fields);
+ var err = Oracle.Execute(insUpd.sql, true);
if (err.friendlyMsg)
{
result.warning = err.friendlyMsg;
result.success = false;
- break;
}
+ }
- // Nu nog de status zetten, tracking genereren en notificaties sturen.
- ins.setinspectstatus(ingesloten[i].dlsrtcont_key, (finish && hasActionFinish? 6: 5)); // Afgemeld(5), History/Verwerkt(6).
+ var flextrack = [];
+ // Alleen bij multi worden geen kenmerken opgeslagen. Verder altijd aangeroepen om wijzigingen op te slaan.
+ if (!multi)
+ flextrack = saveFlexKenmerkenInspection(ingesloten[0].dlsrtcont_key, insPresent);
- isPlanned = false;
+ if (insPresent && ((insUpd && insUpd.trackarray.length) || flextrack.length))
+ ins.trackinspectupdate(ingesloten[i].dlsrtcont_key, L("lcl_ins_controle_is_upd").format(ingesloten[0].disc_oms) + "\n" + insUpd.trackarray.concat(flextrack).join("\n"));
+ }
+ }
+ else if (savemode == "E")
+ { // Wijzigen inspectie (Edit). Update van de gegevens (plandatum, opmerking en flexkenmerken).
+ var result = { success: true, plandatum: plandatum, deelsrtcontrole_key: ingesloten[0].dlsrtcont_key, savemode: savemode, warning: "" };
+ var isScenario = ingesloten[0].scen_key > 1;
+
+ var mjobdelete = false;
+ // Kunnen we het plan record verwijderen?
+ // Het plan record van een scenario mogen we nooit verwijderen. Daar dan de plandatum leeg maken.
+ if (mjob)
+ { // Nieuwe plandatum vanuit het mjob scherm ontvangen.
+ // Als er nog geen controles zijn en de plandatum is in hetzelfde jaar of eerder als de startdatum, dan moet het planrecord verwijderd worden.
+ if (!hascontroles && ingesloten[0].startdatum != -1 && plandatum.getFullYear() <= ingesloten[0].startdatum.getFullYear())
+ mjobdelete = true;
+ else
+ { // Als het jaar van de plandatum hetzelfde is als het jaar van de orginele datum, dan kan het plan record verwijderd worden.
+
+ // Is het een mjob discipline en is de eenheid jaarlijks?
+ sql = "SELECT cdp.ctr_disc_params_ismjob"
+ + " , cdp.ctr_disc_params_controle_type"
+ + " , isc.ins_srtcontrole_eenheid"
+ + " FROM ins_srtcontrole isc"
+ + " , ctr_disc_params cdp"
+ + " WHERE isc.ctr_discipline_key = cdp.ctr_ins_discipline_key"
+ + " AND isc.ins_srtcontrole_key = " + ingesloten[0].srtcont_key;
+ oRs = Oracle.Execute(sql);
+ var ismjob = !oRs.eof && oRs("ctr_disc_params_ismjob").Value == 1;
+ var ctrcontroletype = oRs("ctr_disc_params_controle_type").Value; // Controle(1), Vervanging(2) en Certificering(3).
+ var isjaarlijks = oRs("ins_srtcontrole_eenheid").Value == 4;
+ oRs.Close();
+
+ // Zijn er inspecties geweest voor dit object of is er een plandatum voor dit object ingevuld zodat we de volgende inspectiedatum kunnen berekenen?
+ var sql = "SELECT ins_deelsrtcontrole_datum"
+ + " FROM ins_deelsrtcontrole idsc"
+ + " WHERE idsc.ins_srtcontrole_key = " + ingesloten[0].srtcont_key
+ + " AND idsc.ins_deel_key = " + ingesloten[0].ins_key
+ + " AND idsc.ins_scenario_key = " + ingesloten[0].scen_key
+ + " AND idsc.ins_deelsrtcontrole_datum IS NOT NULL"; // Er is geinspecteerd.
+ var oRs = Oracle.Execute(sql);
+ var nextdate = null;
+ if (!oRs.eof)
+ { // Bereken de volgende orginele inspectiedatum (nextdate).
+ sql = "SELECT ins.nextcyclusdate (" + ingesloten[0].ins_key
+ + ", " + ingesloten[0].srtcont_key
+ + ", " + ingesloten[0].scen_key
+ + ", 1) nextdate FROM DUAL"
+ var oRsN = Oracle.Execute(sql);
+ nextdate = new Date(oRsN("nextdate").Value);
+ oRsN.Close();
+
+ // Is jaar plandatum gelijk aan jaar orginele datum?
+ var plandatum_jaar = plandatum.getFullYear();
+ var nextdate_jaar = nextdate.getFullYear();
+
+ if (ismjob && isjaarlijks && plandatum_jaar == nextdate_jaar)
+ { // Verwijder het inspectie record en ga verder met het volgende object.
+ mjobdelete = true;
+ }
+ }
+ //else Er zijn nog geen inspecties geweest voor dit object en er is nog geen plandatum voor dit object ingevuld.
+ // Volgende inspectiedatum kun je niet berekenen met de functie ins.nextcyclusdate() en is dus onbekend (leeg)
+ else
+ { // Vindt het ins_srtcontrole_type.
+ var sql = "SELECT ctr_disc_params_controle_type"
+ + " FROM ins_srtcontrole isc,"
+ + " ctr_disc_params cdp"
+ + " WHERE ins_srtcontrole_key = " + ingesloten[0].srtcont_key
+ + " AND isc.ctr_discipline_key = cdp.ctr_ins_discipline_key";
+ var oRsN = Oracle.Execute(sql);
+ var srtcontrole_type = oRsN("ctr_disc_params_controle_type").Value;
+
+ var plandatum_jaar = plandatum.getFullYear();
+ // De inspectiedatums voor taken die nog nooit een inspectie hebben gehad is voor een Vervanging(2) of Certificering(3)
+ // n periodes verder dan de registratie/aanmaak datum van het object.
+ // Voor een controle is er geen inspectiedatum en wordt er dan altijd "Eerste controle" in beeld getoond.
+ // Ofwel een controle inspectie kun je direct vanaf het aanmaken van het object doen.
+ // Voor controles(1):
+ // - Als de planning in het mjb_freeze_year jaar is dan kan het inspectierecord verwijderd worden.
+ // Voor Vervanging(2) en Certificering(3):
+ // - Valt de laatste niet gedane inspectiedatum tussen of in het mjb_start_year en het mjb_freeze_year,
+ // dan is mjb_freeze_year het inspectie jaar.
+ // Als de planning dan in het inspectie jaar (mjb_freeze_year) is, dan kan het inspectierecord verwijderd worden.
+ // - Valt de laatste niet gedane inspectiedatum NIET tussen of in het mjb_start_year en het mjb_freeze_year,
+ // dan is de laatste niet gedane inspectiedatum + periode het inspectie jaar.
+ // Als de planning dan in hetzelfde jaar als het inspectie jaar (laatste + periode) is, dan kan het inspectierecord verwijderd worden.
+ if (ismjob && isjaarlijks)
+ {
+ if (srtcontrole_type == 1 && plandatum_jaar == S("mjb_freeze_year")) // Controles(1).
+ mjobdelete = true;
+ else if (srtcontrole_type == 2 || srtcontrole_type == 3) // Vervanging(2) of Certificering(3).
+ { // Bereken de volgende inspectiedatum.
+ // Alleen Active Situatie (AS) soort controle's kunnen gewijzigd worden dus voor scenario key moet 1 (of null) genomen worden.
+ sql = "SELECT ins.nextcyclusdate (" + ingesloten[0].ins_key
+ + " , " + ingesloten[0].srtcont_key
+ + " , " + ingesloten[0].scen_key
+ + " , 0) nextdate" // 1-ste vandaag of in de toekomst(0).
+ + " , xcp.ins_srtcontrole_periode"
+ + " FROM ins_v_defined_inspect_xcp xcp"
+ + " WHERE xcp.ins_deel_key = " + ingesloten[0].ins_key
+ + " AND xcp.ins_srtcontrole_key = " + ingesloten[0].srtcont_key
+ + " AND xcp.ins_scenario_key = " + ingesloten[0].scen_key
+ oRsN = Oracle.Execute(sql);
+ var nextdate = new Date(oRsN("nextdate").Value);
+ var nextdate_jaar = nextdate.getFullYear();
+ var periode = oRsN("ins_srtcontrole_periode").Value
+ var nextdate_jaar_before = nextdate_jaar - periode
+
+ // Als nextdate_jaar_before of nextdate_jaar binnen mjb_start_year en mjb_freeze_year valt en de planning in het mjb_freeze_year jaar is
+ // of
+ // als nextdate_jaar_before voor het mjb_start_year jaar valt en nextdate_jaar na het mjb_freeze_year jaar
+ // dan kan het inspectie record verwijderd worden.
+ if ((((nextdate_jaar_before >= S("mjb_start_year") && nextdate_jaar_before <= S("mjb_freeze_year")) ||
+ (nextdate_jaar >= S("mjb_start_year") && nextdate_jaar <= S("mjb_freeze_year"))) &&
+ plandatum_jaar == S("mjb_freeze_year")) ||
+ ((nextdate_jaar_before < S("mjb_start_year") && nextdate_jaar > S("mjb_freeze_year")) &&
+ plandatum_jaar == nextdate_jaar)
+ )
+ mjobdelete = true;
+ }
+ }
+ oRsN.Close();
+ }
+ oRs.Close();
}
}
+
+ if (mjobdelete && !isScenario)
+ { // Verwijder het inspectie record.
+ var sql = "DELETE FROM ins_deelsrtcontrole"
+ + " WHERE ins_deel_key = " + ingesloten[0].ins_key
+ + " AND ins_srtcontrole_key = " + ingesloten[0].srtcont_key
+ + " AND ins_deelsrtcontrole_status = 0"
+ + " AND ins_scenario_key = " + ingesloten[0].scen_key;
+ var err = Oracle.Execute(sql, true);
+ }
else
- { // uitgevoerde inspectie.
- // Datum kan niet meer aangepast worden.
- var fields = [ { dbs: "ins_deel_key", typ: "key", val: ingesloten[i].ins_key },
- { dbs: "ins_srtcontrole_key", typ: "key", val: ingesloten[i].srtcont_key },
- { dbs: "ins_controlemode_key", typ: "key", frm: "sel_controlemode", track: L("lcl_ins_controle_mode"), foreign: "ins_controlemode" },
- { dbs: "prs_perslid_key", typ: "key", val: user_key }
- ];
+ {
+ var fields = [ { dbs: "ins_deelsrtcontrole_opmerking", typ: "varchar", frm: "opmerk", track: L("lcl_remark"), len: 4000 }
+ ];
- if (!multi) // Bij multi de opmerking niet opslaan. De opmerking kon ook niet ingevuld worden.
- fields.push({ dbs: "ins_deelsrtcontrole_opmerking", typ: "varchar", frm: "opmerk", track: L("lcl_remark"), len: 4000 });
+ if (isScenario && mjobdelete)
+ fields.push( { dbs: "ins_deelsrtcontrole_plandatum", typ: "datetime", val: "", track: L("lcl_opdr_plandate") } );
+ else if (mjob)
+ fields.push( { dbs: "ins_deelsrtcontrole_plandatum", typ: "datetime", val: plandatum, track: L("lcl_opdr_plandate") } );
+ else // Periodieke taken.
+ fields.push( { dbs: "ins_deelsrtcontrole_plandatum", typ: "datetime", frm: "plandatum", track: L("lcl_opdr_plandate") } );
- var insUpd = buildTrackingUpdate("ins_deelsrtcontrole", " ins_deelsrtcontrole_key = " + ingesloten[i].dlsrtcont_key, fields);
+ if (getDeelsrtcontroleDate)
+ fields.push( { dbs: "ins_deelsrtcontrole_datum", typ: "datetime", val: deelsrtcontrole_datum, track: L("lcl_ins_controle_datum") } );
+
+ if (canMsuEdit)
+ fields.push( { dbs: "ins_controlemode_key", typ: "key", frm: "sel_controlemode", track: L("lcl_ins_controle_mode"), foreign: "ins_controlemode" } );
+
+ var insUpd = buildTrackingUpdate("ins_deelsrtcontrole", " ins_deelsrtcontrole_key = " + ingesloten[0].dlsrtcont_key, fields);
var err = Oracle.Execute(insUpd.sql, true);
+ }
- if (err.friendlyMsg)
+ if (err.friendlyMsg)
+ {
+ result.warning = err.friendlyMsg;
+ result.success = false;
+ }
+
+ var flextrack = saveFlexKenmerkenInspection(ingesloten[0].dlsrtcont_key, insPresent, mjobdelete);
+
+ if ((!mjobdelete || (isScenario && mjobdelete)) && (insUpd.trackarray.length || flextrack.length))
+ ins.trackinspectupdate(ingesloten[0].dlsrtcont_key, L("lcl_ins_controle_is_upd").format(ingesloten[0].disc_oms) + "\n" + insUpd.trackarray.concat(flextrack).join("\n"));
+ }
+ else if (savemode == "D")
+ {
+ var result = { success: true, savemode: savemode, warning: "" };
+ var sql = "";
+ var err;
+ for (var i = 0; i < ingesloten.length; i++)
+ {
+ sql = "DELETE FROM ins_deelsrtcontrole"
+ + " WHERE ins_deel_key = " + ingesloten[i].ins_key
+ + " AND ins_srtcontrole_key = " + ingesloten[i].srtcont_key
+ + " AND ins_deelsrtcontrole_status = 0"
+ + " AND ins_scenario_key = " + ingesloten[i].scen_key;
+
+ err = Oracle.Execute(sql, true);
+
+ if (err.friendlyMsg && result.success !== false)
{
result.warning = err.friendlyMsg;
result.success = false;
}
}
-
- var flextrack = [];
- // Alleen bij multi worden geen kenmerken opgeslagen. Verder altijd aangeroepen om wijzigingen op te slaan.
- if (!multi)
- flextrack = saveFlexKenmerkenInspection(ingesloten[0].dlsrtcont_key, insPresent);
-
- if (insPresent && ((insUpd && insUpd.trackarray.length) || flextrack.length))
- ins.trackinspectupdate(ingesloten[i].dlsrtcont_key, L("lcl_ins_controle_is_upd").format(ingesloten[0].disc_oms) + "\n" + insUpd.trackarray.concat(flextrack).join("\n"));
- }
-}
-else if (savemode == "E")
-{ // Wijzigen inspectie (Edit). Update van de gegevens (plandatum, opmerking en flexkenmerken).
- var result = { success: true, plandatum: plandatum, deelsrtcontrole_key: ingesloten[0].dlsrtcont_key, savemode: savemode, warning: "" };
- var isScenario = ingesloten[0].scen_key > 1;
-
- var mjobdelete = false;
- // Kunnen we het plan record verwijderen?
- // Het plan record van een scenario mogen we nooit verwijderen. Daar dan de plandatum leeg maken.
- if (mjob)
- { // Nieuwe plandatum vanuit het mjob scherm ontvangen.
- // Als er nog geen controles zijn en de plandatum is in hetzelfde jaar of eerder als de startdatum, dan moet het planrecord verwijderd worden.
- if (!hascontroles && ingesloten[0].startdatum != -1 && plandatum.getFullYear() <= ingesloten[0].startdatum.getFullYear())
- mjobdelete = true;
- else
- { // Als het jaar van de plandatum hetzelfde is als het jaar van de orginele datum, dan kan het plan record verwijderd worden.
-
- // Is het een mjob discipline en is de eenheid jaarlijks?
- sql = "SELECT cdp.ctr_disc_params_ismjob"
- + " , cdp.ctr_disc_params_controle_type"
- + " , isc.ins_srtcontrole_eenheid"
- + " FROM ins_srtcontrole isc"
- + " , ctr_disc_params cdp"
- + " WHERE isc.ctr_discipline_key = cdp.ctr_ins_discipline_key"
- + " AND isc.ins_srtcontrole_key = " + ingesloten[0].srtcont_key;
- oRs = Oracle.Execute(sql);
- var ismjob = !oRs.eof && oRs("ctr_disc_params_ismjob").Value == 1;
- var ctrcontroletype = oRs("ctr_disc_params_controle_type").Value; // Controle(1), Vervanging(2) en Certificering(3).
- var isjaarlijks = oRs("ins_srtcontrole_eenheid").Value == 4;
- oRs.Close();
-
- // Zijn er inspecties geweest voor dit object of is er een plandatum voor dit object ingevuld zodat we de volgende inspectiedatum kunnen berekenen?
- var sql = "SELECT ins_deelsrtcontrole_datum"
- + " FROM ins_deelsrtcontrole idsc"
- + " WHERE idsc.ins_srtcontrole_key = " + ingesloten[0].srtcont_key
- + " AND idsc.ins_deel_key = " + ingesloten[0].ins_key
- + " AND idsc.ins_scenario_key = " + ingesloten[0].scen_key
- + " AND idsc.ins_deelsrtcontrole_datum IS NOT NULL"; // Er is geinspecteerd.
- var oRs = Oracle.Execute(sql);
- var nextdate = null;
- if (!oRs.eof)
- { // Bereken de volgende orginele inspectiedatum (nextdate).
- sql = "SELECT ins.nextcyclusdate (" + ingesloten[0].ins_key
- + ", " + ingesloten[0].srtcont_key
- + ", " + ingesloten[0].scen_key
- + ", 1) nextdate FROM DUAL"
- var oRsN = Oracle.Execute(sql);
- nextdate = new Date(oRsN("nextdate").Value);
- oRsN.Close();
-
- // Is jaar plandatum gelijk aan jaar orginele datum?
- var plandatum_jaar = plandatum.getFullYear();
- var nextdate_jaar = nextdate.getFullYear();
-
- if (ismjob && isjaarlijks && plandatum_jaar == nextdate_jaar)
- { // Verwijder het inspectie record en ga verder met het volgende object.
- mjobdelete = true;
- }
- }
- //else Er zijn nog geen inspecties geweest voor dit object en er is nog geen plandatum voor dit object ingevuld.
- // Volgende inspectiedatum kun je niet berekenen met de functie ins.nextcyclusdate() en is dus onbekend (leeg)
- else
- { // Vindt het ins_srtcontrole_type.
- var sql = "SELECT ctr_disc_params_controle_type"
- + " FROM ins_srtcontrole isc,"
- + " ctr_disc_params cdp"
- + " WHERE ins_srtcontrole_key = " + ingesloten[0].srtcont_key
- + " AND isc.ctr_discipline_key = cdp.ctr_ins_discipline_key";
- var oRsN = Oracle.Execute(sql);
- var srtcontrole_type = oRsN("ctr_disc_params_controle_type").Value;
-
- var plandatum_jaar = plandatum.getFullYear();
- // De inspectiedatums voor taken die nog nooit een inspectie hebben gehad is voor een Vervanging(2) of Certificering(3)
- // n periodes verder dan de registratie/aanmaak datum van het object.
- // Voor een controle is er geen inspectiedatum en wordt er dan altijd "Eerste controle" in beeld getoond.
- // Ofwel een controle inspectie kun je direct vanaf het aanmaken van het object doen.
- // Voor controles(1):
- // - Als de planning in het mjb_freeze_year jaar is dan kan het inspectierecord verwijderd worden.
- // Voor Vervanging(2) en Certificering(3):
- // - Valt de laatste niet gedane inspectiedatum tussen of in het mjb_start_year en het mjb_freeze_year,
- // dan is mjb_freeze_year het inspectie jaar.
- // Als de planning dan in het inspectie jaar (mjb_freeze_year) is, dan kan het inspectierecord verwijderd worden.
- // - Valt de laatste niet gedane inspectiedatum NIET tussen of in het mjb_start_year en het mjb_freeze_year,
- // dan is de laatste niet gedane inspectiedatum + periode het inspectie jaar.
- // Als de planning dan in hetzelfde jaar als het inspectie jaar (laatste + periode) is, dan kan het inspectierecord verwijderd worden.
- if (ismjob && isjaarlijks)
- {
- if (srtcontrole_type == 1 && plandatum_jaar == S("mjb_freeze_year")) // Controles(1).
- mjobdelete = true;
- else if (srtcontrole_type == 2 || srtcontrole_type == 3) // Vervanging(2) of Certificering(3).
- { // Bereken de volgende inspectiedatum.
- // Alleen Active Situatie (AS) soort controle's kunnen gewijzigd worden dus voor scenario key moet 1 (of null) genomen worden.
- sql = "SELECT ins.nextcyclusdate (" + ingesloten[0].ins_key
- + " , " + ingesloten[0].srtcont_key
- + " , " + ingesloten[0].scen_key
- + " , 0) nextdate" // 1-ste vandaag of in de toekomst(0).
- + " , xcp.ins_srtcontrole_periode"
- + " FROM ins_v_defined_inspect_xcp xcp"
- + " WHERE xcp.ins_deel_key = " + ingesloten[0].ins_key
- + " AND xcp.ins_srtcontrole_key = " + ingesloten[0].srtcont_key
- + " AND xcp.ins_scenario_key = " + ingesloten[0].scen_key
- oRsN = Oracle.Execute(sql);
- var nextdate = new Date(oRsN("nextdate").Value);
- var nextdate_jaar = nextdate.getFullYear();
- var periode = oRsN("ins_srtcontrole_periode").Value
- var nextdate_jaar_before = nextdate_jaar - periode
-
- // Als nextdate_jaar_before of nextdate_jaar binnen mjb_start_year en mjb_freeze_year valt en de planning in het mjb_freeze_year jaar is
- // of
- // als nextdate_jaar_before voor het mjb_start_year jaar valt en nextdate_jaar na het mjb_freeze_year jaar
- // dan kan het inspectie record verwijderd worden.
- if ((((nextdate_jaar_before >= S("mjb_start_year") && nextdate_jaar_before <= S("mjb_freeze_year")) ||
- (nextdate_jaar >= S("mjb_start_year") && nextdate_jaar <= S("mjb_freeze_year"))) &&
- plandatum_jaar == S("mjb_freeze_year")) ||
- ((nextdate_jaar_before < S("mjb_start_year") && nextdate_jaar > S("mjb_freeze_year")) &&
- plandatum_jaar == nextdate_jaar)
- )
- mjobdelete = true;
- }
- }
- oRsN.Close();
- }
- oRs.Close();
- }
- }
-
- if (mjobdelete && !isScenario)
- { // Verwijder het inspectie record.
- var sql = "DELETE FROM ins_deelsrtcontrole"
- + " WHERE ins_deel_key = " + ingesloten[0].ins_key
- + " AND ins_srtcontrole_key = " + ingesloten[0].srtcont_key
- + " AND ins_deelsrtcontrole_status = 0"
- + " AND ins_scenario_key = " + ingesloten[0].scen_key;
- var err = Oracle.Execute(sql, true);
- }
- else
- {
- var fields = [ { dbs: "ins_deelsrtcontrole_opmerking", typ: "varchar", frm: "opmerk", track: L("lcl_remark"), len: 4000 }
- ];
-
- if (isScenario && mjobdelete)
- fields.push( { dbs: "ins_deelsrtcontrole_plandatum", typ: "datetime", val: "", track: L("lcl_opdr_plandate") } );
- else if (mjob)
- fields.push( { dbs: "ins_deelsrtcontrole_plandatum", typ: "datetime", val: plandatum, track: L("lcl_opdr_plandate") } );
- else // Periodieke taken.
- fields.push( { dbs: "ins_deelsrtcontrole_plandatum", typ: "datetime", frm: "plandatum", track: L("lcl_opdr_plandate") } );
-
- if (getDeelsrtcontroleDate)
- fields.push( { dbs: "ins_deelsrtcontrole_datum", typ: "datetime", val: deelsrtcontrole_datum, track: L("lcl_ins_controle_datum") } );
-
- if (canMsuEdit)
- fields.push( { dbs: "ins_controlemode_key", typ: "key", frm: "sel_controlemode", track: L("lcl_ins_controle_mode"), foreign: "ins_controlemode" } );
-
- var insUpd = buildTrackingUpdate("ins_deelsrtcontrole", " ins_deelsrtcontrole_key = " + ingesloten[0].dlsrtcont_key, fields);
- var err = Oracle.Execute(insUpd.sql, true);
- }
-
- if (err.friendlyMsg)
- {
- result.warning = err.friendlyMsg;
- result.success = false;
- }
-
- var flextrack = saveFlexKenmerkenInspection(ingesloten[0].dlsrtcont_key, insPresent, mjobdelete);
-
- if ((!mjobdelete || (isScenario && mjobdelete)) && (insUpd.trackarray.length || flextrack.length))
- ins.trackinspectupdate(ingesloten[0].dlsrtcont_key, L("lcl_ins_controle_is_upd").format(ingesloten[0].disc_oms) + "\n" + insUpd.trackarray.concat(flextrack).join("\n"));
-}
-else if (savemode == "D")
-{
- var result = { success: true, savemode: savemode, warning: "" };
- var sql = "";
- var err;
- for (var i = 0; i < ingesloten.length; i++)
- {
- sql = "DELETE FROM ins_deelsrtcontrole"
- + " WHERE ins_deel_key = " + ingesloten[i].ins_key
- + " AND ins_srtcontrole_key = " + ingesloten[i].srtcont_key
- + " AND ins_deelsrtcontrole_status = 0"
- + " AND ins_scenario_key = " + ingesloten[i].scen_key;
-
- err = Oracle.Execute(sql, true);
-
- if (err.friendlyMsg && result.success !== false)
- {
- result.warning = err.friendlyMsg;
- result.success = false;
- }
}
}
Response.Write(JSON.stringify(result));
-Response.End();
%>
\ No newline at end of file
diff --git a/APPL/INS/ins_inspect_start.asp b/APPL/INS/ins_inspect_start.asp
index 48bf8ec10c..ae96e0970f 100644
--- a/APPL/INS/ins_inspect_start.asp
+++ b/APPL/INS/ins_inspect_start.asp
@@ -61,7 +61,7 @@ if (groupby < 7)
var mjbXcped = getFParamInt("mjbXcped", 0) == 1; // Aangepast.
// Start building the query to fetch all objects satisfying
- var mjbparams = { niveau: groupby,
+ var mjbparams = { niveau: groupby, // Het niveau (betekenis) van de keys (district(1), gebouw(2), discipline(3), groep(4), objectsoort(5), object(6))
keys: ins_key_arr,
scenario: 1,
fulldetails: true,
@@ -78,114 +78,20 @@ if (groupby < 7)
frequentie: frequentie,
incbtw: incbtw,
toyear: mjb_freeze_year,
- groupby: 7,
+ groupby: 7, // Ik wil alle objecten opvragen.
deel: deel,
mjbMoved: mjbMoved,
mjbFreezed: mjbFreezed,
mjbXcped: mjbXcped,
- jaren: [mjb_freeze_year]
+ jaren: [mjb_freeze_year],
+ freeze: true
};
var mjblist_sql = ins.getmjblist_sql(mjbparams);
- // De mjblist_sql bevat nu alle objecten (ins_deel_key) van de aangevink regels uit het mjb overzicht.
-
- var sql = "SELECT xcp.ins_deel_key"
- + " , xcp.ins_srtcontrole_key"
- + " , result.ins_deelsrtcontrole_status"
- + " , " + user_key
- + " , CASE"
- + " WHEN result.ins_deelsrtcontrole_status IS NOT NULL"
- + " THEN (SELECT ins.nextcyclusdate (xcp.ins_deel_key, xcp.ins_srtcontrole_key, 1, 1) FROM DUAL)"
- + " ELSE NULL"
- + " END nextdate"
- + " , result.\"" + mjb_freeze_year + "\" bedrag"
- + " , TRUNC(TO_DATE(TO_CHAR(SYSDATE, 'DD-MON') || '-" + mjb_freeze_year + "', 'DD-MON-YYYY'), 'YEAR') freez_date"
- + " , CASE"
- + " WHEN result.\"" + mjb_freeze_year + "\" = 0 AND result.\"" + mjb_freeze_year + "_ORGBEDRAG\" IS NOT NULL AND result.\"" + mjb_freeze_year + "_ORGBEDRAG\" > 0"
- + " THEN " + safe.quoted_sql(L("lcl_mjb_performed_high"))
- + " ELSE ''"
- + " END opm_has_higherprio" // Opmerking als het een hogere prio heeft (has_higherprio)
- + " FROM ins_v_defined_inspect_xcp xcp"
- + " , ins_v_aanwezigdeel dl"
- + " , ins_srtdeel isd"
- + " , ins_srtgroep isg"
- + " , ins_discipline dd"
- + " , alg_district d"
- + " , alg_locatie l"
- + " , alg_gebouw g"
- + " , alg_verdieping v"
- + " , alg_ruimte r"
- + " , (" + mjblist_sql + ") result"
- + " WHERE xcp.ins_deel_key = dl.ins_deel_key"
- + " AND dl.ins_srtdeel_key = isd.ins_srtdeel_key"
- + " AND isd.ins_srtgroep_key = isg.ins_srtgroep_key"
- + " AND isg.ins_discipline_key = dd.ins_discipline_key"
- + " AND dl.ins_alg_ruimte_key = r.alg_ruimte_key"
- + " AND r.alg_verdieping_key = v.alg_verdieping_key"
- + " AND v.alg_gebouw_key = g.alg_gebouw_key"
- + " AND g.alg_locatie_key = l.alg_locatie_key"
- + " AND d.alg_district_key = l.alg_district_key"
- + " AND xcp.ins_deel_key = result.ins_deel_key"
- + " AND xcp.ins_srtcontrole_key = result.ins_srtcontrole_key"
- // Autorisatie:
- // Nu nog even checken of je mag accoderen (Freeze). Stuk voor stuk duurt veel te lang.
- // 0) invoerAfterNext is voor mjob (interval modus) altijd waar.
- // 1) niet vervallen.
- // 2) status <= 0 of status == 6
- // 3) actief object
- // 4) hasCTRwrite
- // 5) bij instelling "Actieve acties" het vinkje "Starten" aangevinkt.
- // 6) geen scenario (scenario_key is 1)
- // 7) ismjob
- // 8) isFreezeYear
- // 9) readuse rechten.
- + " AND (xcp.ins_srtcontroledl_xcp_eind IS NULL OR xcp.ins_srtcontroledl_xcp_eind >= SYSDATE)" // 1) Niet vervallen.
- + " AND (EXISTS" // 2) Geen controles of laatste controle status 6.
- + " (SELECT idsc1.ins_deelsrtcontrole_status"
- + " FROM ins_deelsrtcontrole idsc1"
- + " WHERE idsc1.ins_deelsrtcontrole_key = (SELECT MAX(idsc2.ins_deelsrtcontrole_key)"
- + " FROM ins_deelsrtcontrole idsc2"
- + " WHERE idsc2.ins_deel_key = xcp.ins_deel_key"
- + " AND idsc2.ins_srtcontrole_key = xcp.ins_srtcontrole_key"
- + " AND idsc2.ins_scenario_key = xcp.ins_scenario_key)"
- + " AND idsc1.ins_deelsrtcontrole_status IN (0, 6))"
- + " OR NOT EXISTS"
- + " (SELECT idsc2.ins_deelsrtcontrole_key"
- + " FROM ins_deelsrtcontrole idsc2"
- + " WHERE idsc2.ins_deel_key = xcp.ins_deel_key"
- + " AND idsc2.ins_srtcontrole_key = xcp.ins_srtcontrole_key"
- + " AND idsc2.ins_scenario_key = xcp.ins_scenario_key))"
- + " AND ins_deel_actief = 1" // 3) Actief object.
- + " AND xcp.ctr_discipline_key IN (SELECT w.ins_discipline_key" // 4) hasCTRwrite.
- + " FROM fac_v_webgebruiker w"
- + " , fac_functie f"
- + " WHERE w.fac_functie_key = f.fac_functie_key"
- + " AND f.fac_functie_code = 'WEB_CTRUSE'"
- + " AND w.fac_gebruiker_prs_level_write < 9"
- + " AND w.fac_gebruiker_alg_level_write < 9"
- + " AND w.prs_perslid_key = " + user_key + ")"
- + " AND BITAND(xcp.ins_srtcontrole_options, 2) = 2" // 5) Het vinkje "Starten" aangevinkt.
- + " AND xcp.ins_scenario_key = 1" // 6) Geen scenario.
- + " AND xcp.ctr_ismjob = 1" // 7) ismjob.
- + " AND result.\"" + mjb_freeze_year + "\" IS NOT NULL"; // 8) isFreezeYear, bedrag in mjb_freeze_year is niet NULL.
-
- sql = discxalg3d(sql, // 9) 3D-readuse rechten.
- "dd.ins_discipline_key",
- "d.alg_regio_key",
- "d.alg_district_key",
- "l.alg_locatie_key",
- "g.alg_gebouw_key",
- "v.alg_verdieping_key",
- "r.alg_ruimte_key",
- "WEB_INSUSE", //autfunction,
- "",
- false); // forwrite => read
-
- sql += " ORDER BY xcp.ins_deel_key"
- + " , xcp.ins_srtcontrole_key";
+ // De mjblist_sql bevat nu alle objecten (ins_deel_key) van de aangevinkte regels uit het mjb overzicht en levert voor elk object de waarden voor de insert op.
var result = {success: true, multi: multi, start: true };
- var oRs = Oracle.Execute(sql);
+ var oRs = Oracle.Execute(mjblist_sql);
user.anything_todo_or_abort(!oRs.eof); // We klagen niet over enkele wel en enkele niet
var insert_sql = "BEGIN ";
@@ -195,7 +101,7 @@ if (groupby < 7)
var srtcont_key = oRs("ins_srtcontrole_key").Value;
var nextdate = oRs("nextdate").Value != null? new Date(oRs("nextdate").Value) : null;
var inspstatus = oRs("ins_deelsrtcontrole_status").Value;
- var kosten = oRs("bedrag").Value;
+ var kosten = oRs("freeze_bedrag").Value;
var opm_has_higherprio = oRs("opm_has_higherprio").Value;
ingesloten.push({ins_key: ins_key, srtcont_key: srtcont_key, dlsrtcont_key: -1,
inspectiestatus: inspstatus, kosten: kosten, ismjob: true});
@@ -229,7 +135,7 @@ if (groupby < 7)
var err = Oracle.Execute(insert_sql, true);
if (err.friendlyMsg)
- result.message = err.friendlyMsg
+ result.message = err.friendlyMsg;
for (var i = 0; i < ingesloten.length; i++)
{
diff --git a/APPL/INS/ins_list.js b/APPL/INS/ins_list.js
index 6855db384b..2f013fe791 100644
--- a/APPL/INS/ins_list.js
+++ b/APPL/INS/ins_list.js
@@ -314,8 +314,11 @@ function insClose(rowArray, isMulti, fromfinish)
// Scenario's kunnen niet gestart worden. Hier de scenario's er al uit filteren.
if (!rowdata.insScenKey || rowdata.insScenKey == 1)
{ // Het is geen scenario. De periodieke taak kan gestart worden. De inspectie aan het array toevoegen.
- srtcontrolekeyArray[i - deleted] = rowdata.insSrtControleKey;
- deelsrtcontrkeyArray[i - deleted] = rowdata.insDeelSrtContrKey;
+ if (groupby == 7)
+ {
+ srtcontrolekeyArray[i - deleted] = rowdata.insSrtControleKey;
+ deelsrtcontrkeyArray[i - deleted] = rowdata.insDeelSrtContrKey;
+ }
}
else
{ // Het is een scenario. De ins_key verwijderen uit de lijst.
@@ -336,7 +339,24 @@ function insClose(rowArray, isMulti, fromfinish)
+ "&deelsrtcont_keys=" + deelsrtcontrkeyArray.join(",")
+ (fromfinish
? "&fromfinish=1"
- : "");
+ : "")
+ + "&dist_key=" + dist_key
+ + "&loc_key=" + loc_key
+ + "&bld_key=" + bld_key
+ + "&disc_key=" + disc_key
+ + "&srtgroep_key=" + srtgroep_key
+ + "&srtdeel_key=" + srtdeel_key
+ + "&groep=" + groep
+ + "&categorie_key=" + categorie_key
+ + "&srtcontrole=" + srtcontrole
+ + "&frequentie=" + frequentie
+ + "&incbtw=" + incbtw
+ + "&groupby=" + groupby
+ + "&deel=" + deel
+ + "&actsit=" +
+ + "&mjbMoved=" + mjbMoved
+ + "&mjbFreezed=" + mjbFreezed
+ + "&mjbXcped=" + mjbXcped;
FcltMgr.openDetail(url, L("lcl_ins_stop"));
}
@@ -358,7 +378,8 @@ function insFinish(rowArray, isMulti)
// Scenario's kunnen niet gestart worden. Hier de scenario's er al uit filteren.
if (!rowdata.insScenKey || rowdata.insScenKey == 1)
{ // Het is geen scenario. De periodieke taak kan gestart worden. De inspectie aan het array toevoegen.
- deelsrtcontrkeyArray[i - deleted] = rowdata.insDeelSrtContrKey;
+ if (groupby == 7)
+ deelsrtcontrkeyArray[i - deleted] = rowdata.insDeelSrtContrKey;
isc_status = rowdata.ins_status;
mustClose = mustClose || (isc_status != 5);
}
diff --git a/APPL/INS/ins_search.asp b/APPL/INS/ins_search.asp
index 4099bdb550..8bc1f2c45f 100644
--- a/APPL/INS/ins_search.asp
+++ b/APPL/INS/ins_search.asp
@@ -117,7 +117,7 @@ var authparams = user.checkAutorisation(autfunction);
$("form[name=u2]").attr("action", "ins_search_list.asp");
}
<% } %>
-<% if (backo)
+<% if (fronto || backo)
{ %>
// Submitten met kenmerken
doSubmitWithKenmerken();
@@ -140,7 +140,7 @@ var authparams = user.checkAutorisation(autfunction);
return -1;
};
-<% if (backo)
+<% if (fronto || backo)
{ %>
function myModal()
{
@@ -664,10 +664,11 @@ var authparams = user.checkAutorisation(autfunction);
var buttons = [{title: L("lcl_search"), action: "doSubmit()" }];
if (backo)
- {
buttons.push ( {title: L("lcl_shared_more"), action:"iface_toggleSecondarySearchblock()", id : "btnMoreLess" } );
+
+ if (fronto || backo)
buttons.push ( {title: L("lcl_obj_advanced"), action:"myModal()", id: "btnAdvanced", xclass: "noxd" } );
- }
+
CreateButtons(buttons, { entersubmit: true} );
%>
diff --git a/APPL/INS/ins_show_deel.asp b/APPL/INS/ins_show_deel.asp
index 0aa1fdc926..c90b76e943 100644
--- a/APPL/INS/ins_show_deel.asp
+++ b/APPL/INS/ins_show_deel.asp
@@ -281,7 +281,7 @@ oRs.Close();
}
var buttons = [ ];
- if (this_ins.canChangeOwn)
+ if (this_ins.canChange || this_ins.canChangeOwn)
buttons.push({title: L("lcl_change"), action: "ins_change()", icon: "wijzigen.png" });
if (canMelding)
diff --git a/APPL/MGT/ctr_scenario.asp b/APPL/MGT/ctr_scenario.asp
index fb54bf3038..7f3bb7b286 100644
--- a/APPL/MGT/ctr_scenario.asp
+++ b/APPL/MGT/ctr_scenario.asp
@@ -36,8 +36,8 @@ scaffolding(this_model,
"modal": true,
requires: { js: ["./ctr_scenario.js"] },
no_clone: S("fac_usrrap_mode") != 1,
- buttons: [{ title: L("lcl_mjb_inst_scen"), action: "commit_scenario", icon: "plus.png" },
- { title: L("lcl_mjb_copy_current"), action: "copy_current", icon: "delete.png" }]
+ buttons: [{ title: L("lcl_mjb_inst_scen"), action: "commit_scenario", icon: "doorvoeren.png" },
+ { title: L("lcl_mjb_copy_current"), action: "copy_current", icon: "copy.png" }]
}
});
%>
diff --git a/APPL/MJB/mjb_incl_scen_save.asp b/APPL/MJB/mjb_incl_scen_save.asp
index 52a76feb36..e516b4b9a4 100644
--- a/APPL/MJB/mjb_incl_scen_save.asp
+++ b/APPL/MJB/mjb_incl_scen_save.asp
@@ -30,9 +30,21 @@ var scen_key = getFParamInt("scenario");
var totalcopy = getFParamInt("totalcopy", 0) == 1;
if (totalcopy)
{ // 1 Willekeurig object en controle ophalen om straks 1 maal de rechten te checken en in 1 keer een copie te maken van alle controles.
+ // Alleen kijken naar 1) MJOB objecten.
+ // 2) de taakcategorieën die CTRUSE schrijf rechten hebben.
+ // Level of 3D authorization is 3: 3 = Read and Write separately authorizable (Ja/Nee).
var sql = "SELECT ins_deel_key"
+ " , ins_srtcontrole_key"
+ " FROM ins_v_defined_inspect di"
+ + " WHERE di.ctr_ismjob = 1"
+ + " AND EXISTS (SELECT 1"
+ + " FROM fac_v_webgebruiker w"
+ + " , fac_functie f"
+ + " WHERE w.prs_perslid_key = " + user_key
+ + " AND w.fac_functie_key = f.fac_functie_key"
+ + " AND ins_discipline_key = di.ctr_discipline_key"
+ + " AND fac_gebruiker_alg_level_write = -1"
+ + " AND fac_functie_code = 'WEB_CTRUSE')"
+ " ORDER BY ins_deel_key DESC"
var oRs = Oracle.Execute(sql);
var ins_key_arr = [oRs("ins_deel_key").Value];
@@ -107,7 +119,11 @@ result.scen_key = scen_key;
for (var i = 0; i < ingesloten.length; i++)
{ // Toevoegen van de taak voor het object aan het (nieuwe) scenario.
- // Als totalcopy dan wordt de for lus 1 maal doorlopen en worden alle controles in 1 keer aangemaakt.
+ // Alleen MJOB objecten.
+ // Als totalcopy:
+ // - dan wordt de for lus 1 maal doorlopen en worden alle controles in 1 keer aangemaakt.
+ // - dan alleen kijken naar de taakcategorieën die CTRUSE schrijf rechten hebben.
+ // Level of 3D authorization is 3: 3 = Read and Write separately authorizable (Ja/Nee).
sql = "INSERT INTO ins_srtcontroledl_xcp (ins_srtcontroledl_xcp_key"
+ " , ins_deel_key"
+ " , ins_srtcontrole_key"
@@ -151,7 +167,14 @@ for (var i = 0; i < ingesloten.length; i++)
+ (!totalcopy
? " AND ins_deel_key = " + ingesloten[i].ins_key
+ " AND ins_srtcontrole_key = " + ingesloten[i].srtcont_key
- : "")
+ : " AND EXISTS (SELECT 1"
+ + " FROM fac_v_webgebruiker w"
+ + " , fac_functie f"
+ + " WHERE w.prs_perslid_key = " + user_key
+ + " AND w.fac_functie_key = f.fac_functie_key"
+ + " AND ins_discipline_key = ctr_discipline_key"
+ + " AND fac_gebruiker_alg_level_write = -1"
+ + " AND fac_functie_code = 'WEB_CTRUSE')")
+ " AND ins_scenario_key = 1"
+ " AND ctr_ismjob = 1"
diff --git a/APPL/MJB/mjb_search_list.asp b/APPL/MJB/mjb_search_list.asp
index 247ec3103c..c046eea608 100644
--- a/APPL/MJB/mjb_search_list.asp
+++ b/APPL/MJB/mjb_search_list.asp
@@ -122,6 +122,7 @@ var transitParam = buildTransitParam(["disc", "srtgroep", "srtdeel", "srtcontrol
%>
diff --git a/APPL/RES/res_search_plan_room.asp b/APPL/RES/res_search_plan_room.asp
index 4a47c205d7..23dd0da4f0 100644
--- a/APPL/RES/res_search_plan_room.asp
+++ b/APPL/RES/res_search_plan_room.asp
@@ -234,7 +234,10 @@ hour_px = res.hour_px(width_px - 400, nr_days);
//axis: "xy"
});
});
- $("#btnchange").html(L("lcl_res_edit_inplanbord"));
+ $("#btnchange").html(L("lcl_res_edit_inplanbord"))
+ .addClass("noHover")
+ .removeClass("btn_disabled"); // Remove disabled CSS
+ return true; // But keep button onClick disabled
}
<% if (autosearch && samedate)
{ %>
diff --git a/APPL/SCF/scaffolding_show.inc b/APPL/SCF/scaffolding_show.inc
index 21e1f9f234..a8e43034aa 100644
--- a/APPL/SCF/scaffolding_show.inc
+++ b/APPL/SCF/scaffolding_show.inc
@@ -144,6 +144,8 @@ function scaffolding_show(model, scf_params)
var cnt = oRs(0).Value;
oRs.Close();
}
+ if ("hook_pre_show" in model)
+ model.hook_pre_show(xxx_data, model.fields);
if ("hook_pre_show" in model)
model.hook_pre_show(xxx_data, model.fields, scf_params);
diff --git a/APPL/Shared/default.csx b/APPL/Shared/default.csx
index f0dd8be572..7a7a4c416c 100644
--- a/APPL/Shared/default.csx
+++ b/APPL/Shared/default.csx
@@ -1355,6 +1355,12 @@ div.buttoncontainer {
text-decoration: none;
}
+#buttons ul li.hasIcon.noHover:hover {
+ cursor: default;
+ color: ==buttoncolor==;
+ background-color:==iconbackgroundcolor==;
+}
+
.btn_disabled
{
opacity: 0.6;
diff --git a/APPL/Shared/default.inc b/APPL/Shared/default.inc
index 413e951ab6..e618038b4a 100644
--- a/APPL/Shared/default.inc
+++ b/APPL/Shared/default.inc
@@ -9,7 +9,7 @@
Note: Sinds 5.2.2 zitten de settings in de database
*/
-var FCLTVersion="2017.2a";
+var FCLTVersion="2017.2b";
var FCLTMinDatabaseSchema="32";
var custpath = rooturl + "/cust/" + customerId; // path to customer files
diff --git a/APPL/Shared/empty.asp b/APPL/Shared/empty.asp
index c13938d371..593da373a3 100644
--- a/APPL/Shared/empty.asp
+++ b/APPL/Shared/empty.asp
@@ -9,6 +9,7 @@
<%
if (Request.QueryString.Count == 0)
{
+ var ANONYMOUS_Allowed = 1;
FCLTEXPIRES = 8*60; // geen database interactie tenslotte
LCL_Disable = 1;
}
diff --git a/APPL/Shared/resultset_table_v2.inc b/APPL/Shared/resultset_table_v2.inc
index 12862d1a12..d9cccc6813 100644
--- a/APPL/Shared/resultset_table_v2.inc
+++ b/APPL/Shared/resultset_table_v2.inc
@@ -797,6 +797,12 @@ function __rsProcessResultset(processParams) // processParams wordt blind aan al
(cnt < S("qp_maxrows2") || isExcel) && // Naar excel altijd alle regels (meer dan S("qp_maxrows2")) weergeven.
!oRs.EOF; cnt++)
{
+ if (!Response.IsClientConnected)
+ {
+ __Log("Response.IsClientConnected false, Resultset aborted.", "#00FF00");
+ Response.End;
+ }
+
var oRsFlex = null;
if ((isPrinting || isExcel || showProperties) && this.printFlex)
{
diff --git a/CUST/AAIT/xsl/AAIT.xsl b/CUST/AAIT/xsl/AAIT.xsl
index 90e231d8d4..238cbdd3c1 100644
--- a/CUST/AAIT/xsl/AAIT.xsl
+++ b/CUST/AAIT/xsl/AAIT.xsl
@@ -35,7 +35,7 @@
-
+
@@ -285,17 +285,17 @@
|
- Afhandeling melding :
- |
+ Afhandeling melding :
+
- |
+
-
+
@@ -326,11 +326,11 @@
-
+
diff --git a/CUST/MARX/xsl/REMS_GetOpdrachten.xsl b/CUST/MARX/xsl/REMS_GetOpdrachten.xsl
new file mode 100644
index 0000000000..f2451c7c32
--- /dev/null
+++ b/CUST/MARX/xsl/REMS_GetOpdrachten.xsl
@@ -0,0 +1,168 @@
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+exec_code;ax_supplier_id;mld_melding_externnr;mld_melding_omschrijving;prs_afdeling_externnr;mld_opdr_po_companyid;mld_opdr_opzichter;mld_melding_cust_name;mld_melding_cust_straat;mld_melding_cust_huisnr;mld_melding_cust_huisnr2;mld_melding_cust_postcode;mld_melding_cust_plaats;mld_melding_cust_telefoonnr;mld_melding_cust_mobielnr;mld_melding_cust_email;mld_melding_cust_object_omschr;complexnummer;pandnummer;VGEnummer;mld_melding_memo;mld_opdr_externnr;mld_opdr_ordernr;mld_opdr_datumbegin;mld_opdr_datum_plan;mld_opdr_einddatum;mld_opdr_mat_linenr;mld_opdr_mat_code;mld_opdr_mat_naam;mld_opdr_mat_eenheidcode;mld_opdr_mat_eenheid;mld_opdr_mat_prijs;mld_opdr_mat_aantal;mld_opdr_mat_btwperc;mld_opdr_mat_totaal
+1;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+2;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+
+
+
+
+
+
+
+
+
+
+
+
+""
+
+
+
+
+ ""
+
+
+
+
+
+
+
+
+
+ @@
+
+
+
+
+
+
+
+
+
+ @@
+
+
+
+
+
+ @@
+ 3000
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+ __
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+ -1
+
+
+
+
+
+
+
+
+
+
+
+
+
+ 21
+ 6
+ 0
+
+
+
+
+
+
\ No newline at end of file
diff --git a/CUST/NYBU/xsl/verhuur.xsl b/CUST/NYBU/xsl/verhuur.xsl
index fe64241683..cfaccae1de 100644
--- a/CUST/NYBU/xsl/verhuur.xsl
+++ b/CUST/NYBU/xsl/verhuur.xsl
@@ -143,7 +143,7 @@
You need to be present at this time to personally hand in your keys to our Services team.
- When certain data is incorrect or has not reached us yet (possible blanks above) or you would like to change the date/time of the room check, please inform us as soon as possible. Also don’t forget to submit your new address to program management.
+ When certain data is incorrect or has not reached us yet (possible blanks above) or you would like to change the date/time of the room check, please inform us as soon as possible. Also don’t forget to submit your new address to program management.
Ten weeks after the room check you will receive a final invoice at the forwarding address. On this invoice we will calculate rent, deposit, final cleaning and damages if applicable.
@@ -195,8 +195,8 @@
The room is , and is located in the building on floor .
The postal address is Nieuw Nyenrode
-
- , Breukelen.
+
+ , Breukelen.
Attached to this e-mail you will find more information about the room that can help you prepare for your stay.
@@ -244,7 +244,7 @@
|
+ 
+ 
+ 
-