admin/Customer
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

FSN#37547: Website PLATO op labs voor sight(site)seeing (alfa) en testen (beta

Browse Source 
svn path=/Customer/trunk/; revision=31016
This commit is contained in:
Marcel Bourseau
2016-10-10 09:20:07 +00:00
parent 5b09f6cbf9
commit dae9206431
2 changed files with 1086 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

835
PLAT/plat.sql Normal file
View File

@@ -0,0 +1,835 @@
-- Script containing customer specific configuration sql statements for plat: Medux
-- (c) 2014 SG|facilitor
-- $Revision$
-- $Id$
--
-- Support: +31 53 4800710
set echo on
spool plat.lst
----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
-- ALG Onroerend Goed 1 import (locaties + gebouwen)
----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
CREATE OR REPLACE PROCEDURE plat_post_import_onrgoed1 (p_import_key IN NUMBER)
AS
v_errorhint VARCHAR2 (400);
BEGIN
v_errorhint := 'plat_post_import_onrgoed1';
END;
/
CREATE OR REPLACE PROCEDURE plat_import_onrgoed1 (p_import_key IN NUMBER)
AS
oracle_err_num NUMBER;
oracle_err_mes VARCHAR2 (200);
v_errormsg VARCHAR2 (400);
v_errorhint VARCHAR2 (400);
BEGIN
v_errorhint := 'plat_import_onrgoed1';
fac_import_onrgoed1(p_import_key);
COMMIT;
-- After import korrektie gebeurt nu...
plat_post_import_onrgoed1(p_import_key);
EXCEPTION
WHEN OTHERS
THEN
oracle_err_num := SQLCODE;
oracle_err_mes := SUBSTR (SQLERRM, 1, 100);
v_errormsg := 'Error ' || oracle_err_num || '/' || oracle_err_mes;
fac.imp_writelog (p_import_key, 'E', v_errormsg, v_errorhint);
END plat_import_onrgoed1;
/
CREATE OR REPLACE PROCEDURE plat_post_onrgoed1_exploitatie (p_import_key IN NUMBER, p_max_alg_gebouw_key IN NUMBER)
AS
v_errorhint VARCHAR2 (400);
v_count_tot NUMBER(10);
v_errormsg VARCHAR2 (400);
oracle_err_num NUMBER;
oracle_err_mes VARCHAR2 (200);
-- locatiecode is uniek (over de hele DB heen), en gebouwcode is uniek binnen de locatiecode.
-- Let op: locatiecode is in DB in UPPER, gebouwcode is in DB niet upper, die staat in de kolom alg_gebouw_upper.
-- Alle locaties met hun gebouwen in de database die NIET in het importbestand staan, en die dus kunnen worden verwijderd.
-- Als die de vorige keer niet verwijderd was, want dan blijven we verwijderen natuurlijk, 1x is genoeg.
-- De vorige verwijderd betekent (tot nu toe gekozen) dat vervaldatum in het verleden ligt; zie TODO hieronder bij het zetten van de vervaldatum (ipv verwijderdatum).
CURSOR c1
IS
SELECT l.alg_locatie_key, l.alg_locatie_code, g.alg_gebouw_key, g.alg_gebouw_code, g.alg_gebouw_upper
FROM alg_locatie l, alg_gebouw g
WHERE g.alg_locatie_key = l.alg_locatie_key
AND l.alg_locatie_verwijder IS NULL
AND g.alg_gebouw_verwijder IS NULL
AND COALESCE(g.alg_gebouw_vervaldatum,SYSDATE) >= SYSDATE
AND NOT EXISTS (SELECT 'x' FROM fac_imp_onrgoed1 og
WHERE UPPER(og.alg_locatie_code) = l.alg_locatie_code
AND UPPER(og.alg_gebouw_code) = g.alg_gebouw_upper);
BEGIN
-- Alle gebouwen krijgen een alg-gebouw_vervaldatum als deze is gevuld in kolom S (flexprop 'Eindjaar' met alg_kenmerk_key = 2).
v_errorhint := 'plat_post_onrgoed1_exploitatie';
-- Werk alle vervaldatums van de gebouwen bij die nog in de DB staan met de waarde uit kenmerk 'Einde exploitatie' (key 2) die bij de locatie (van het gebouw) staat geregistreerd.
-- In kenmerk 'Einde exploitatie' staat het jaartal van einde, die gaan we nog voorzien van de laatste dag in dat jaar, oftewel '31 dec'
UPDATE alg_gebouw g
SET g.alg_gebouw_vervaldatum = (SELECT fac.safe_to_date('31-12-' || alg_onrgoedkenmerk_waarde, 'dd-mm-yyyy')
FROM alg_onrgoedkenmerk ok
WHERE ok.alg_onrgoed_key = g.alg_locatie_key
AND ok.alg_onrgoed_niveau = 'L'
AND ok.alg_kenmerk_key = 2
AND ok.alg_onrgoedkenmerk_verwijder IS NULL)
WHERE g.alg_gebouw_verwijder IS NULL;
FOR rec IN c1
LOOP
fac.imp_writelog (p_import_key,
'I',
'Gebouw ' || rec.alg_gebouw_code || '(locatie ' || rec.alg_locatie_code || ') is verwijderd cq. vervaldatum op vorig jaar gezet: ' || 'gebouw key=[' || TO_CHAR(rec.alg_gebouw_key) || ']',
'');
-- We gaan het gebouw niet verwijderen, wellicht komt dat nog (TODO),
-- want voor het verwijderen van gebouw moeten ALLE onderliggende zaken (controles, objecten, ruimten, verdiepingen) eerst worden verwijderd.
-- Iets too much voor dit moment, en eh..., je bent die historie ook direct kwijt.
-- Dus vooralsnog zetten we hier de einde exploitatietijd met de huidige jaartal MINUS 1, op 31 dec (dus vandaag = 10 aug 2016, dan vervaldatum = 31 dec 2015)
UPDATE alg_gebouw
-- SET alg_gebouw_verwijder = SYSDATE
SET alg_gebouw_vervaldatum = to_date('31-12-' || (TO_CHAR(SYSDATE,'YYYY') - 1), 'dd-mm-yyyy')
WHERE alg_gebouw_key = rec.alg_gebouw_key;
END LOOP;
EXCEPTION
WHEN OTHERS
THEN
oracle_err_num := SQLCODE;
oracle_err_mes := SUBSTR (SQLERRM, 1, 100);
v_errormsg := 'Error ' || oracle_err_num || '/' || oracle_err_mes;
fac.imp_writelog (p_import_key, 'E', v_errormsg, v_errorhint);
END plat_post_onrgoed1_exploitatie;
/
CREATE OR REPLACE PROCEDURE plat_post_update_onrgoed1 (p_import_key IN NUMBER, p_max_alg_gebouw_key IN NUMBER)
AS
v_errorhint VARCHAR2 (400);
v_errormsg VARCHAR2 (400);
v_count_tot NUMBER(10);
oracle_err_num NUMBER;
oracle_err_mes VARCHAR2 (200);
BEGIN
v_errorhint := 'plat_post_update_onrgoed1';
-- Voor alle gebouwen willen we de einddatum / einde exploitatie (alg_gebouw_vervaldatum) updaten.
-- Uitdaging is dat de import
plat_post_onrgoed1_exploitatie (p_import_key, p_max_alg_gebouw_key);
-- Alleen voor de nieuwe gebouwen moeten we 1 (dummy) verdieping en 1 (dummy) ruimte toevoegen...
-- Dus Dummy verdieping voor elk toegevoegd alg_gebouw (dus waar alg_gebouw_key > p_max_alg_gebouw_key)
INSERT INTO alg_verdieping (alg_gebouw_key, alg_verdieping_omschrijving, alg_verdieping_code, alg_verdieping_volgnr)
SELECT alg_gebouw_key, '-', '_-', 0
FROM alg_gebouw
WHERE alg_gebouw_key > p_max_alg_gebouw_key;
SELECT COUNT(*)
INTO v_count_tot
FROM alg_verdieping
WHERE alg_gebouw_key > p_max_alg_gebouw_key;
fac.imp_writelog (p_import_key,
'S',
'Verdieping/#toegevoegd: ' || TO_CHAR (v_count_tot),
'');
-- Dummy ruimte voor elk toegevoegd dummy alg_verdieping (dus waar alg_gebouw_key > p_max_alg_gebouw_key)
INSERT INTO alg_ruimte (alg_verdieping_key, alg_ruimte_nr)
SELECT alg_verdieping_key, '_1' FROM alg_verdieping
WHERE alg_gebouw_key > p_max_alg_gebouw_key;
SELECT COUNT(*)
INTO v_count_tot
FROM alg_ruimte
WHERE alg_verdieping_key IN (SELECT alg_verdieping_key
FROM alg_verdieping
WHERE alg_gebouw_key > p_max_alg_gebouw_key);
fac.imp_writelog (p_import_key,
'S',
'Ruimte/#toegevoegd: ' || TO_CHAR (v_count_tot),
'');
EXCEPTION
WHEN OTHERS
THEN
oracle_err_num := SQLCODE;
oracle_err_mes := SUBSTR (SQLERRM, 1, 100);
v_errormsg := 'Error ' || oracle_err_num || '/' || oracle_err_mes;
fac.imp_writelog (p_import_key, 'E', v_errormsg, v_errorhint);
END plat_post_update_onrgoed1;
/
CREATE OR REPLACE PROCEDURE plat_update_onrgoed1 (
p_import_key IN NUMBER
) IS
v_count NUMBER;
v_max_alg_gebouw_key NUMBER(10);
BEGIN
-- Even snel registreren wat de laatst toegevoegde alg_gebouw is, dan weten we dat er door deze import-procedure wordt toegevoegd (alles > dan deze max).
SELECT coalesce(max(alg_gebouw_key),0)
INTO v_max_alg_gebouw_key
FROM alg_gebouw
WHERE alg_gebouw_verwijder IS NULL;
fac_update_onrgoed1(p_import_key);
-- After update ...
plat_post_update_onrgoed1(p_import_key, v_max_alg_gebouw_key);
END plat_update_onrgoed1;
/
----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
-- Objecten import
----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
CREATE OR REPLACE PROCEDURE plat_post_import_ins (p_import_key IN NUMBER)
AS
v_errorhint VARCHAR2 (400);
BEGIN
v_errorhint := 'plat_post_import_ins';
END;
/
CREATE OR REPLACE PROCEDURE plat_import_ins (p_import_key IN NUMBER)
AS
oracle_err_num NUMBER;
oracle_err_mes VARCHAR2 (200);
v_errormsg VARCHAR2 (400);
v_errorhint VARCHAR2 (400);
BEGIN
v_errorhint := 'plat_import_ins';
-- de sequence array staat beschreven in PRS_PAC.SRC bij de prs.import_perslid proc
fac_import_ins (p_import_key);
COMMIT;
-- After import korrektie gebeurt nu...
plat_post_import_ins(p_import_key);
EXCEPTION
WHEN OTHERS
THEN
oracle_err_num := SQLCODE;
oracle_err_mes := SUBSTR (SQLERRM, 1, 100);
v_errormsg := 'Error ' || oracle_err_num || '/' || oracle_err_mes;
fac.imp_writelog (p_import_key, 'E', v_errormsg, v_errorhint);
END plat_import_ins;
/
CREATE OR REPLACE PROCEDURE plat_post_update_ins (p_import_key IN NUMBER, p_max_ins_srtdeel_key IN NUMBER, p_max_ins_deel_key IN NUMBER)
AS
oracle_err_num NUMBER;
oracle_err_mes VARCHAR2 (200);
v_errormsg VARCHAR2 (400);
v_errorhint VARCHAR2 (400);
v_receptnr VARCHAR2 (1000);
v_kosten VARCHAR2 (1000);
v_periode VARCHAR2 (1000);
v_perc_onderhoud VARCHAR2 (1000);
v_ctr_discipline_key NUMBER(10);
v_fin_btwtabelwaarde_key fin_btwtabelwaarde.fin_btwtabelwaarde_key%TYPE;
l_kosten ins_srtcontrole.ins_srtcontrole_materiaal%TYPE;
l_periode ins_srtcontrole.ins_srtcontrole_periode%TYPE;
l_perc_onderhoud ins_srtcontrole.ins_srtcontrole_percentage%TYPE;
v_mx_ins_srtcontroledl_xcp_key NUMBER(10);
v_kpn_bestaat NUMBER(10);
-- Flexprops in de FIP-INS Excelsheet
-- ins_kenmerkwaarde Flexprop
-- 1 Receptnummer } Srtcontrole
-- 2 Receptomschrijving }
-- 3 Totaalbedr.
-- 4 StJr
-- 5 Duur
-- 6 EiJr
-- 7 ExJr
-- 8 VvJr
-- 9 Aant. Aanw. } Aantal geregistreerde objecten
-- 10 Perc. Onderh } Percentage van dat aantal (vorige kolom) dat voor onderhoud cyclus in aanmerking komt, default 100%
-- 11 Aantal niet
-- 12 Aant.Overh.
-- 13 Eh. } Eenheid --> Stoppen we nu in standaard kolom Eenheid (kolom I)
-- 14 Cycl
-- 15 Fo
-- 16 Fonds
-- 17 kenmerk17
-- 18 kenmerk18
-- 19 kenmerk19
-- 20 kenmerk20
-- LET OP: WE GAAN ERVAN UIT DAT bij een Receptnummer (1) altijd dezelfde Receptomschrijving(2) en Eenheid (13) horen. M.a.w. bij 2 regels Receptnr (1) zijn (2) en (13) ook gelijk.
CURSOR c1
IS -- receptnummer, receptomschrijving,
SELECT DISTINCT(ins_kenmerkwaarde1)
FROM fac_imp_ins
order by ins_kenmerkwaarde1;
CURSOR c2 (p_max_ins_deel_key NUMBER, p_receptnr VARCHAR2, p_kosten VARCHAR2, p_periode VARCHAR2, p_perc_onderhoud VARCHAR2)
IS
SELECT d.ins_deel_key, d.ins_deel_omschrijving, c.ins_srtcontrole_key, ins_kenmerkwaarde14 periode, 4,
fac.safe_to_number(replace(replace(ins_kenmerkwaarde3, '.'), ',','.')) kosten, fac.safe_to_number(replace(replace(ins_kenmerkwaarde10, '.'), ',','.')) perc_onderhoud
FROM fac_imp_ins i, ins_deel d, ins_srtcontrole c
WHERE i.ins_deel_omschrijving = d.ins_deel_omschrijving
AND d.ins_deel_key > p_max_ins_deel_key
AND i.ins_kenmerkwaarde1 = p_receptnr
AND (i.ins_kenmerkwaarde3 <> p_kosten OR i.ins_kenmerkwaarde14 <> p_periode OR i.ins_kenmerkwaarde10 <> p_perc_onderhoud)
AND i.ins_kenmerkwaarde3 IS NOT NULL
AND i.ins_kenmerkwaarde14 IS NOT NULL
AND i.ins_kenmerkwaarde10 IS NOT NULL
AND i.ins_kenmerkwaarde1 = substr(c.ins_srtcontrole_omschrijving, 1, instr(c.ins_srtcontrole_omschrijving, '-')-1 );
CURSOR c4 (p_max_ins_srtcontroledl_xcp NUMBER)
IS
SELECT ins_srtcontroledl_xcp_key, ins_deel_key, c.ins_srtcontrole_key, ins_srtcontrole_omschrijving,
CASE
WHEN ins_srtcontrole_materiaal IS NOT NULL AND ins_srtcontroledl_xcp_materia IS NOT NULL AND ins_srtcontrole_materiaal = ins_srtcontroledl_xcp_materia
THEN 1
ELSE 0
END set_materia_null,
CASE
WHEN ins_srtcontrole_periode IS NOT NULL AND ins_srtcontroledl_xcp_periode IS NOT NULL AND ins_srtcontrole_periode = ins_srtcontroledl_xcp_periode
THEN 1
ELSE 0
END set_periode_null,
CASE
WHEN ins_srtcontrole_percentage IS NOT NULL AND ins_srtcontroledl_xcp_perc IS NOT NULL AND ins_srtcontrole_percentage = ins_srtcontroledl_xcp_perc
THEN 1
ELSE 0
END set_perc_onderhoud_null
FROM ins_srtcontrole c, ins_srtcontroledl_xcp x
WHERE x.ins_srtcontroledl_xcp_key > p_max_ins_srtcontroledl_xcp
AND x.ins_srtcontrole_key = c.ins_srtcontrole_key;
-- Let op: de eenheid kolom I wordt (itt hetgeen ik dacht) niet in ins_srtdeel_eenheid verwerkt, maar in res_deel_eenheid.
-- Verder: ins_srtdeel_code is verder helemaal NIET uniek, niet over de DB, niet per discipline en/of groep.
-- We kunnen daarom volstaan door hier verder ook niet te groeperen op discipline of iets dergelijks, we gaan gewoon op objectsoort-code groeperen, en ze krijgen allen dezelfde eenheid.
CURSOR c3
IS
SELECT ins_srtdeel_code, res_deel_eenheid
FROM fac_imp_ins
GROUP BY ins_srtdeel_code, res_deel_eenheid;
-- Fondscodes/Projectgroepen gaan we als (gebouw)kostenplaatsen opvoeren
CURSOR c5
IS
SELECT ins_kenmerkwaarde15, ins_kenmerkwaarde16
FROM fac_imp_ins
GROUP BY ins_kenmerkwaarde15, ins_kenmerkwaarde16;
BEGIN
v_errorhint := 'plat_post_update_ins';
-- Eerst maar eens beginnen met de verwerking van de kostenplaatsen cursor 5
FOR rec IN c5
LOOP
SELECT COUNT(*)
INTO v_kpn_bestaat
FROM prs_kostenplaats
WHERE prs_kostenplaats_upper = UPPER(rec.ins_kenmerkwaarde15)
AND prs_kostenplaats_verwijder IS NULL
AND prs_kostenplaats_module = 'ALG';
IF v_kpn_bestaat = 0
THEN
INSERT INTO prs_kostenplaats (prs_kostenplaats_nr, prs_kostenplaats_omschrijving, prs_kostenplaats_module, prs_kostenplaats_extern, prs_kostenplaats_limietperiode, prs_kostenplaats_fiat)
VALUES(rec.ins_kenmerkwaarde15, rec.ins_kenmerkwaarde16, 'ALG', 0, 0, 1);
END IF;
END LOOP;
-- Eerst maar eens beginnen met de verwerking van ins_srtdeel_eenheid
FOR rec IN c3
LOOP
UPDATE ins_srtdeel
SET ins_srtdeel_eenheid = rec.res_deel_eenheid
WHERE ins_srtdeel_code = rec.ins_srtdeel_code
AND ins_srtdeel_key > p_max_ins_srtdeel_key
AND ins_srtdeel_verwijder IS NULL;
END LOOP;
-- Verder moet van alle ins_srtdeel die zijn toegevoegd de 'hoort bij persoon' eraf worden gehaald (sie in de standaard FIP erop is gezet), dus ins_srtdeel_binding van 17 -> 1
UPDATE ins_srtdeel
SET ins_srtdeel_binding = 1
WHERE ins_srtdeel_key > p_max_ins_srtdeel_key
AND ins_srtdeel_verwijder IS NULL;
-- Bepalen van de ctr discipline waaronder de terugkerende taken worden vastgelegd.
SELECT MIN(ins_discipline_key)
INTO v_ctr_discipline_key
FROM ctr_discipline d, ctr_disc_params dp
WHERE dp.ctr_ins_discipline_key = d.ins_discipline_key
AND d.ins_discipline_verwijder IS NULL
AND dp.ctr_disc_params_ismjob = 1;
IF v_ctr_discipline_key IS NULL
THEN
-- Als de ctr_discipline 'vervanging' niet gevonden is, dan maar de de laatste (max)
SELECT MAX(ins_discipline_key)
INTO v_ctr_discipline_key
FROM ctr_discipline
WHERE ins_discipline_module = 'CTR'
AND ins_discipline_verwijder IS NULL;
END IF;
-- Bepalen van de default BTW % 21...
SELECT MIN(fin_btwtabelwaarde_key)
INTO v_fin_btwtabelwaarde_key
FROM fin_btwtabelwaarde
WHERE fin_btwtabelwaarde_perc = 21
AND COALESCE(fin_btwtabelwaarde_verlegd,0) = 0
AND fin_btwtabelwaarde_verwijder IS NULL;
-- We gaan hier per receptnummer het MEEST UNIFORME (algemene) eruit vissen.
-- Dat doen we door te kijken waarvan de combinatie van dezelfde kosten (aant_K) met dezelfde periode het vaakst voorkomen (aant_P).
-- Voorbeeld hieronder: enkele regels bij 1 object A: recept R1 kost 100 euro per eenhied en wordt elke 2 jaar gepland, elke regel daarna heeft betrekking op ander object
-- recept(1) kosten(3) periode(14)
-- R1 100 2
-- R1 100 2
-- R1 150 2
-- R1 100 1
-- Hier is de meest algemene recept die met kosten 100 en om de 2 jaar (regel 1 en 2), de andere recepten (regel 3 en 4) zijn uitzonderingen (XCP) op de algemene regel.
-- We gaan (gebaseerd op de sheet van WaardWonen) hier ook nog eens rekening houden met Perc.Onderh, die default 100 staat.
-- Maar als de regel is 50%, dan is dat de norm, en elke afwijking van 50% is dus uitzondering, dus we gaan OOK op zoek naar de meeste regels met dezelfde Perc. Onderh.
-- Dus
-- recept(1) kosten(3) periode(14) %onderh (10)
-- R1 100 2 75
-- R1 100 2 50 <-- Hiervan zijn er 2, dit is de standaard taak (srtcontrole)
-- R1 150 2 100
-- R1 100 1 100
-- R1 100 2 50 <-- Hiervan zijn er 2, dit is de standaard taak (srtcontrole)
FOR rec IN c1
LOOP
SELECT ins_kenmerkwaarde1, ins_kenmerkwaarde3, ins_kenmerkwaarde14, ins_kenmerkwaarde10
INTO v_receptnr, v_kosten, v_periode, v_perc_onderhoud
FROM (
SELECT a.ins_kenmerkwaarde1, a.ins_kenmerkwaarde3, a.ins_kenmerkwaarde14, ins_kenmerkwaarde10, count(*) aantal FROM fac_imp_ins a
WHERE a.ins_kenmerkwaarde1 = rec.ins_kenmerkwaarde1
HAVING count(*) = (SELECT MAX(COUNT(*)) FROM fac_imp_ins b
WHERE b.ins_kenmerkwaarde1 = a.ins_kenmerkwaarde1
GROUP by ins_kenmerkwaarde1, ins_kenmerkwaarde3, ins_kenmerkwaarde14, ins_kenmerkwaarde10
)
GROUP by ins_kenmerkwaarde1, ins_kenmerkwaarde3, a.ins_kenmerkwaarde14, ins_kenmerkwaarde10)
WHERE rownum = 1;
-- Algemene soort controles (terugkerende taken) toevoegen op alle soortdelen die zijn toegevoegd in deze import ( > p_max_ins_srtdeel_key)
-- Fondscode ook in (laatste, zojuist ingeschoten record) ins_srtcontrole verwerken...
-- We gaan ervan uit, en dat is terecht, dat er 1 fondscode (en niet meer dan 1) bij een v_receptnr bestaat.
-- Voor het geval dat er toch is (d.i. een fout in het importbestand) doen we veiligheidshalve MAX.
INSERT INTO ins_srtcontrole (ctr_discipline_key, ins_srtinstallatie_key, ins_srtcontrole_niveau, ins_srtcontrole_omschrijving, ins_srtcontrole_groep,
ins_srtcontrole_info, ins_srtcontrole_periode, ins_srtcontrole_eenheid, ins_srtcontrole_mode, ins_srtcontrole_materiaal, fin_btwtabelwaarde_key,
ins_srtcontrole_percentage, prs_kostenplaats_key)
SELECT v_ctr_discipline_key, ins_srtdeel_key, 'S', substr( ins_kenmerkwaarde1 || '-' || MAX(ins_kenmerkwaarde2), 1,60), v_receptnr,
MAX(ins_kenmerkwaarde2) || ' [' || MAX(ins_kenmerkwaarde13) || ']' , v_periode, 4, 1, fac.safe_to_number(replace(replace(v_kosten, '.'), ',','.')),
v_fin_btwtabelwaarde_key,
fac.safe_to_number(replace(replace(v_perc_onderhoud, '.'), ',','.')),
(SELECT prs_kostenplaats_key
FROM prs_kostenplaats
WHERE prs_kostenplaats_verwijder IS NULL
AND prs_kostenplaats_module = 'ALG'
AND prs_kostenplaats_upper = (SELECT UPPER(MAX(ins_kenmerkwaarde15))
FROM fac_imp_ins
WHERE ins_kenmerkwaarde1 = v_receptnr))
FROM ins_srtdeel sd, fac_imp_ins i
WHERE ins_srtdeel_key > p_max_ins_srtdeel_key
AND sd.ins_srtdeel_code = i.ins_srtdeel_code
AND i.ins_kenmerkwaarde1 = v_receptnr
AND i.ins_kenmerkwaarde3 = v_kosten
AND i.ins_kenmerkwaarde14 = v_periode
AND i.ins_kenmerkwaarde10 = v_perc_onderhoud
AND NOT EXISTS (SELECT 'x' FROM ins_srtcontrole
WHERE ins_srtinstallatie_key = ins_srtdeel_key
AND ins_srtcontrole_niveau = 'S'
AND ins_srtcontrole_groep = v_receptnr)
GROUP BY ins_srtdeel_key, ins_kenmerkwaarde1;
-- Uitzonderingen op de algemene (reguliere) soort controle, die dus afwijken van kosten en/of periode, worden toegevoegd als XCP
-- Let op: hier wordt aantal nog in GROEP gestopt, vraag is of we de eenheid moeten stoppen in ins_srtdeel_aantal of in ins_srtcontrole_aantal / ins_srtcontroledl_xcp_aantal op dieper nivo.
-- Check via onderstaande query op plato@labs levert op dat er een paar verschillen in aantal zitten:
-- plato_waardwonen_verschil_aantal_andere_eenheid.xls: 15 objecten met meerdere activiteiten, verschillend aantal, andere eenheid.
-- select a.ins_deel_omschrijving, b.ins_kenmerkwaarde1, b.ins_kenmerkwaarde2, b.ins_kenmerkwaarde13, b.ins_kenmerkwaarde10, c.ins_kenmerkwaarde10, c.ins_kenmerkwaarde13, c.ins_kenmerkwaarde1, c.ins_kenmerkwaarde2 from
-- (select ins_deel_omschrijving, count(*) from fac_imp_ins
-- having count(*) > 1
-- group by ins_deel_omschrijving) a,
-- fac_imp_ins b,
-- fac_imp_ins c
-- where a.ins_deel_omschrijving = b.ins_deel_omschrijving
-- AND b.ins_deel_omschrijving = c.ins_deel_omschrijving
-- AND b.ins_kenmerkwaarde1 <> c.ins_kenmerkwaarde1
-- AND b.ins_kenmerkwaarde10 <> c.ins_kenmerkwaarde10
-- AND b.ins_kenmerkwaarde13 <> c.ins_kenmerkwaarde13
-- ORDER BY a.ins_deel_omschrijving;
-- plato_waardwonen_verschil_aantal_dezelfde_eenheid.xls: 30 objecten met meerdere activiteiten, verschillend aantal, dezelfde eenheid
-- select a.ins_deel_omschrijving, b.ins_kenmerkwaarde1, b.ins_kenmerkwaarde2, b.ins_kenmerkwaarde13, b.ins_kenmerkwaarde10, c.ins_kenmerkwaarde10, c.ins_kenmerkwaarde13, c.ins_kenmerkwaarde1, c.ins_kenmerkwaarde2 from
-- (select ins_deel_omschrijving, count(*) from fac_imp_ins
-- having count(*) > 1
-- group by ins_deel_omschrijving) a,
-- fac_imp_ins b,
-- fac_imp_ins c
-- where a.ins_deel_omschrijving = b.ins_deel_omschrijving
-- AND b.ins_deel_omschrijving = c.ins_deel_omschrijving
-- AND b.ins_kenmerkwaarde1 <> c.ins_kenmerkwaarde1
-- AND b.ins_kenmerkwaarde10 <> c.ins_kenmerkwaarde10
-- AND b.ins_kenmerkwaarde13 = c.ins_kenmerkwaarde13
-- ORDER BY a.ins_deel_omschrijving;
-- plato_waardwonen_meer_activiteiten_met_gelijk_aantal.xlsx: 354 objecten met meerdere activiteiten, gelijke aantal, (dezelfde of afwijkend eenheid).
--select a.ins_deel_omschrijving, b.ins_kenmerkwaarde1, b.ins_kenmerkwaarde2, b.ins_kenmerkwaarde13, b.ins_kenmerkwaarde10, c.ins_kenmerkwaarde10, c.ins_kenmerkwaarde13, c.ins_kenmerkwaarde1, c.ins_kenmerkwaarde2 from
--(select ins_deel_omschrijving, count(*) from fac_imp_ins
--having count(*) > 1
--group by ins_deel_omschrijving) a,
--fac_imp_ins b,
--fac_imp_ins c
--where a.ins_deel_omschrijving = b.ins_deel_omschrijving
--AND b.ins_deel_omschrijving = c.ins_deel_omschrijving
--AND b.ins_kenmerkwaarde1 <> c.ins_kenmerkwaarde1
--AND b.ins_kenmerkwaarde10 = c.ins_kenmerkwaarde10
---- AND b.ins_kenmerkwaarde13 = c.ins_kenmerkwaarde13
--ORDER BY a.ins_deel_omschrijving;
--;
--plato_waardwonen_objecten_met_1_activiteit.xlsx: 2940 objecten met 1 activiteit, aantal dont care, eenheid dont care.
--select ins_deel_omschrijving, MAX(b.ins_kenmerkwaarde1), MAX(b.ins_kenmerkwaarde2), MAX(b.ins_kenmerkwaarde13), MAX(b.ins_kenmerkwaarde10) from fac_imp_ins b
--having count(*) = 1
--group by ins_deel_omschrijving;
-- Aantal objecten ingelezen: 3344.
-- select distinct (ins_deel_omschrijving) from fac_imp_ins;
-- Uitzonderingen op de algemene (reguliere) soort controle die we zojuist hebben toegevoegd, die dus afwijken van kosten en/of periode, worden toegevoegd als XCP
-- Let op: hier wordt aantal nog in GROEP gestopt, vraag is of we de eenheid moeten stoppen in ins_srtdeel_aantal of in ins_srtcontrole_aantal / ins_srtcontroledl_xcp_aantal op dieper nivo.
-- Let op 2: Dit zijn natuurlijk alleen de objecten die in deze import zijn toegevoegd (d.ins_deel_key > p_max_ins_deel_key) en afwijkende kosten en afwijkende periode hebben.
-- Verder moet de algemene ins_srtcontrole wel gevonden kunnen worden om een xcp daarop te kunnen maken (foreign-key)
-- Waneer de kosten OF(!) de periode niet zijn ingevuld (NULL-value), dan gaan we ervan uit dat deze de default volgen, en wordt er geen XCP aangemaakt,
-- Dus als een van beide ontbreekt, dan volgt die de standaard.
-- Hier nog ff onthouden wat de laatste xcp record is, is straks nodig voor een nabewerking (cursor 4)
SELECT coalesce(max(ins_srtcontroledl_xcp_key),0)
INTO v_mx_ins_srtcontroledl_xcp_key
FROM ins_srtcontroledl_xcp;
v_errormsg := 'Soort controle gegevens: ' || ' recept=[' || v_receptnr || '],' || ' kosten=[' || v_kosten || '],' ||
' periode=[' || v_periode || '],' || ' percentage=[' || v_perc_onderhoud || '],';
FOR rec2 IN c2 (p_max_ins_deel_key, v_receptnr, v_kosten, v_periode, v_perc_onderhoud)
LOOP
BEGIN
v_errormsg := 'INSERT INTO ins_srtcontroledl_xcp: ' || 'ins_deel_key=['|| rec2.ins_deel_key || '],' || 'objectomschrijving=[' || rec2.ins_deel_omschrijving || '] ' ||
'ins_srtcontrole_key=[' || rec2.ins_srtcontrole_key || '],' ||
'recept=[' || v_receptnr || '],' || 'kosten=[' || rec2.kosten || '],' ||
'periode=[' || rec2.periode || '],' || ' percentage=[' || v_perc_onderhoud || '],';
fac.imp_writelog (p_import_key,
'I',
v_errormsg,
v_errorhint
);
INSERT INTO ins_srtcontroledl_xcp ( ins_deel_key, ins_srtcontrole_key, ins_srtcontroledl_xcp_periode, ins_srtcontroledl_xcp_eenheid,
ins_srtcontroledl_xcp_materia, ins_srtcontroledl_xcp_perc)
SELECT rec2.ins_deel_key, rec2.ins_srtcontrole_key, rec2.periode, 4, rec2.kosten, rec2.perc_onderhoud FROM dual;
EXCEPTION
WHEN OTHERS
THEN
fac.imp_writelog (p_import_key, 'W', v_errormsg, v_errorhint);
oracle_err_num := SQLCODE;
oracle_err_mes := SUBSTR (SQLERRM, 1, 200);
v_errormsg :=
'OTHERS (error '
|| oracle_err_num
|| '/'
|| oracle_err_mes
|| ')';
fac.imp_writelog (p_import_key,
'E',
v_errormsg,
v_errorhint
);
COMMIT;
END;
END LOOP;
-- "After" post-processing van de XCP records die zojuist - in voorgaande loop- zijn toegevoegd.
-- De kolommen (materiaal, periode, percentage) die dezelfde waarde hebben als de standaard ins_srtcontrole moeten op NULL worden gezet,
-- Maw alleen de echte afwijkingen moeten een waarde (NOT NULL) hebben.
-- In de cursor c2 worden de records opgehaald waarvan minimaal 1 afwijking is, dat betekent dat er dus ook mogelijk dezelfde waarde als de standaard bestaat.
v_errormsg := 'NABEWERKING ins_srtcontroledl_xcp: ';
FOR rec4 IN c4 (v_mx_ins_srtcontroledl_xcp_key)
LOOP
BEGIN
v_errorhint := 'NABEWERKING ins_srtcontroledl_xcp: ' || 'key=[' || rec4.ins_srtcontroledl_xcp_key || '], controle=[ ' || rec4.ins_srtcontrole_omschrijving || ']';
IF rec4.set_materia_null = 1
THEN
UPDATE ins_srtcontroledl_xcp SET ins_srtcontroledl_xcp_materia = NULL WHERE ins_srtcontroledl_xcp_key = rec4.ins_srtcontroledl_xcp_key;
END IF;
IF rec4.set_periode_null = 1
THEN
UPDATE ins_srtcontroledl_xcp SET ins_srtcontroledl_xcp_periode = NULL WHERE ins_srtcontroledl_xcp_key = rec4.ins_srtcontroledl_xcp_key;
END IF;
IF rec4.set_perc_onderhoud_null = 1
THEN
UPDATE ins_srtcontroledl_xcp SET ins_srtcontroledl_xcp_perc = NULL WHERE ins_srtcontroledl_xcp_key = rec4.ins_srtcontroledl_xcp_key;
END IF;
EXCEPTION
WHEN OTHERS
THEN
fac.imp_writelog (p_import_key, 'W', v_errormsg, v_errorhint);
oracle_err_num := SQLCODE;
oracle_err_mes := SUBSTR (SQLERRM, 1, 200);
v_errormsg :=
'OTHERS (error '
|| oracle_err_num
|| '/'
|| oracle_err_mes
|| ')';
fac.imp_writelog (p_import_key,
'E',
v_errormsg,
v_errorhint
);
COMMIT;
END;
END LOOP;
END LOOP;
-- We gaan dan nog het aantal objecten (ins_deel_aantal) die standaard op 1 staat, bijwerken met kolom 9 (aantal geregistreerde objecten).
-- Hiervoor nemen we het hoogste aantal (het object kan voor meerdere activiteiten met verschillende aantal (icm eenheid) worden ingezet), b.v.:
-- object A (kozijnen) 10 m2 schilderen
-- object A (kozijnen) 2 st. vervangen
-- We registeren dan bij object A 10??? (of is 2 beter, omdat dit de preferred eenheid stuks is)?
UPDATE ins_deel d
SET ins_deel_aantal = (select COALESCE(fac.safe_to_number(max(ins_kenmerkwaarde9)),1) from fac_imp_ins i where i.ins_deel_omschrijving = d.ins_deel_omschrijving)
WHERE d.ins_deel_key > p_max_ins_deel_key
AND d.ins_deel_verwijder IS NULL;
-- De aanmaakdatums van de ins_delen die zijn toegevoegd ( > p_max_ins_deel_key) bepalen de volgende controle-momenten, dus dat komt natuurlijk wel wat nauw.
-- Daarom wordt StJr (ins_kenmerkwaarde4) als startjaar bij alle objecten (ins_delen) van het betreffende pand gezet.
UPDATE ins_deel d
SET ins_deel_aanmaak = (select min( to_date (ins_kenmerkwaarde4, 'yyyy')) from fac_imp_ins i where i.ins_deel_omschrijving = d.ins_deel_omschrijving)
WHERE d.ins_deel_key > p_max_ins_deel_key
AND d.ins_deel_verwijder IS NULL;
--- En tenslotte gaan we de 3 MJOB autorisatiegroepen MJOB-R, MJOB-W en MJOB-A de rechten op INSUSE, INSMAN en CTRUSE uitdelen....
-- 1. Eerst MJOB-R (Leesrechten): INSUSE READ en INSMAN READ op elke INS-discipline en CTRUSE READ op de MJOB-discipline (v_ctr_discipline_key)
INSERT INTO fac_groeprechten (fac_groep_key, fac_functie_key, ins_discipline_key,
fac_gebruiker_prs_level_read, fac_gebruiker_prs_level_write, fac_gebruiker_alg_level_read, fac_gebruiker_alg_level_write)
SELECT
(SELECT fac_groep_key FROM fac_groep WHERE fac_groep_upper = 'MJOB-R: LEESRECHTEN'),
fac_functie_key,
d.ins_discipline_key,
-1, 9, -1, 9
FROM fac_functie, ins_discipline d
WHERE fac_functie_code = 'WEB_INSUSE'
AND d.ins_discipline_verwijder IS NULL;
INSERT INTO fac_groeprechten (fac_groep_key, fac_functie_key, ins_discipline_key,
fac_gebruiker_prs_level_read, fac_gebruiker_prs_level_write, fac_gebruiker_alg_level_read, fac_gebruiker_alg_level_write)
SELECT
(SELECT fac_groep_key FROM fac_groep WHERE fac_groep_upper = 'MJOB-R: LEESRECHTEN'),
fac_functie_key,
d.ins_discipline_key,
-1, 9, -1, 9
FROM fac_functie, ins_discipline d
WHERE fac_functie_code = 'WEB_INSMAN'
AND d.ins_discipline_verwijder IS NULL;
INSERT INTO fac_groeprechten (fac_groep_key, fac_functie_key, ins_discipline_key,
fac_gebruiker_prs_level_read, fac_gebruiker_prs_level_write, fac_gebruiker_alg_level_read, fac_gebruiker_alg_level_write)
SELECT
(SELECT fac_groep_key FROM fac_groep WHERE fac_groep_upper = 'MJOB-R: LEESRECHTEN'),
fac_functie_key,
v_ctr_discipline_key,
-1, 9, -1, 9
FROM fac_functie
WHERE fac_functie_code = 'WEB_CTRUSE';
-- 2. Dan MJOB-W (Schrijfrechten): INSUSE WRITE en INSMAN WRITE op elke INS-discipline en CTRUSE WRITE op de MJOB-discipline (v_ctr_discipline_key)
INSERT INTO fac_groeprechten (fac_groep_key, fac_functie_key, ins_discipline_key,
fac_gebruiker_prs_level_read, fac_gebruiker_prs_level_write, fac_gebruiker_alg_level_read, fac_gebruiker_alg_level_write)
SELECT
(SELECT fac_groep_key FROM fac_groep WHERE fac_groep_upper = 'MJOB-W: SCHRIJFRECHTEN'),
fac_functie_key,
d.ins_discipline_key,
-1, -1, -1, -1
FROM fac_functie, ins_discipline d
WHERE fac_functie_code = 'WEB_INSUSE'
AND d.ins_discipline_verwijder IS NULL;
INSERT INTO fac_groeprechten (fac_groep_key, fac_functie_key, ins_discipline_key,
fac_gebruiker_prs_level_read, fac_gebruiker_prs_level_write, fac_gebruiker_alg_level_read, fac_gebruiker_alg_level_write)
SELECT
(SELECT fac_groep_key FROM fac_groep WHERE fac_groep_upper = 'MJOB-W: SCHRIJFRECHTEN'),
fac_functie_key,
d.ins_discipline_key,
-1, -1, -1, -1
FROM fac_functie, ins_discipline d
WHERE fac_functie_code = 'WEB_INSMAN'
AND d.ins_discipline_verwijder IS NULL;
INSERT INTO fac_groeprechten (fac_groep_key, fac_functie_key, ins_discipline_key,
fac_gebruiker_prs_level_read, fac_gebruiker_prs_level_write, fac_gebruiker_alg_level_read, fac_gebruiker_alg_level_write)
SELECT
(SELECT fac_groep_key FROM fac_groep WHERE fac_groep_upper = 'MJOB-W: SCHRIJFRECHTEN'),
fac_functie_key,
v_ctr_discipline_key,
-1, -1, -1, -1
FROM fac_functie
WHERE fac_functie_code = 'WEB_CTRUSE';
-- 3. Tenslotte MJOB-A (Admin MJOB): INSMGT, ALG..? en nog wat.... TODO...
EXCEPTION
WHEN OTHERS
THEN
fac.imp_writelog (p_import_key, 'E', v_errormsg, v_errorhint);
oracle_err_num := SQLCODE;
oracle_err_mes := SUBSTR (SQLERRM, 1, 100);
v_errormsg := 'Error ' || oracle_err_num || '/' || oracle_err_mes;
fac.imp_writelog (p_import_key, 'E', v_errormsg, v_errorhint);
END;
/
CREATE OR REPLACE PROCEDURE plat_update_ins (
p_import_key IN NUMBER
) IS
v_count NUMBER;
v_max_ins_srtdeel_key NUMBER(10);
v_max_ins_deel_key NUMBER(10);
BEGIN
-- Even snel registreren wat de laatst toegevoegde ins_srtdeel is, dan weten we dat er door deze import-procedure wordt toegevoegd (alles > dan deze max).
SELECT coalesce(max(ins_srtdeel_key),0)
INTO v_max_ins_srtdeel_key
FROM ins_srtdeel
WHERE ins_srtdeel_verwijder IS NULL;
-- Idem voor laatst toegevoegde ins_deel is, dan weten we dat er door deze import-procedure wordt toegevoegd (alles > dan deze max).
SELECT coalesce(max(ins_deel_key),0)
INTO v_max_ins_deel_key
FROM ins_deel
WHERE ins_deel_verwijder IS NULL;
fac_update_ins (p_import_key);
-- After update ...
plat_post_update_ins(p_import_key, v_max_ins_srtdeel_key, v_max_ins_deel_key);
END plat_update_ins;
/
BEGIN fac.registercustversion('PLAT', 1); END;
/
BEGIN adm.systrackscriptId('$Id$', 0); END;
/
show errors;
commit;
spool off;

251
PLAT/plat_ini.sql Normal file
View File

@@ -0,0 +1,251 @@
-- Customer specific once-script PLAT.
--
-- (c) 2011 SG|facilitor bv
--
-- Support: +31 53 4800700
SET ECHO ON
SPOOL plat01.lst
SET DEFINE OFF
-- Settings
UPDATE fac_setting SET fac_setting_pvalue = '2' where fac_setting_name = 'email_password';
UPDATE fac_setting SET fac_setting_pvalue = '1' where fac_setting_name = 'login_use_email';
UPDATE fac_setting SET fac_setting_pvalue = 'no_reply@plat.facilitor.nl' where fac_setting_name = 'puo_fromaddress';
UPDATE fac_setting SET fac_setting_pvalue = '0' where fac_setting_name = 'ins_explode_objects';
-- Portaal
UPDATE fac_setting SET fac_setting_pvalue = '1' where fac_setting_name = 'widgetportal';
UPDATE fac_setting SET fac_setting_pvalue = 'False' where fac_setting_name = 'menu_start_open';
UPDATE fac_setting SET fac_setting_pvalue = '{'
|| '"headerimage": "../cust/plat/plato.png",'
|| '"headerbackgroundcolor": "#ffffff",'
|| '"headercolor": "#000",'
|| '"mywelcomebackgroundcolor": "#6685ae",'
|| '"frameheaderbackgroundcolor": "#6685ae",'
|| '"blockheaderbackgroundcolor": "#eeb066",'
|| '"buttonbackgroundcolor": "#6685ae",'
|| '"menukophovercolor": "#eeb066",'
|| '"menuitemhovercolor": "#eeb066",'
|| '"profmenucolor": "#6685ae",'
|| '"mgtmenucolor": "#6685ae"'
|| '}' where fac_setting_name = 'csstemplate';
UPDATE fac_setting SET fac_setting_pvalue = '0' where fac_setting_name = 'menu_tab_toggles_portalmenu';
UPDATE fac_setting SET fac_setting_pvalue = '4' where fac_setting_name = 'portalmenucols';
insert into fac_widget (fac_widget_groep, fac_widget_volgnr, fac_widget_width, fac_widget_url)
select 'myfacilitor', 10 , 99, 'fac_portal_menu.asp?groep=1' from dual;
insert into fac_widget (fac_widget_groep, fac_widget_volgnr, fac_widget_width, fac_widget_url)
select 'myfacilitor', 20 , 99, 'myfacilitor.asp' from dual;
-- Terminologie
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Plato' WHERE fac_locale_xsl_label = 'lcl_facilitor_appl' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Plato' WHERE fac_locale_xsl_label = 'lcl_facilitor_ie_title' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Welkom bij Plato' WHERE fac_locale_xsl_label = 'lcl_facilitor_portalwelcome1' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = ' ' WHERE fac_locale_xsl_label = 'lcl_facilitor_welcome' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Welkom bij Plato' WHERE fac_locale_xsl_label = 'lcl_firstlogin_url' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Powered by Plato' WHERE fac_locale_xsl_label = 'lcl_mobile_footer' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Op grond van de u toegekende rechten heeft u hiervoor geen bevoegdheid. Indien u van mening bent dat dit niet terecht is kunt u het beste contact opnemen met uw Plato contactpersoon.' WHERE fac_locale_xsl_label = 'lcl_no_auth' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'E-mail adres niet bekend binnen Plato' WHERE fac_locale_xsl_label = 'lcl_pass2emailunknown' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Nieuw Plato wachtwoord' WHERE fac_locale_xsl_label = 'lcl_password_new' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Het Plato wachtwoord herstellen kan via <a href=''{0}''>{0}</a> tot en met {1}.' WHERE fac_locale_xsl_label = 'lcl_password_reset' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Door <20><>n van bovenstaande acties uit te voeren is uw smartphone geregistreerd en kunt u Plato voortaan ook mobiel gebruiken, zonder dat u hiervoor hoeft in te loggen.<br><br>Wilt u een snelkoppeling maken naar Plato Mobile? Link dan naar het menuscherm. Snelkoppelingen naar andere schermen werken niet of niet volledig.<br><br>LET OP: in geval van diefstal of verlies van uw smartphone kunnen anderen mogelijk onder uw naam gebruik maken van Plato. U kunt dan <a href="javascript:clear_sessions()">hier</a> klikken om in <20><>n keer al uw onthouden aanmeldingen te wissen.' WHERE fac_locale_xsl_label = 'lcl_qrc_auth_footer' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Bij Plato aanmelden kan via <a href=''{0}''>{0}</a> tot en met {1}.' WHERE fac_locale_xsl_label = 'lcl_qrc_auth_mail_body' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'U bent nu aangemeld bij Plato. Klik <a href=''{0}''>hier</a> om verder te gaan.' WHERE fac_locale_xsl_label = 'lcl_qrc_auth_mail_confirmed' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Plato aanmelden' WHERE fac_locale_xsl_label = 'lcl_qrc_auth_mail_subject' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Plato-URL' WHERE fac_locale_xsl_label = 'lcl_qrc_url' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'U ontvangt dit bericht omdat er een registratie bij Plato is aangevraagd.<p>Indien dit niet door u gebeurd is hoeft u niets te doen. Indien u dit wel zelf was, dient u op deze link<br>' || '&' || 'nbsp;' || '&' || 'nbsp;' || '&' || 'nbsp;' || '&' || 'nbsp;<a href=''{0}''>{0}</a><br>te klikken om uw registratie te voltooien.' WHERE fac_locale_xsl_label = 'lcl_self_register_body' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Bevestig uw Plato registratie' WHERE fac_locale_xsl_label = 'lcl_self_register_subject' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Er is te lang geen activiteit geweest, en uw sessie is om veiligheidsredenen vervallen. Sluit het window en log opnieuw in op de Plato portal.' WHERE fac_locale_xsl_label = 'lcl_session_expired' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Op grond van de u toegekende rechten heeft u hiervoor geen bevoegdheid. Meestal is dat zo bedoeld. Indien u van mening bent dat dat niet zo is kunt u het beste contact opnemen met uw Plato contactpersoon.' WHERE fac_locale_xsl_label = 'lcl_shared_no_auth' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Aanmelden bij Plato kan via <a href=''{0}''>{0}</a> tot en met {1}.' WHERE fac_locale_xsl_label = 'lcl_tokenmail_body' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Plato aanmelding' WHERE fac_locale_xsl_label = 'lcl_tokenmail_subject' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'We wensen je veel gemak van Plato!' WHERE fac_locale_xsl_label = 'lcl_welcome_bye' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Hierboven zie je altijd het tabblad Mijn Plato waarin je de actuele status kunt zien van alles wat met jou te maken heeft. Het is allemaal eigenlijk behoorlijk vanzelfsprekend en je kunt bijna overal op klikken voor meer informatie.' WHERE fac_locale_xsl_label = 'lcl_welcome_line3' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Welkom bij Plato {0}!' WHERE fac_locale_xsl_label = 'lcl_welcome_title' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Mijn Plato' WHERE fac_locale_xsl_label = 'lcl_body_portal' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = '<br>TIP: Voeg Plato toe aan je beginscherm.<br>Om een snelkoppeling te maken druk je op de volgende pagina op juiste knop in je browser en kies je voor Voeg toe aan beginscherm.' WHERE fac_locale_xsl_label = 'lcl_bookmarkthis_hint' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
-- Rename van locatie
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Cluster' WHERE fac_locale_xsl_label = 'alg_locatie' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Cluster' WHERE fac_locale_xsl_label = 'ins_kenmerk_locatiekolom' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Verwijderen cluster' WHERE fac_locale_xsl_label = 'lcl_alg_del_txt_locatie' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Cluster gewijzigd' WHERE fac_locale_xsl_label = 'lcl_alg_is_alglup' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Clustergegevens' WHERE fac_locale_xsl_label = 'lcl_alg_locatie_frame' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Clustercode' WHERE fac_locale_xsl_label = 'lcl_estate_locatie_man_code' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Cluster' WHERE fac_locale_xsl_label = 'lcl_estate_locatie_man_descr' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Clusterdetails' WHERE fac_locale_xsl_label = 'lcl_estate_locatie_title' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = '>Cluster' WHERE fac_locale_xsl_label = 'lcl_goto_locatie_list' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Cluster' WHERE fac_locale_xsl_label = 'lcl_location' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Cluster' WHERE fac_locale_xsl_label = 'lcl_menu_alg_locatie' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Kenmerken van cluster' WHERE fac_locale_xsl_label = 'lcl_menu_alg_locatiekenmerken' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Cluster' WHERE fac_locale_xsl_label = 'lcl_mi_location' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Selecteer een cluster...' WHERE fac_locale_xsl_label = 'lcl_select_locatie' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Selecteer een cluster' WHERE fac_locale_xsl_label = 'lcl_select_location' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
-- Rename van Discipline
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Hoofdrecept' WHERE fac_locale_xsl_label = 'lcl_discipline' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Selecteer een hoofdrecept...' WHERE fac_locale_xsl_label = 'lcl_select_discipline' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Hoofdrecepten' WHERE fac_locale_xsl_label = 'lcl_menu_ins_disciplines' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Hoofdrecept' WHERE fac_locale_xsl_label = 'ins_discipline' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Hoofdrecepten' WHERE fac_locale_xsl_label = 'ins_discipline_m' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Hoofdrecept' WHERE fac_locale_xsl_label = 'ins_srtinstallatie_discipline' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'D;Hoofdrecept;G;Groeprecept;S;Subrecept' WHERE fac_locale_xsl_label = 'ins_kenmerk_niveauLOV' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
-- Rename van Groepen (van disciplines)
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Selecteer een groeprecept...' WHERE fac_locale_xsl_label = 'lcl_select_srtgroep' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Groeprecepten' WHERE fac_locale_xsl_label = 'lcl_menu_ins_groepen' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Groeprecept' WHERE fac_locale_xsl_label = 'ins_srtgroep' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Groeprecepten' WHERE fac_locale_xsl_label = 'ins_srtgroep_m' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Hoofdrecept' WHERE fac_locale_xsl_label = 'ins_srtgroep_catalogus' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Groeprecept' WHERE fac_locale_xsl_label = 'ins_srtinstallatie_srtgroep' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
-- Rename van objectsoorten
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Subrecept' WHERE fac_locale_xsl_label = 'ins_srtinstallatie_srtdeel' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Weet u zeker dat u dit subrecept wil verwijderen?' WHERE fac_locale_xsl_label = 'lcl_ins_del_srtdeel' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Het subrecept verschilt. Specifieke kenmerken kunnen niet worden getoond. Kies elementen van hetzelfde subrecept' WHERE fac_locale_xsl_label = 'lcl_ins_diff_objsrt' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Kies subrecept' WHERE fac_locale_xsl_label = 'lcl_ins_nosrtdeel_selected' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Subrecept nummer' WHERE fac_locale_xsl_label = 'lcl_ins_objsrt_code' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Subrecepten' WHERE fac_locale_xsl_label = 'lcl_menu_ins_objectsoorten' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Dit subrecept is niet mogelijk bij deze plaats/ eigenaar.' WHERE fac_locale_xsl_label = 'lcl_obj_notallowed' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Selecteer een subrecept...' WHERE fac_locale_xsl_label = 'lcl_select_srtdeel' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Subrecept nummer' WHERE fac_locale_xsl_label = 'lcl_obj_srtdeel_code' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'D;Element;S;Subrecept' WHERE fac_locale_xsl_label = 'ins_kenmerk_bewerkniveauLOV' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
-- Rename van objecten
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Element kenmerk' WHERE fac_locale_xsl_label = 'ins_kenmerk' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Element kenmerken' WHERE fac_locale_xsl_label = 'ins_kenmerk_m' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Ook vervallen elementen' WHERE fac_locale_xsl_label = 'lcl_expobjects_incl' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Element beheer' WHERE fac_locale_xsl_label = 'lcl_facmgt_ins' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Weet u zeker dat u dit element wil verwijderen?' WHERE fac_locale_xsl_label = 'lcl_ins_del_txt_deel' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Bewerken element' WHERE fac_locale_xsl_label = 'lcl_ins_edit_object' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Element verwijderd' WHERE fac_locale_xsl_label = 'lcl_ins_is_insdel' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Element geregistreerd' WHERE fac_locale_xsl_label = 'lcl_ins_is_insnew' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Eleement gewijzigd' WHERE fac_locale_xsl_label = 'lcl_ins_is_insupd' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Element kenmerken' WHERE fac_locale_xsl_label = 'lcl_ins_kenmerken' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Gerelateerde elementen' WHERE fac_locale_xsl_label = 'lcl_ins_koppelobjects' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Beheerder van element' WHERE fac_locale_xsl_label = 'lcl_ins_manager' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Geen autorisatie voor het wijzigen van het element' WHERE fac_locale_xsl_label = 'lcl_ins_no_auth_change' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Element' WHERE fac_locale_xsl_label = 'lcl_ins_object' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Elementen' WHERE fac_locale_xsl_label = 'lcl_ins_objects' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Element beheer' WHERE fac_locale_xsl_label = 'lcl_menu_ins_bo_man' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Element beheer' WHERE fac_locale_xsl_label = 'lcl_menu_ins_bo_use' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Ander element' WHERE fac_locale_xsl_label = 'lcl_obj_bind_i' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Dit element verwijderen?' WHERE fac_locale_xsl_label = 'lcl_obj_del_confirm' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Element' WHERE fac_locale_xsl_label = 'lcl_obj_inf_name' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Subrecept' WHERE fac_locale_xsl_label = 'lcl_obj_sort' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Selecteer element' WHERE fac_locale_xsl_label = 'lcl_select_object' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
-- Rename van terugkerende taken
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Recepten' WHERE fac_locale_xsl_label = 'ins_srtcontrole_m' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Recepten' WHERE fac_locale_xsl_label = 'lcl_ins_planned_activities' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
UPDATE fac_locale_xsl SET fac_locale_xsl_cust = 'Recepten' WHERE fac_locale_xsl_label = 'lcl_menu_ins_srtcontrole' AND fac_locale_xsl_lang = 'NL' AND fac_locale_xsl_module = 'ASP';
-- Enkele flexprops bij locatie, de keys t/m 1000 zijn vrij voor eigen gebruik (SEQUENCE alg_s_alg_kenmerk_key begint bij 1000, zie ALG_SEQ.SRC)
INSERT INTO alg_kenmerk (alg_kenmerk_key, alg_kenmerk_niveau, alg_kenmerk_volgnr, alg_kenmerk_omschrijving, alg_kenmerk_kenmerktype, alg_kenmerk_toonbaar, alg_kenmerk_lengte)
VALUES (1, 'L', 100, 'Bouwjaar', 'C', 1, 30);
-- Eindjaar is meer een hulp-kenmerk om het (sinds 2016.2 nieuwe) kolom alg_gebouw_vervaldatum te vullen, vandaar dat dit kenmerk op hidden (volgnr -1) komt te staan...
INSERT INTO alg_kenmerk (alg_kenmerk_key, alg_kenmerk_niveau, alg_kenmerk_volgnr, alg_kenmerk_omschrijving, alg_kenmerk_kenmerktype, alg_kenmerk_toonbaar, alg_kenmerk_lengte)
VALUES (2, 'L', -1, 'Eindjaar', 'C', 1, 30);
INSERT INTO alg_kenmerk (alg_kenmerk_key, alg_kenmerk_niveau, alg_kenmerk_volgnr, alg_kenmerk_omschrijving, alg_kenmerk_kenmerktype, alg_kenmerk_toonbaar, alg_kenmerk_lengte)
VALUES (3, 'L', 120, 'Aantal percelen', 'C', 1, 30);
-- CTR discipline 'Meerjaren onderhoud'
INSERT INTO ins_tab_discipline (ins_discipline_module, ins_discipline_omschrijving) values ('CTR', 'Meerjaren Onderhoud');
INSERT INTO ctr_disc_params(ctr_ins_discipline_key, ctr_disc_params_controle_type, ctr_disc_params_ismjob)
SELECT MAX(ins_discipline_key), 2, 1 FROM ins_tab_discipline;
-- Verwijder de overige 3 standaard CTR disciplines, die staan feitelijk in de weg, voor PLATO is er 1 van belang, de 3 standaard CTR's moven...
UPDATE ins_tab_discipline
SET ins_discipline_verwijder = SYSDATE
WHERE ins_discipline_module = 'CTR'
AND ins_discipline_omschrijving <> 'Meerjaren Onderhoud'
AND ins_discipline_verwijder IS NULL;
--Autorisatiegroep _default (fac_groep_key = 1) krijgt wat standaard rechten, w.o. PROFIL
INSERT INTO fac_groeprechten (fac_groep_key, fac_functie_key,
fac_gebruiker_prs_level_read, fac_gebruiker_prs_level_write, fac_gebruiker_alg_level_read, fac_gebruiker_alg_level_write)
SELECT
1,
fac_functie_key,
-1, -1, -1, -1
FROM fac_functie
WHERE fac_functie_code = 'WEB_PROFIL';
-- Autorisatie-groepen voor 'MJOB' met alleen leesrechten
INSERT INTO fac_groep(fac_groep_omschrijving) VALUES('MJOB-R: Leesrechten');
-- Nu nog de autorisatiegroep MJOB met schrijfrechten
INSERT INTO fac_groep(fac_groep_omschrijving) VALUES('MJOB-W: Schrijfrechten');
-- Nu nog de autorisatiegroep MJOB met ADMINrechten
INSERT INTO fac_groep(fac_groep_omschrijving) VALUES('MJOB-A: Administrator');
-- 1. Eerst MJOB-R (Leesrechten): ALGUSE READ
INSERT INTO fac_groeprechten (fac_groep_key, fac_functie_key,
fac_gebruiker_prs_level_read, fac_gebruiker_prs_level_write, fac_gebruiker_alg_level_read, fac_gebruiker_alg_level_write)
SELECT
(SELECT fac_groep_key FROM fac_groep WHERE fac_groep_upper = 'MJOB-R: LEESRECHTEN'),
fac_functie_key,
-1, 9, -1, 9
FROM fac_functie
WHERE fac_functie_code = 'WEB_ALGUSE';
-- 2. Dan MJOB-W (Schrijfrechten): ook ALGUSE READ en GEEN! WRITE. Reden is de koppeling van vastgoed met Tobias-AX (bron). Wijzigingen zullen derhalve in de bron (Tobias-AX) moeten gebeuren.
INSERT INTO fac_groeprechten (fac_groep_key, fac_functie_key,
fac_gebruiker_prs_level_read, fac_gebruiker_prs_level_write, fac_gebruiker_alg_level_read, fac_gebruiker_alg_level_write)
SELECT
(SELECT fac_groep_key FROM fac_groep WHERE fac_groep_upper = 'MJOB-W: SCHRIJFRECHTEN'),
fac_functie_key,
-1, 9, -1, 9
FROM fac_functie
WHERE fac_functie_code = 'WEB_ALGUSE';
-- 3. Dan MJOB-A (Administrator): INSMGT en CTRMGT voor enkele Admin-taken
INSERT INTO fac_groeprechten (fac_groep_key, fac_functie_key,
fac_gebruiker_prs_level_read, fac_gebruiker_prs_level_write, fac_gebruiker_alg_level_read, fac_gebruiker_alg_level_write)
SELECT
(SELECT fac_groep_key FROM fac_groep WHERE fac_groep_upper = 'MJOB-A: ADMINISTRATOR'),
fac_functie_key,
-1, -1, -1, -1
FROM fac_functie
WHERE fac_functie_code IN ('WEB_INSMGT','WEB_CTRMGT');
-- TOBIAS (OUD) IMPORT (eenmalig) van elementen + recepten
INSERT INTO fac_import_app
(fac_import_app_code, fac_import_app_oms,
fac_functie_key, fac_import_app_prefix)
SELECT 'INS', 'TOBIAS - Import elementen met recepten (aanvullen)',
fac_functie_key, 'plat'
FROM fac_functie
WHERE fac_functie_code = 'WEB_PRSSYS';
-- TOBIAS (AX) IMPORT-KOPPELING (herhaaldelijk) van clusters/panden
INSERT INTO fac_import_app
(fac_import_app_code, fac_import_app_oms,
fac_functie_key, fac_import_app_prefix)
SELECT 'ONRGOED1', 'TOBIAS AX - Import/koppeling clusters',
fac_functie_key, 'plat'
FROM fac_functie
WHERE fac_functie_code = 'WEB_PRSSYS';
COMMIT;
SPOOL OFF
@plat