From 1f0ce1503403fd0e3a538b7772aeaa8e1b74fe5e Mon Sep 17 00:00:00 2001 From: Jos Groot Lipman Date: Mon, 16 Oct 2017 09:23:24 +0000 Subject: [PATCH 01/16] FSN#44507: (PDA) Bijlagen toevoegen herzien: (nog) even niet aanklikbaar omdat je niet terug kunt svn path=/Website/branches/v2017.2/; revision=35702 --- APPL/Shared/kenmerk_common.inc | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/APPL/Shared/kenmerk_common.inc b/APPL/Shared/kenmerk_common.inc index 00f9925258..f47f07bd7f 100644 --- a/APPL/Shared/kenmerk_common.inc +++ b/APPL/Shared/kenmerk_common.inc @@ -916,8 +916,9 @@ function listKenmerk(sql, module, key, props) for (var i = 0; i < lijst.length; i++) { var href = HTTP.urlzelfnoroot() + protectQS.create(OpenFlexFile(module, niveau, key, kkey, lijst[i])); - var html = '' + safe.html(lijst[i]) + ''; +// var html = '' + safe.html(lijst[i]) + ''; + var html = safe.html(lijst[i]); // even niet klikbaar, in de app kun je niet terug dan. filehtmlarr.push(html); } var kv = filehtmlarr.join("
"); From db0bd422ad4a23a28c91f441c9471b85a9abf9b0 Mon Sep 17 00:00:00 2001 From: Dennis Hartmann Date: Mon, 16 Oct 2017 09:27:54 +0000 Subject: [PATCH 02/16] HOUT#46227 - prijs_info op 1 gezet. svn path=/Website/branches/v2017.2/; revision=35703 --- CUST/HOUT/xsl/HOUT.xsl | 114 ++++++++++++++++++++--------------------- 1 file changed, 57 insertions(+), 57 deletions(-) diff --git a/CUST/HOUT/xsl/HOUT.xsl b/CUST/HOUT/xsl/HOUT.xsl index 4212a8adcf..f46cd95be7 100644 --- a/CUST/HOUT/xsl/HOUT.xsl +++ b/CUST/HOUT/xsl/HOUT.xsl @@ -5,7 +5,7 @@ - + @@ -32,7 +32,7 @@ - + @@ -61,7 +61,7 @@
- + @@ -69,7 +69,7 @@ - + @@ -95,7 +95,7 @@ - + @@ -106,7 +106,7 @@ + @@ -119,30 +119,30 @@ - - + - - + + - + - + @@ -169,12 +169,12 @@ as defined in our General Terms and Conditions.
  () - + - + @@ -184,8 +184,8 @@ as defined in our General Terms and Conditions.
- - + + @@ -196,8 +196,8 @@ as defined in our General Terms and Conditions.
- + + @@ -209,11 +209,11 @@ as defined in our General Terms and Conditions.
- + - + + @@ -230,7 +230,7 @@ as defined in our General Terms and Conditions.
() - + @@ -245,7 +245,7 @@ as defined in our General Terms and Conditions.
- + @@ -253,7 +253,7 @@ as defined in our General Terms and Conditions.
- - + - + + @@ -288,7 +288,7 @@ as defined in our General Terms and Conditions.
 + - + + + @@ -372,7 +372,7 @@ as defined in our General Terms and Conditions.
font-weight: bold; text-decoration: none; padding-bottom: 2px; - padding-top: 2px; + padding-top: 2px; } @@ -405,19 +405,19 @@ as defined in our General Terms and Conditions.
 - + + - + @@ -440,8 +440,8 @@ as defined in our General Terms and Conditions.
NormaalLaag - - + + @@ -456,7 +456,7 @@ as defined in our General Terms and Conditions.
+ @@ -468,21 +468,21 @@ as defined in our General Terms and Conditions.
- + + - + + - +
Startdatum:
Behandelaar:
-
Aanvrager:
Omschrijving: +
Afhandeling: +
-
**********************************************************************
This communication is sent to you from Houthoff Buruma Coöperatief U.A. This e-mail and its contents @@ -157,7 +157,7 @@ as defined in our General Terms and Conditions.
**********************************************************************
Bonnummer:
Datum:
-
Behandelaar:
-
Melding van:
Telefoon:
Vakgroep:
Melding: @@ -261,8 +261,8 @@ as defined in our General Terms and Conditions.
 - -
-
Uiterlijk gereed/geleverd: @@ -306,8 +306,8 @@ as defined in our General Terms and Conditions.
-
@@ -317,7 +317,7 @@ as defined in our General Terms and Conditions.
-
Naam:
Datum:
-
Gemeld door:
Naam:Naam:
-
Uitvoeren:
-
Afhandeling:
-
**********************************************************************
@@ -490,7 +490,7 @@ This communication is sent to you from Houthoff Buruma Coöperatief U.A. This e- **********************************************************************
@@ -1026,7 +1026,7 @@ This communication is sent to you from Houthoff Buruma Coöperatief U.A. This e- - + @@ -1069,7 +1069,7 @@ This communication is sent to you from Houthoff Buruma Coöperatief U.A. This e- - + @@ -1131,7 +1131,7 @@ This communication is sent to you from Houthoff Buruma Coöperatief U.A. This e- - +

@@ -1179,7 +1179,7 @@ This communication is sent to you from Houthoff Buruma Coöperatief U.A. This e-
  -
+
@@ -1257,15 +1257,15 @@ This communication is sent to you from Houthoff Buruma Coöperatief U.A. This e-
- + - + - +
- + @@ -1283,7 +1283,7 @@ This communication is sent to you from Houthoff Buruma Coöperatief U.A. This e- - + @@ -1300,8 +1300,8 @@ This communication is sent to you from Houthoff Buruma Coöperatief U.A. This e- - - + + @@ -1314,7 +1314,7 @@ This communication is sent to you from Houthoff Buruma Coöperatief U.A. This e- - + @@ -1345,11 +1345,11 @@ This communication is sent to you from Houthoff Buruma Coöperatief U.A. This e- +
@@ -1275,7 +1275,7 @@ This communication is sent to you from Houthoff Buruma Coöperatief U.A. This e-
Projectnr Projectomschrijving ProjectmanagerAdviseurAdviseur Opdrachtgever Startdatum Einddatum X -
- + From 5c7eef90a6d818a0d7702de8bf165362a41e1a62 Mon Sep 17 00:00:00 2001 From: Peter Feij Date: Mon, 16 Oct 2017 09:39:46 +0000 Subject: [PATCH 03/16] FSN#40747 Paden tbv app svn path=/Website/branches/v2017.2/; revision=35704 --- APPL/PDA/order.asp | 60 ++++++++++++++++++++++++++-------------------- 1 file changed, 34 insertions(+), 26 deletions(-) diff --git a/APPL/PDA/order.asp b/APPL/PDA/order.asp index df2c005eb5..76a1bf7ebc 100644 --- a/APPL/PDA/order.asp +++ b/APPL/PDA/order.asp @@ -22,9 +22,9 @@ var LOCKED_USER_OK = { "xmlnode": "opdracht", "key": opdr_key }; <% -FCLTHeader.Requires({ js: ["./modernizr-3.3.0.custom.min.js"] }); +FCLTHeader.Requires({ js: [rooturl+"/appl/pda/modernizr-3.3.0.custom.min.js"] }); FCLTHeader.Requires({ plugins: ["suggest"] - , js: ["../mld/mld_edit_opdr.js", "jquery.timepicker-table.js"], + , js: [rooturl+"/appl/mld/mld_edit_opdr.js", "jquery.timepicker-table.js"], css: ["timePicker-table.css"]}); var mld_key = getQParamInt("mld_key", -1); @@ -142,7 +142,7 @@ else var data = { opdr_key: <%=opdr_key%> }; <% protectRequest.dataToken("data"); %> - $.post( "../mld/opdr_goedkeur.asp" + $.post( "<%=rooturl%>/appl/mld/opdr_goedkeur.asp" , data , McltCallbackAndThenAlways(opdr_action_callback) , "json" @@ -157,7 +157,7 @@ else var data = { opdr_key: <%=opdr_key%> }; <% protectRequest.dataToken("data"); %> - $.post( "../mld/opdr_approve.asp" + $.post( "<%=rooturl%>/appl/mld/opdr_approve.asp" , data , McltCallbackAndThenAlways(opdr_action_callback) , "json" @@ -175,7 +175,7 @@ else var data = { opdr_key: <%=opdr_key%>, hltactive: activeopdr_key > 0? 1 : 0 }; // Onderbreek de actieve opdracht. <% protectRequest.dataToken("data"); %> - $.post( "../mld/opdr_accept.asp", + $.post( "<%=rooturl%>/appl/mld/opdr_accept.asp", data, McltCallbackRefresh, "json" @@ -194,7 +194,7 @@ else , opmerk: opmerk //L("lcl_mld_opdr_canceledbymobile") }; <% protectRequest.dataToken("data"); %> - $.post("../mld/opdr_cancel_save.asp" + $.post("<%=rooturl%>/appl/mld/opdr_cancel_save.asp" , data , McltCallbackAndThenAlways(opdr_action_callback) , "json"); @@ -213,7 +213,7 @@ else , opmerk: opmerk //L("lcl_mld_opdr_rejectedbymobile") }; <% protectRequest.dataToken("data"); %> - $.post("../mld/opdr_reject_save.asp" + $.post("<%=rooturl%>/appl/mld/opdr_reject_save.asp" , data , McltCallbackAndThenAlways(opdr_action_callback) , "json"); @@ -228,7 +228,7 @@ else var data = { opdr_key: <%=opdr_key%> }; <% protectRequest.dataToken("data"); %> - $.post("../mld/opdr_accept_offer_save.asp" + murl + $.post("<%=rooturl%>/appl/mld/opdr_accept_offer_save.asp" + murl , data , McltCallbackAndThenAlways(opdr_action_callback) , "json"); @@ -243,7 +243,7 @@ else var data = { opdr_key: <%=opdr_key%> }; <% protectRequest.dataToken("data"); %> - $.post("../mld/opdr_reject_offer_save.asp" + murl + $.post("<%=rooturl%>/appl/mld/opdr_reject_offer_save.asp" + murl , data , McltCallbackAndThenAlways(opdr_action_callback) , "json"); @@ -262,7 +262,7 @@ else var opdr_nr = "<%=mld_opdr.srtdiscprefix + mld_opdr.mld_key + "/" + mld_opdr.mld_opdr_bedrijfopdr_volgnr%>"; if (confirm(L("lcl_mld_opdr_hlt").format(opdr_nr))) { - window.location.href = "order.asp?opdr_key=<%=opdr_key%>&hlt=1"; + window.location.href = "<%=rooturl%>/appl/pda/order.asp?opdr_key=<%=opdr_key%>&hlt=1"; } } @@ -271,7 +271,7 @@ else var opdr_nr = "<%=mld_opdr.srtdiscprefix + mld_opdr.mld_key + "/" + mld_opdr.mld_opdr_bedrijfopdr_volgnr%>"; if (confirm(L("lcl_mld_opdr_rsm").format(opdr_nr))) { - window.location.href = "order.asp?opdr_key=<%=opdr_key%>&rsm=1"; + window.location.href = "<%=rooturl%>/appl/pda/order.asp?opdr_key=<%=opdr_key%>&rsm=1"; } } @@ -298,13 +298,13 @@ else } function opdr_close_callback_1() { - $.post("../mld/opdr_close_save.asp?opdr_key=<%=opdr_key%>", $("[name=u2]").serialize(), opdr_close_callback_2, "json"); + $.post("<%=rooturl%>/appl/mld/opdr_close_save.asp?opdr_key=<%=opdr_key%>", $("[name=u2]").serialize(), opdr_close_callback_2, "json"); return false; } function opdr_close_callback_2() { // Terug naar lijst met open opdrachten. - window.location.href = "orders_list.asp"; + window.location.href = "<%=rooturl%>/appl/pda/orders_list.asp"; } function opdr_submit() { @@ -327,8 +327,8 @@ else { %> // Nieuwe melding aangemaakt. Altijd complete reload, we hebben nu een opdr_key namelijk -// window.location.href = "order.asp?opdr_key=" + json.opdr_key + "&mld_key=<%=mld_key%>"; - window.location.href = "melding.asp?mld_key=<%=mld_key%>"; +// window.location.href = "<%=rooturl%>/appl/pda/order.asp?opdr_key=" + json.opdr_key + "&mld_key=<%=mld_key%>"; + window.location.href = "<%=rooturl%>/appl/pda/melding.asp?mld_key=<%=mld_key%>"; <% } %> @@ -343,9 +343,15 @@ else { if (json.success) { - window.location.href = "order.asp?opdr_key=<%=opdr_key%>"; + window.location.href = "<%=rooturl%>/appl/pda/order.asp?opdr_key=<%=opdr_key%>"; } } + function opdr_cancel_action() + { + window.location.href = "<%=rooturl%>/appl/pda/order.asp?opdr_key=<%=opdr_key%>"; + } + + function opdr_close_submit() { // Zelf de form-parameters zetten: PasteFromSelectbox() werkt niet als er meerdere velden met id=opdr_opm zijn @@ -359,7 +365,7 @@ else protectRequest.dataToken(data); $.post($("form[name=closeform]")[0].action, data, - McltCallbackAndThenAlways(function() { window.location.href = "order.asp?opdr_key=<%=opdr_key%>"; }), + McltCallbackAndThenAlways(function() { window.location.href = "<%=rooturl%>/appl/pda/order.asp?opdr_key=<%=opdr_key%>"; }), "json"); return false; } @@ -384,7 +390,7 @@ else -
+ @@ -403,7 +409,7 @@ else var oRs = Oracle.Execute(sql); if (!oRs.EoF) ROFIELD ("fld", mld_opdr.srtdiscbes ? L("lcl_bes_Supplier") : L("lcl_ord_company_uit"), oRs("uitv_naam").Value, - {moreinfo: "./bedrijf.asp?bedrijf_key=" + mld_opdr.uitvoerende_key, suppressEmpty: true}); + {moreinfo: rooturl+"/appl/pda/bedrijf.asp?bedrijf_key=" + mld_opdr.uitvoerende_key, suppressEmpty: true}); oRs.Close(); } @@ -429,7 +435,7 @@ else var authparamsCNTMAN = user.checkAutorisation("WEB_CNTMAN", true); if (mld_opdr.contract_key && mld_opdr.contract_key>0 && (authparamsCNTUSE || authparamsCNTMAN)) - params.moreinfo = "./contract.asp?cnt_key="+mld_opdr.contract_key; + params.moreinfo = rooturl+"/appl/pda/contract.asp?cnt_key="+mld_opdr.contract_key; ROFIELD("fld", L("lcl_contract"), mld_opdr.contract_naam, params); } @@ -595,12 +601,12 @@ else { var tsql = "SELECT COUNT(*) FROM mld_opdr_note n WHERE n.mld_opdr_key = " + opdr_key; toRs = Oracle.Execute(tsql); - BUTTON(L("lcl_mld_frame_notes")+" ("+toRs(0).value+")", {linkid: "./notitie.asp?node=opdracht&key="+opdr_key, dataicon: "comment", dataajax: 'false'}); + BUTTON(L("lcl_mld_frame_notes")+" ("+toRs(0).value+")", {linkid: rooturl+"/appl/pda/notitie.asp?node=opdracht&key="+opdr_key, dataicon: "comment", dataajax: 'false'}); } var this_mld = mld.func_enabled_melding(mld_key); // Wat heb ik zoal aan rechten op deze specifieke melding if (this_mld.canReadAny) { - BUTTON(L("lcl_complain"), {linkid: "./melding.asp?mld_key="+mld_opdr.mld_key , dataicon: "alert", dataajax: "false"}); + BUTTON(L("lcl_complain"), {linkid: rooturl+"/appl/pda/melding.asp?mld_key="+mld_opdr.mld_key , dataicon: "alert", dataajax: "false"}); } } else @@ -619,21 +625,22 @@ else if (trackinglines > 0) { - PAGE_START({id: "opdr-2-"+opdr_key, dialog: true}) + PAGE_START({id: "opdr-2-"+opdr_key}) mobile.trackingpage('opdracht', opdr_key, subject); PAGE_END(); } // scherm: Annuleren opdracht - PAGE_START({id: "opdr-3-"+opdr_key, dialog: true}) + PAGE_START({id: "opdr-3-"+opdr_key }) HEADER({title: L("lcl_mld_opdr_cancel_button")+" "+subject, back: false, nohome: true}); CONTENT_START(); %> - + <% RWFIELD("opdr_opm" , L("lcl_mld_inf_Opmerking"), mld_opdr.opdr_opmerking, {multi: true}); CONTROLGROUP_START(); BUTTON(L("lcl_submit"), {click: "opdr_cancel_submit()", dataicon: "refresh"}); + BUTTON(L("lcl_cancel"), {click: "opdr_cancel_action()", dataicon: "back"} ); CONTROLGROUP_END(); IFACE.FORM_END(); %> @@ -648,7 +655,7 @@ else CONTENT_START(); var nu = new Date; %> - + <% if (this_opdr.canOpmChange) @@ -688,6 +695,7 @@ else CONTROLGROUP_START(); BUTTON(L("lcl_submit"), {click: "opdr_close_submit()", dataicon: "refresh"}); + BUTTON(L("lcl_cancel"), {click: "opdr_cancel_action()", dataicon: "back"} ); CONTROLGROUP_END(); // IFACE.FORM_END(); %> From fd6bf5b4b469ffbd169b40dc9774406d7c0e30ea Mon Sep 17 00:00:00 2001 From: Jos Groot Lipman Date: Mon, 16 Oct 2017 09:59:05 +0000 Subject: [PATCH 04/16] FSN#44507: (PDA) Bijlagen toevoegen herzien ook voor PRS svn path=/Website/branches/v2017.2/; revision=35705 --- APPL/Shared/kenmerk_common.inc | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/APPL/Shared/kenmerk_common.inc b/APPL/Shared/kenmerk_common.inc index f47f07bd7f..71e7ceb7ce 100644 --- a/APPL/Shared/kenmerk_common.inc +++ b/APPL/Shared/kenmerk_common.inc @@ -276,7 +276,9 @@ function listKenmerk(sql, module, key, props) "MLD": { "M": "issues", "O": "orders" }, - "PRS": { "P": "persons" + "PRS": { "P": "persons", + "A": "departments", + "B": "companies" }, "INS": { "I": "inspections", "D": "objects" From e1c86e41efe9e8f68ee814e959b175c477c6c2ca Mon Sep 17 00:00:00 2001 From: Ruud Lipper Date: Mon, 16 Oct 2017 13:41:23 +0000 Subject: [PATCH 05/16] AADS#46528 htmlsafe header toegevoegd svn path=/Website/branches/v2017.2/; revision=35707 --- APPL/RES/res_delete.asp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/APPL/RES/res_delete.asp b/APPL/RES/res_delete.asp index bc43846fc7..da1a2b9f92 100644 --- a/APPL/RES/res_delete.asp +++ b/APPL/RES/res_delete.asp @@ -283,7 +283,7 @@ user.auth_required_or_abort(canDeleteAny); -<% BLOCK_START("resDelete", isMulti ? L("lcl_res_del_multi_head").format(amount) : L("lcl_res_deel_head1") + " " + (aantalEerder + 1 + aantalLater) + " " + L("lcl_res_deel_head2")); +<% BLOCK_START("resDelete", isMulti ? L("lcl_res_del_multi_head").format(amount) : L("lcl_res_deel_head1") + " " + (aantalEerder + 1 + aantalLater) + " " + L("lcl_res_deel_head2"), { ishtmlsafe: true }); %> <% RWTEXTAREATR("opmerk", "fldomschr", "", (isMulti ? "" : (rrr[0].rsv_ruimte_opmerking || "")), {tdhtml_ta: "colspan=2", html: "rows='4'"}); From 9f997dc6a14b4543eb67363b089a5e9c8b227d2a Mon Sep 17 00:00:00 2001 From: Jos Groot Lipman Date: Mon, 16 Oct 2017 15:30:12 +0000 Subject: [PATCH 06/16] Release 2017.2 Gold svn path=/Website/branches/v2017.2/; revision=35708 --- APPL/Shared/default.inc | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/APPL/Shared/default.inc b/APPL/Shared/default.inc index 4efd23b3c2..bb21810c47 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.2RC2"; +var FCLTVersion="2017.2"; var FCLTMinDatabaseSchema="32"; var custpath = rooturl + "/cust/" + customerId; // path to customer files From f7e9aa6fdfb8c524f6f5b1dc1b9ba29a092447be Mon Sep 17 00:00:00 2001 From: Jos Groot Lipman Date: Mon, 16 Oct 2017 17:53:13 +0000 Subject: [PATCH 07/16] QUAW#42388: AiAi bij aanroep API=tsc_opdr. Vooral ook: resultcode/returntekst DoLoggen bij falen. svn path=/Website/branches/v2017.2/; revision=35709 --- APPL/API/api_mldsoap.asp | 2 +- APPL/API/api_opdrsoap.asp | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/APPL/API/api_mldsoap.asp b/APPL/API/api_mldsoap.asp index 899e7dc9fd..76833b0e90 100644 --- a/APPL/API/api_mldsoap.asp +++ b/APPL/API/api_mldsoap.asp @@ -451,7 +451,7 @@ for (i = 0; i < meldingen.length; i++) } // end geldige ext_id if (returncode <= 0) - __DoLog("api_mldsoap fail.\nResultcode: {0}\nReturntekst: {1}".format(resultcode, returntekst), "#00FF00"); + __DoLog("api_mldsoap fail.\nResultcode: {0}\nReturntekst: {1}".format(resultcode, resulttekst), "#00FF00"); var binfo = {returncode: resultcode, returntekst: resulttekst, diff --git a/APPL/API/api_opdrsoap.asp b/APPL/API/api_opdrsoap.asp index 2fe5e7cbf9..624183dd4c 100644 --- a/APPL/API/api_opdrsoap.asp +++ b/APPL/API/api_opdrsoap.asp @@ -803,7 +803,7 @@ for (i=0; i < opdrachten.length; i++) } else { - __DoLog("api_opdrsoap fail.\nResultcode: {0}\nReturntekst: {1}".format(resultcode, returntekst), "#00FF00"); + __DoLog("api_opdrsoap fail.\nResultcode: {0}\nReturntekst: {1}".format(resultcode, resulttekst), "#00FF00"); } var binfo = { From fbbe4cc3f552688ea699bb7a9a2592ae418c99b6 Mon Sep 17 00:00:00 2001 From: Ruud Lipper Date: Tue, 17 Oct 2017 06:30:53 +0000 Subject: [PATCH 08/16] FSN#46567 returncode moet resultcode zijn svn path=/Website/branches/v2017.2/; revision=35710 --- APPL/API/api_mldsoap.asp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/APPL/API/api_mldsoap.asp b/APPL/API/api_mldsoap.asp index 76833b0e90..e933c7ee5a 100644 --- a/APPL/API/api_mldsoap.asp +++ b/APPL/API/api_mldsoap.asp @@ -450,7 +450,7 @@ for (i = 0; i < meldingen.length; i++) } // end insert } // end geldige ext_id - if (returncode <= 0) + if (resultcode <= 0) __DoLog("api_mldsoap fail.\nResultcode: {0}\nReturntekst: {1}".format(resultcode, resulttekst), "#00FF00"); var binfo = {returncode: resultcode, From 10e5961aac053348232c01d41a8c96019ba2c54f Mon Sep 17 00:00:00 2001 From: Dennis Hartmann Date: Tue, 17 Oct 2017 07:22:24 +0000 Subject: [PATCH 09/16] KFHT#46348 - maatregel 4 en opmerkingen toegevoegd svn path=/Website/branches/v2017.2/; revision=35711 --- CUST/KFHT/xsl/KFHT.xsl | 75 +++++++++++++++++++++++++++--------------- 1 file changed, 48 insertions(+), 27 deletions(-) diff --git a/CUST/KFHT/xsl/KFHT.xsl b/CUST/KFHT/xsl/KFHT.xsl index 13af2cea33..8efd74f146 100644 --- a/CUST/KFHT/xsl/KFHT.xsl +++ b/CUST/KFHT/xsl/KFHT.xsl @@ -162,7 +162,7 @@ HTCE Site Management B.V. Accounting Department - +
@@ -178,7 +178,7 @@ - + @@ -194,7 +194,7 @@ - + 500 @@ -291,7 +291,7 @@
- + @@ -329,7 +329,7 @@ - + @@ -375,7 +375,7 @@ - + @@ -389,17 +389,17 @@ - + - + - -

Inkooporder:
Telefoonnummer:Datum gereed:
Vakgroep: -
Omschrijving:
Omschrijving:


Indien de kosten voor het uitvoeren van deze opdracht hoger liggen dan het vermelde mandaat, dient u dit kenbaar te maken aan de Facility Desk en voor uitvoering van werkzaamheden eerst een prijsopgave / offerte met open begroting in te dienen.

Contractreferentie:  ()

Deze contractopdracht dient onder contractvoorwaarden uitgevoerd te worden. Indien u het hier niet mee eens bent of wanneer deze opdracht niet duidelijk is, dient u contact op te nemen met de Facility Desk.

Indien u van mening bent dat deze opdracht niet onder garantie valt, of wanneer er onduidelijkheden zijn over deze opdracht, dient u voor uitvoering van werkzaamheden contact op te nemen met de Facility Desk.

- + + + @@ -433,12 +433,12 @@ De Algemene Inkoopvoorwaarden van HTCE Site Management BV worden tevens op eerst - +
• De opdrachtgever houdt zich het recht voor (sommige onderdelen van) de offerte niet te gunnen.

Indien deze offerteaanvraag niet duidelijk is, dient u contact op te nemen met de Facility Desk.
- + @@ -491,7 +491,7 @@ De Algemene Inkoopvoorwaarden van HTCE Site Management BV worden tevens op eerst - + @@ -515,7 +515,7 @@ Toepasselijkheid van de door opdrachtnemer gehanteerde algemene voorwaarden word De Algemene Inkoopvoorwaarden van HTCE Site Management BV worden tevens op eerste verzoek aan leverancier verstrekt en zijn op locatie voorhanden. - +
@@ -570,15 +570,15 @@ De Algemene Inkoopvoorwaarden van HTCE Site Management BV worden tevens op eerst https://?&oordeel= -   +   - - - + + + @@ -651,7 +651,7 @@ De Algemene Inkoopvoorwaarden van HTCE Site Management BV worden tevens op eerst - + @@ -784,6 +784,27 @@ De Algemene Inkoopvoorwaarden van HTCE Site Management BV worden tevens op eerst + + + + + + + + + + + + + + + + + + + + + @@ -863,7 +884,7 @@ De Algemene Inkoopvoorwaarden van HTCE Site Management BV worden tevens op eerst + - - + + - + - + @@ -1145,7 +1166,7 @@ De Algemene Inkoopvoorwaarden van HTCE Site Management BV worden tevens op eerst - + From 1587f8fc0d632eb0d81daa608bd0ec0a5d08c726 Mon Sep 17 00:00:00 2001 From: Arthur Egberink Date: Tue, 17 Oct 2017 07:29:56 +0000 Subject: [PATCH 10/16] KFSG#41700 -- Scim koppeling realiseren. svn path=/Website/branches/v2017.2/; revision=35712 --- APPL/API2/plugins/scimgroups.wsc | 9 +++- APPL/API2/plugins/scimorgunits.wsc | 13 +++++- APPL/API2/plugins/scimusers.wsc | 69 +++++++++++++++++------------- 3 files changed, 59 insertions(+), 32 deletions(-) diff --git a/APPL/API2/plugins/scimgroups.wsc b/APPL/API2/plugins/scimgroups.wsc index fc8748f426..fb83d3dc87 100644 --- a/APPL/API2/plugins/scimgroups.wsc +++ b/APPL/API2/plugins/scimgroups.wsc @@ -62,6 +62,13 @@ function transform_filter(filter) filter.limit = filter.count; if ("startIndex" in filter) filter.offset = filter.startIndex - 1; + if ("filter" in filter) + { + // Ontvangen filter: "filter": "id eq \"KFSG_authorizationgroup_703\"" + var v_filter = filter.filter.replace ("id eq \"" + FCLT.DEZE.customerId + "_authorizationgroup_", ""); + v_filter = v_filter.replace("\"", ""); + filter.id = v_filter; + } return filter; } @@ -102,7 +109,7 @@ function transform_one_group(params, authorizationgroup) "members":[], "meta":{ "created":authorizationgroup.created, - "lastModified":authorizationgroup.lastchange, + "lastModified":authorizationgroup.lastchange?authorizationgroup.lastchange:authorizationgroup.created, "location":FCLT.DEZE.HTTP.urlzelf() + "/appl/SCIM/Groups/" + unique, "resourceType":"Group" } diff --git a/APPL/API2/plugins/scimorgunits.wsc b/APPL/API2/plugins/scimorgunits.wsc index 4b5a936f86..2fd0f665cd 100644 --- a/APPL/API2/plugins/scimorgunits.wsc +++ b/APPL/API2/plugins/scimorgunits.wsc @@ -62,8 +62,17 @@ function transform_filter(filter) { if ("count" in filter) filter.limit = filter.count; - if ("startIndex" in filter) + if ("startIndex" in filter) { filter.offset = filter.startIndex - 1; + filter.showall = 1; + } + if ("filter" in filter) + { + // Ontvangen filter: "filter": "id eq \"KFSG_department_703\"" + var v_filter = filter.filter.replace ("id eq \"" + FCLT.DEZE.customerId + "_department_", ""); + v_filter = v_filter.replace("\"", ""); + filter.id = v_filter; + } return filter; } @@ -127,7 +136,7 @@ function transform_one_department(params, department) ], "meta":{ "created":department.created, - "lastModified":department.lastchange, + "lastModified":department.lastchange?department.lastchange:department.created, "location":FCLT.DEZE.HTTP.urlzelf() + "/appl/SCIM/OrgUnits/" + unique, "resourceType":"OrgUnit" } diff --git a/APPL/API2/plugins/scimusers.wsc b/APPL/API2/plugins/scimusers.wsc index 2686f104af..01dc823f11 100644 --- a/APPL/API2/plugins/scimusers.wsc +++ b/APPL/API2/plugins/scimusers.wsc @@ -61,6 +61,13 @@ function transform_filter(filter) filter.limit = filter.count; if ("startIndex" in filter) filter.offset = filter.startIndex - 1; + if ("filter" in filter) + { + // Ontvangen filter: "filter": "id eq \"KFSG_person_703\"" + var v_filter = filter.filter.replace ("id eq \"" + FCLT.DEZE.customerId + "_person_", ""); + v_filter = v_filter.replace("\"", ""); + filter.id = v_filter; + } return filter; } @@ -71,35 +78,35 @@ function get_eTag(params, data) return null; } -// We krijgen bijvoorbeeld: {"RMS":[1,-10,-11,-12,-13,-14,-15,-16,-17,2,3,-4,-5,-6,-7,-8,-9]} -// Als het object aan staat wordt de id opgeleverd, anders -id +function get_element(data) +{ + if (data == undefined) data = ""; + return data; +} + function transform_incoming(params, data) { - FCLT.DEZE.__Log(data); var enterprise = data["urn:ietf:params:scim:schemas:extension:enterprise:2.0:User"]; var facilitor = data["urn:ietf:params:scim:schemas:extension:facilitor:2.0:User"]; var person = { - login : data["userName"], - externallogin: data["userName"], - externalid : data["externalId"], - initials : facilitor["initials"], - lastname : data["name"]["familyName"], - middlename : data["name"]["middleName"], - firstname : data["name"]["givenName"], + login : get_element(data["userName"]), + externallogin: get_element(data["userName"]), + externalid : get_element(data["externalId"]), + initials : get_element(facilitor["initials"]), + lastname : get_element(data["name"]["familyName"]), + middlename : get_element(data["name"]["middleName"]), + firstname : get_element(data["name"]["givenName"]), deactivated : data["active"]?null:new Date(), - employeenumber : enterprise["employeeNumber"] + employeenumber : get_element(enterprise["employeeNumber"]) }; - if (data["userName"] == undefined) person.login = ""; - if (facilitor["initials"] == undefined) person.initials = ""; - if (data["name"]["middleName"] == undefined) person.middlename = ""; - if (data["name"]["givenName"] == undefined) person.firstname = ""; - if (enterprise["employeeNumber"] == undefined) person.employeenumber = ""; - - - var dep_id = facilitor["orgUnit"]["value"].replace (FCLT.DEZE.customerId + "_department_", ""); + var dep_id = ""; + if (facilitor["orgUnit"] && facilitor["orgUnit"]["value"] ) + dep_id = facilitor["orgUnit"]["value"].replace (FCLT.DEZE.customerId + "_department_", ""); + else + dep_id = 1; // bij het aanmaken van een nieuwe persoon is de afdeling nog leeg. Dan tijdelijke even onder onbekend hangen. person["department"] = { id: dep_id }; person["function"] = { name: facilitor["title"] } // id mag achterwege blijven omdat desc_is_unique @@ -108,29 +115,33 @@ function transform_incoming(params, data) { person.email = data["emails"][0].value; // type:work/primary:true opzoeken ? } - person.phone = ""; - person.mobile = ""; if (data["phoneNumbers"]) { for (var j = 0; j < data["phoneNumbers"].length; j++) { if (data["phoneNumbers"][j]["type"] == 'mobile') { - person.mobile = data["phoneNumbers"][j].value; + person.mobile = get_element(data["phoneNumbers"][j].value); } if (data["phoneNumbers"][j]["type"] == 'work') { - person.phone = data["phoneNumbers"][j].value; + person.phone = get_element(data["phoneNumbers"][j].value); } } } - if (person.phone == undefined) person.phone = ""; - if (person.mobile == undefined) person.mobile = ""; - // TODO groepen negeren we - - FCLT.DEZE.__Log(person); + // Als de functie (srt_perslid) nog niet bestaat gaan we deze aanmaken. + var sql = "SELECT prs_srtperslid_key FROM prs_srtperslid " + + "WHERE prs_srtperslid_verwijder IS NULL " + + " AND prs_srtperslid_omschrijving = " + FCLT.DEZE.safe.quoted_sql(person["function"]["name"]); + var oRs = FCLT.DEZE.Oracle.Execute(sql); + if (oRs.eof) + { + sql = "INSERT INTO prs_srtperslid (prs_srtperslid_omschrijving) " + + "VALUES (" + FCLT.DEZE.safe.quoted_sql(person["function"]["name"]) + ")"; + FCLT.DEZE.Oracle.Execute(sql); + } return { person: person }; } @@ -155,7 +166,7 @@ function transform_one_person(params, person) "active": !person.deactivated, "meta":{ "created":person.created, - "lastModified":person.lastchange, + "lastModified":person.lastchange?person.lastchange:person.created, "location":FCLT.DEZE.HTTP.urlzelf() + "/appl/SCIM/Users/" + unique, "resourceType":"User" }, From 7ca203f0f30d416dd1eed3b058af93f03592ecfe Mon Sep 17 00:00:00 2001 From: Arthur Egberink Date: Tue, 17 Oct 2017 07:34:42 +0000 Subject: [PATCH 11/16] KFSG#41700 -- Scim koppeling realiseren. svn path=/Website/branches/v2017.2/; revision=35713 --- APPL/API2/model_fac_groep.inc | 8 +++++++- APPL/API2/model_prs_afdeling.inc | 6 ++++++ APPL/API2/model_prs_perslid.inc | 1 + 3 files changed, 14 insertions(+), 1 deletion(-) diff --git a/APPL/API2/model_fac_groep.inc b/APPL/API2/model_fac_groep.inc index 344766b9f0..d022448be4 100644 --- a/APPL/API2/model_fac_groep.inc +++ b/APPL/API2/model_fac_groep.inc @@ -67,7 +67,13 @@ function model_fac_groep(groep_key, params) "sql": "(SELECT COUNT(*) FROM fac_gebruikersgroep WHERE fac_groep.fac_groep_key = fac_gebruikersgroep.fac_groep_key)", "label": L("fac_groep_nn_leden"), "typ": "number" - } + }, + "created": { + "dbs": "fac_groep_aanmaak", + "label": L("fac_groep_aanmaak"), + "typ": "datetime", + "readonly": true + } }; this.includes = { diff --git a/APPL/API2/model_prs_afdeling.inc b/APPL/API2/model_prs_afdeling.inc index 3844ccfd0a..6dcc8a0e72 100644 --- a/APPL/API2/model_prs_afdeling.inc +++ b/APPL/API2/model_prs_afdeling.inc @@ -78,6 +78,12 @@ function model_prs_afdeling() "desc": "prs_kostenplaats_nr", "desc_is_unique": "prs_kostenplaats_verwijder IS NULL" } + }, + "created": { + "dbs": "prs_afdeling_aanmaak", + "label": L("prs_afdeling_aanmaak"), + "typ": "datetime", + "readonly": true } }; diff --git a/APPL/API2/model_prs_perslid.inc b/APPL/API2/model_prs_perslid.inc index 91a043ccfe..a921917c73 100644 --- a/APPL/API2/model_prs_perslid.inc +++ b/APPL/API2/model_prs_perslid.inc @@ -42,6 +42,7 @@ function model_prs_perslid(params) this.records_name = "persons"; this.record_name = "person"; this.table = "prs_perslid"; + this.trackcode = "PRSUPD"; this.audit = { // Parameters voor fac_audit. "childtable": "fac_gebruikersgroep", "childaudit": {"sql": "SELECT fac_audit_tabelkey" From a9b82c6d505894fd4162a74601f07ada84f04c2d Mon Sep 17 00:00:00 2001 From: Jos Groot Lipman Date: Tue, 17 Oct 2017 07:36:21 +0000 Subject: [PATCH 12/16] QUAW#42388:Vooral ook: resultcode/returntekst DoLoggen bij falen: minder false-positives svn path=/Website/branches/v2017.2/; revision=35714 --- APPL/API/api_mldsoap.asp | 2 +- APPL/API/api_opdrsoap.asp | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/APPL/API/api_mldsoap.asp b/APPL/API/api_mldsoap.asp index e933c7ee5a..be8b3a205b 100644 --- a/APPL/API/api_mldsoap.asp +++ b/APPL/API/api_mldsoap.asp @@ -450,7 +450,7 @@ for (i = 0; i < meldingen.length; i++) } // end insert } // end geldige ext_id - if (resultcode <= 0) + if (resultcode > 0) __DoLog("api_mldsoap fail.\nResultcode: {0}\nReturntekst: {1}".format(resultcode, resulttekst), "#00FF00"); var binfo = {returncode: resultcode, diff --git a/APPL/API/api_opdrsoap.asp b/APPL/API/api_opdrsoap.asp index 624183dd4c..a86094085d 100644 --- a/APPL/API/api_opdrsoap.asp +++ b/APPL/API/api_opdrsoap.asp @@ -801,7 +801,7 @@ for (i=0; i < opdrachten.length; i++) { resultcode = 0; // Ik heb gedaan wat ik moest en mocht doen voor deze opdracht. } - else + else if (resultcode > 0) { __DoLog("api_opdrsoap fail.\nResultcode: {0}\nReturntekst: {1}".format(resultcode, resulttekst), "#00FF00"); } From 7f6175583baef3e8a9598a87bd52ac39dde4b966 Mon Sep 17 00:00:00 2001 From: Maykel Geerdink Date: Tue, 17 Oct 2017 08:14:13 +0000 Subject: [PATCH 13/16] FSN#46388: MLDUPD: XML document must have a top level element. svn path=/Website/branches/v2017.2/; revision=35715 --- APPL/MLD/mld.inc | 9 +++++++-- 1 file changed, 7 insertions(+), 2 deletions(-) diff --git a/APPL/MLD/mld.inc b/APPL/MLD/mld.inc index 4b88a619fd..6cd52ec9f5 100644 --- a/APPL/MLD/mld.inc +++ b/APPL/MLD/mld.inc @@ -4312,8 +4312,6 @@ mld = {setmeldingstatus: + " SET mld_melding_parentkey = " + parent_key + " WHERE mld_melding_key = " + child_key; Oracle.Execute(sql); - var track_oms = L("lcl_linked_to").format(mld.mld_prefix(child_key)+child_key, mld.mld_prefix(parent_key)+parent_key); - mld.trackmeldingupdate(child_key, track_oms); // Probeer de status gelijk aan die van de parent te zetten // Merk op dat de trigger ook nog kan ingrijpen: als je hem op 7 probeert @@ -4333,6 +4331,13 @@ mld = {setmeldingstatus: // Via package voor tracking mld.setmeldingstatus(child_key, mldstatus); + // Tracking na het zetten van de status pas aanroepen. + // Als het een nieuwe melding is, dan is er nu ook een MLDNEW tracking/notificatie gedaan. + // Als er een XML document (bon) wordt aangemaakt moet de status van de melding gezet zijn, + // anders levert de functie xml.make_xml2() NULL op (FSN#46388). + var track_oms = L("lcl_linked_to").format(mld.mld_prefix(child_key)+child_key, mld.mld_prefix(parent_key)+parent_key); + mld.trackmeldingupdate(child_key, track_oms); + return ""; // mld_link.asp -> warning }, From ce0004b03927be83485afd1b098adb28cfe347c1 Mon Sep 17 00:00:00 2001 From: Arthur Egberink Date: Tue, 17 Oct 2017 09:46:09 +0000 Subject: [PATCH 14/16] KFSG#41700 -- Scim koppeling realiseren. svn path=/Website/branches/v2017.2/; revision=35716 --- APPL/API2/plugins/scimorgunits.wsc | 31 ++++++++++++++++-------------- 1 file changed, 17 insertions(+), 14 deletions(-) diff --git a/APPL/API2/plugins/scimorgunits.wsc b/APPL/API2/plugins/scimorgunits.wsc index 2fd0f665cd..70734b883b 100644 --- a/APPL/API2/plugins/scimorgunits.wsc +++ b/APPL/API2/plugins/scimorgunits.wsc @@ -92,25 +92,28 @@ function transform_incoming(params, data) externalid : data["externalId"], description: data["code"], name : data["externalId"], - costcentre : { name: data["costCenter"] }, // id mag achterwege blijven omdat desc_is_unique company : { name: "Schiphol Group" } }; - var sql = "SELECT prs_kostenplaats_key FROM prs_kostenplaats " - + "WHERE prs_kostenplaats_verwijder IS NULL " - + " AND prs_kostenplaats_nr = " + FCLT.DEZE.safe.quoted_sql(department.costcentre.name); - var oRs = FCLT.DEZE.Oracle.Execute(sql); - if (oRs.eof) + + if ("costCenter" in data) { - sql = "INSERT INTO prs_kostenplaats (prs_kostenplaats_nr, prs_kostenplaats_omschrijving, prs_kostenplaats_module) " - + "VALUES (" + FCLT.DEZE.safe.quoted_sql(department.costcentre.name) + "," + FCLT.DEZE.safe.quoted_sql(department.costcentre.name) + ",'PRS')"; -// FCLT.DEZE.__DoLog(sql); - FCLT.DEZE.Oracle.Execute(sql); + department.costcentre = { name: data["costCenter"] }; // id mag achterwege blijven omdat desc_is_unique + var sql = "SELECT prs_kostenplaats_key FROM prs_kostenplaats " + + "WHERE prs_kostenplaats_verwijder IS NULL " + + " AND prs_kostenplaats_nr = " + FCLT.DEZE.safe.quoted_sql(department.costcentre.name); + var oRs = FCLT.DEZE.Oracle.Execute(sql); + if (oRs.eof) + { + sql = "INSERT INTO prs_kostenplaats (prs_kostenplaats_nr, prs_kostenplaats_omschrijving, prs_kostenplaats_module) " + + "VALUES (" + FCLT.DEZE.safe.quoted_sql(department.costcentre.name) + "," + FCLT.DEZE.safe.quoted_sql(department.costcentre.name) + ",'PRS')"; + FCLT.DEZE.Oracle.Execute(sql); + } + oRs.Close(); } - oRs.Close(); - -//FCLT.DEZE.__DoLog(department); - + else + department.costcentre = { name: "" }; + return { department: department }; } From 17b6a2ba764169a160305cb656412761bb1d88ff Mon Sep 17 00:00:00 2001 From: Arthur Egberink Date: Tue, 17 Oct 2017 10:29:00 +0000 Subject: [PATCH 15/16] KFSG#41700 -- Scim koppeling realiseren. svn path=/Website/branches/v2017.2/; revision=35717 --- APPL/API2/model_fac_groep.inc | 2 +- APPL/API2/model_prs_afdeling.inc | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/APPL/API2/model_fac_groep.inc b/APPL/API2/model_fac_groep.inc index d022448be4..89d46ac336 100644 --- a/APPL/API2/model_fac_groep.inc +++ b/APPL/API2/model_fac_groep.inc @@ -70,7 +70,7 @@ function model_fac_groep(groep_key, params) }, "created": { "dbs": "fac_groep_aanmaak", - "label": L("fac_groep_aanmaak"), + "label": "Aanmaakdatum", "typ": "datetime", "readonly": true } diff --git a/APPL/API2/model_prs_afdeling.inc b/APPL/API2/model_prs_afdeling.inc index 6dcc8a0e72..6b30a437a7 100644 --- a/APPL/API2/model_prs_afdeling.inc +++ b/APPL/API2/model_prs_afdeling.inc @@ -81,7 +81,7 @@ function model_prs_afdeling() }, "created": { "dbs": "prs_afdeling_aanmaak", - "label": L("prs_afdeling_aanmaak"), + "label": "Aanmaakdatum"), "typ": "datetime", "readonly": true } From 980f539686366c27a8eae0dbbc67e2101bbcde57 Mon Sep 17 00:00:00 2001 From: Arthur Egberink Date: Tue, 17 Oct 2017 10:54:58 +0000 Subject: [PATCH 16/16] GVBA#46647 -- Koppeling met Strukton. svn path=/Website/branches/v2017.2/; revision=35718 --- CUST/GVBA/import/GetStruktonStatus.js | 139 ++++++++++++++++++ CUST/GVBA/import/gen_import_strukton.bat | 11 ++ CUST/GVBA/import/strukton.xsl | 53 +++++++ CUST/GVBA/xsl/strukton.xsl | 177 +++++++++++++++++++++++ 4 files changed, 380 insertions(+) create mode 100644 CUST/GVBA/import/GetStruktonStatus.js create mode 100644 CUST/GVBA/import/gen_import_strukton.bat create mode 100644 CUST/GVBA/import/strukton.xsl create mode 100644 CUST/GVBA/xsl/strukton.xsl diff --git a/CUST/GVBA/import/GetStruktonStatus.js b/CUST/GVBA/import/GetStruktonStatus.js new file mode 100644 index 0000000000..36569dd55b --- /dev/null +++ b/CUST/GVBA/import/GetStruktonStatus.js @@ -0,0 +1,139 @@ +// GetStruktonStatus.js +// Haalt statuswijzigingen op van Strukton opdrachten binnen een opgegeven tijdsinterval. +// Dit interval wordt opgeslagen in de database. Kan daarna via GEN_IMPORT ingelezen worden +// +// $Revision$ +// $Id$ +// +// Opzet in kader van AASA# +// Twee parameters: UDL voor database connectie en optioneel proxy-ip + +var str = WScript.Arguments(0); // udlpath +var prs_bedrijf_key = WScript.Arguments(1); // prs_bedrijf_key + +function GetStruktonStatus() +{ + var XMLReq= "" + +" " + +" " + +" " + +" " + +" " + prs_overeenkomst_nr + "" + +" " + +" " + +" "+ laatste_sync +"" + +" "+ nieuwe_sync +"" + +" " + +" " + +" " + +""; + WScript.Echo("Bericht = " + XMLReq); + WScript.Echo("Login = " + username); + //WScript.Echo("Wachtwoord = " + password); + var objXMLHTTP = new ActiveXObject("MSXML2.ServerXMLHTTP.6.0") + +/* objXMLHTTP.open("POST", + "https://b2bdev.ws.strukton.com:443/XISOAPAdapter/MessageServlet?channel=Facilitor:BS_ServiceRequest:S_WS_STATUS", + false, + "Facilitor", + "Facilit0r!");*/ + objXMLHTTP.open("POST", + mldorder_adres, + false, + username, + password); + objXMLHTTP.setRequestHeader("Content-Type", "text/xml; charset=utf-8"); + if (order_certificate) + { + WScript.Echo("Certificaatnaam = " + order_certificate); + var SXH_OPTION_SELECT_CLIENT_SSL_CERT = 3; + objXMLHTTP.setOption(SXH_OPTION_SELECT_CLIENT_SSL_CERT) = order_certificate; + } + objXMLHTTP.send(XMLReq); + + dataReceived = false; + if (objXMLHTTP.status==200) + { // Geldigheid XML wordt gecontroleerd door GEN_IMPORT + WScript.Echo("Gelukt, status = " + objXMLHTTP.status); + responseText = "" + objXMLHTTP.responseText; + if (responseText.indexOf("Resultaatset bevat geen records") == -1) { + dataReceived = true; + oStream = new ActiveXObject("ADODB.Stream"); + oStream.Open(); + oStream.Type = 1; // adTypeBinary + oStream.Write(objXMLHTTP.responseBody); // responseText geeft encoding problemen! + oStream.SaveToFile (fileName, 2); // adSaveCreateOverWrite + oStream.Close(); + } + sql = "UPDATE prs_kenmerklink SET prs_kenmerklink_waarde = '" + nieuwe_ts + "' WHERE prs_kenmerklink_key = " + prs_kenmerklink_key; + WScript.Echo (sql); + Oracle.Execute(sql); + } + else + { + WScript.Echo("Mislukt, status = " + objXMLHTTP.status); + WScript.Echo(objXMLHTTP.statusText); + } + return dataReceived; +} + +var udlstr = 'File Name='+str; +var Oracle = new ActiveXObject("ADODB.Connection"); +Oracle.Open(udlstr); + +// normaal halen we intervallen van 15 minuten op. Als de koppeling er een tijdje uit gelegen heeft kan dit problemen opleveren. Daarom +// wordt het interval maximaal 4 uur. +var sql = "ALTER SESSION SET nls_territory='AMERICA'"; +Oracle.Execute(sql) +sql = "SELECT b.prs_bedrijf_naam, " + + " ba.prs_bedrijfadres_certificate, " + + " ba.prs_bedrijfadres_username, " + + " ba.prs_bedrijfadres_password, " + + " ba.prs_bedrijfadres_url, " + + " b.prs_overeenkomst_nr, " + + " decode (laatste_sync_ts, null, null, to_char(laatste_sync_ts, 'yyyy-mm-dd')||'T'||to_char(laatste_sync_ts, 'hh24:mi:ss')) laatste_sync," + + " to_char(nieuwe_sync_ts, 'yyyy-mm-dd') || 'T' || to_char(nieuwe_sync_ts, 'hh24:mi:ss') nieuwe_sync, " + + " to_char(nieuwe_sync_ts, 'yyyy-mm-dd hh24:mi:ss') nieuwe_ts," + + " prs_kenmerklink_key" + + " FROM prs_bedrijf b, prs_bedrijfadres ba," + + " (SELECT prs_link_key, prs_kenmerklink_key, " + + " fac.safe_to_date (prs_kenmerklink_waarde, 'yyyy-mm-dd hh24:mi:ss') laatste_sync_ts, " + + " LEAST ( " + + " fac.safe_to_date (prs_kenmerklink_waarde, 'yyyy-mm-dd hh24:mi:ss') + (4 / 24), " // vorige tijdstip + 4 uur, als we een tijd stil gestaan hebben. + + " SYSDATE - (1 / 96)) nieuwe_sync_ts " // nu min een kwartier. Om sync problemen te voorkomen kijken we altijd een kwartier terug. + + " FROM prs_kenmerklink " + + " WHERE prs_kenmerk_key = 1000) kl " // timestamp laatste synchronisatie yyyymmdd hh24mi + + " WHERE b.prs_bedrijf_key = " + prs_bedrijf_key + + " AND b.prs_bedrijf_key = ba.prs_bedrijf_key" + + " AND b.prs_bedrijf_key = kl.prs_link_key" + + " AND ba.prs_bedrijfadres_type = 'O'"; + +WScript.Echo (sql); + +WScript.Echo(new Date()); +try +{ + var oRs = Oracle.Execute(sql); + + var fileName = "strukton.xml"; + mldorder_adres = "" + oRs("prs_bedrijfadres_url").Value; + mldorder_adres = mldorder_adres.replace("CREATE", "STATUS"); + order_certificate = "" + oRs("prs_bedrijfadres_certificate").Value; + username = oRs("prs_bedrijfadres_username").Value; + password = oRs("prs_bedrijfadres_password").Value; + laatste_sync = oRs("laatste_sync").Value; + nieuwe_sync = oRs("nieuwe_sync").Value; + nieuwe_ts = oRs("nieuwe_ts").Value; + prs_overeenkomst_nr = oRs("prs_overeenkomst_nr").Value; + prs_kenmerklink_key = oRs("prs_kenmerklink_key").Value; + WScript.Echo("Inlezen statusberichten van bedrijf: " + oRs("prs_bedrijf_naam").Value + " via url: " + mldorder_adres) + oRs.close(); + + if (GetStruktonStatus()) WScript.Quit(0); + else WScript.Quit(1); + } +catch (e) +{ + WScript.Echo("Serieuze fout in GetStruktonStatus.js: " + e.description) + WScript.Quit(1); +} \ No newline at end of file diff --git a/CUST/GVBA/import/gen_import_strukton.bat b/CUST/GVBA/import/gen_import_strukton.bat new file mode 100644 index 0000000000..054b71a2f7 --- /dev/null +++ b/CUST/GVBA/import/gen_import_strukton.bat @@ -0,0 +1,11 @@ +Echo Starten GetStruktonStatus.js + +cscript .\GetStruktonStatus.js ../oracle.udl 10562 >>gen_import.log + +if errorlevel 1 goto fout + +cscript ..\..\..\utils\gen_import\gen_import.wsf GVBA OPDRSTAT_STRUKTON >>genimport.log 2>>&1 +goto einde +:fout +Echo gen_import.exe niet meer uitgevoerd>>gen_import.log +:einde \ No newline at end of file diff --git a/CUST/GVBA/import/strukton.xsl b/CUST/GVBA/import/strukton.xsl new file mode 100644 index 0000000000..fdaed37c9c --- /dev/null +++ b/CUST/GVBA/import/strukton.xsl @@ -0,0 +1,53 @@ + + + + + + + + + + + "" + + + + + + + + + + + + + @@ + + + + + + + + + +referenceID;ServiceRequestID;TypeID;DateTime;Description;Remarks;Total + +@@Bruto: € @@Clausule: € @@Totaal: € + + +"" + + + + + + +;;;;;; + + + + + + + \ No newline at end of file diff --git a/CUST/GVBA/xsl/strukton.xsl b/CUST/GVBA/xsl/strukton.xsl new file mode 100644 index 0000000000..418be423a6 --- /dev/null +++ b/CUST/GVBA/xsl/strukton.xsl @@ -0,0 +1,177 @@ + + + + + + + + + + + Calamiteit + Hoog + Normaal + Laag + Hold + + Onbekend + + + + + + + + / + + - + + + 3 + 2 + 2 + + + + + --T:00 + false + + + + + + + + + + + + + + +Gebouw: +Verdieping: +Ruimte: +Omschrijving: + + + + + + + --T:00 + + + + + --T:00 + + : dagen + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + () + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + xml + + + + + + + + + + + + + + + \ No newline at end of file
:Maatregel 3:
Maatregel 4:
 
Opmerkingen
Opmerking gebouwbeheerder:
Opmerking procesbeheerder:
Opmerking veiligheidskundige:
PBM's:
: - @@ -874,8 +895,8 @@ De Algemene Inkoopvoorwaarden van HTCE Site Management BV worden tevens op eerst
: @@ -1116,7 +1137,7 @@ De Algemene Inkoopvoorwaarden van HTCE Site Management BV worden tevens op eerst
@@ -1131,7 +1152,7 @@ De Algemene Inkoopvoorwaarden van HTCE Site Management BV worden tevens op eerst
Notities: