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

BRED#85863 M2M/Verwijderen 'mld_melding_actiecode'-setting (deprecated)

Browse Source 
svn path=/Customer/trunk/; revision=66871
This commit is contained in:
Maarten van der Heide
2024-11-04 14:52:32 +00:00
parent 4f37fa9120
commit 7653c468ea
1 changed files with 115 additions and 118 deletions
Download Patch File Download Diff File Expand all files Collapse all files

233
SINN/sinn.sql
View File

@@ -141,7 +141,7 @@ END;
-- Mail2Melding - Basis uit SVRZ overgenomen:
--- M2M : std_mld_key= 1 (Melding via mail - Nog te rubriceren)
--- M2M : std_mld_key= 1 (Melding via mail - Nog te rubriceren)
CREATE OR REPLACE PROCEDURE sinn_processemail (
pfrom IN VARCHAR2,
pto IN VARCHAR2,
@@ -156,7 +156,7 @@ AS
v_prs_werkplek_key NUMBER (10);
v_locatie_key NUMBER (10);
v_gebouw_key NUMBER (10);
v_stdmelding_key NUMBER (10);
v_stdmelding_key NUMBER (10);
v_errormsg VARCHAR2 (1000);
@@ -177,22 +177,22 @@ AS
v_voor_at VARCHAR2 (1000) := '';
v_na_at VARCHAR2 (1000) := '';
BEGIN
CASE
WHEN UPPER (pto) LIKE 'SERVICECENTRUM@%'
THEN
-- 1. HANDMATIG doorgestuurd vanuit facilitair@sinnekinderopvang.nl
-- Voorbeeld SINNE: Van: Annette Grannetia <annette.grannetia@sinnekinderopvang.nl>
-- Voorbeeld SINNE: Van: Annette Grannetia <annette.grannetia@sinnekinderopvang.nl>
-- Dus eerst op zoek naar eerste VAN-regel
v_from_string :=
v_from_string :=
SUBSTR(pbody,
REGEXP_INSTR(pbody,'Van:|From:|E-mail:',1,1),
INSTR(pbody,CHR(10),REGEXP_INSTR(pbody,'Van:|From:|E-mail:',1,1),1)-REGEXP_INSTR(pbody,'Van:|From:|E-mail:',1,1)) ;
-- Als deze bestaat dan gaan we via die kant het from-adres-bebepalen
IF v_from_string IS NOT NULL AND INSTR(v_from_string,'@')>0
IF v_from_string IS NOT NULL AND INSTR(v_from_string,'@')>0
THEN
IF INSTR(v_from_string, '<',1,1)>0
@@ -223,21 +223,21 @@ THEN
v_fw_from := v_voor_at || '@' || v_na_at;
END IF;
ELSE
-- 2. AUTOMATISCH doorgestuurde mail OF geen "Van: met email-adres" in de body. Dan dus maar terugvallen op de v_fromaddr...
SELECT fac_result_waarde
SELECT fac_result_waarde
INTO v_fac_result_fromaddr
FROM fac_result WHERE fac_result_sessionid = psessionid AND fac_result_naam = 'fromaddr' ;
FROM fac_result WHERE fac_result_sessionid = psessionid AND fac_result_naam = 'fromaddr' ;
v_fac_result_fromaddr := REPLACE(REPLACE(v_fac_result_fromaddr,'>',''),'<','') ;
v_fw_from := v_fac_result_fromaddr;
END IF;
v_fw_from := SUBSTR (v_fw_from, 1, 50);
-- Bepaal de melder/noteur op basis van e-mail adres zoals in pfrom?
v_errormsg := 'Fout bepalen melder ' || COALESCE (pfrom, '???');
SELECT COUNT (*), max(prs_perslid_key)
@@ -245,23 +245,23 @@ END IF;
FROM prs_v_aanwezigperslid
WHERE UPPER (prs_perslid_email) LIKE UPPER (v_fw_from) || '%' AND v_fw_from IS NOT NULL;
-- Als er persoon gevonden is, dan ff checken of er ook werkplekkoppelingen onder zijn aangemaakt
-- Als er persoon gevonden is, dan ff checken of er ook werkplekkoppelingen onder zijn aangemaakt
IF v_count >= 1
THEN
SELECT COUNT (*)
INTO v_count_wp
FROM prs_perslidwerkplek
WHERE prs_perslid_key = v_perslid_key;
END IF;
END IF;
-- Als er persoon gevonden is, dan ff checken of er op gekoppelde Afdeling ook een kostenplaats is gekoppeld
-- Als er persoon gevonden is, dan ff checken of er op gekoppelde Afdeling ook een kostenplaats is gekoppeld
IF v_count >= 1
THEN
SELECT MIN(a.prs_kostenplaats_key)
INTO v_kostenplaats_key
FROM prs_v_aanwezigperslid p, prs_afdeling a
WHERE prs_perslid_key = v_perslid_key AND p.prs_afdeling_key = a.prs_afdeling_key ;
END IF;
END IF;
-- Locatie erbij halen
IF v_count >= 1 AND v_count_wp > 0
@@ -273,30 +273,30 @@ END IF;
WHERE p.prs_perslid_key = v_perslid_key
AND p.prs_perslid_key = wpg.prs_perslid_key
GROUP BY p.prs_perslid_key;
IF v_prs_werkplek_key IS NOT NULL
THEN
SELECT v.alg_locatie_key, v.alg_gebouw_key
INTO v_locatie_key, v_gebouw_key
INTO v_locatie_key, v_gebouw_key
FROM prs_werkplek wp, alg_v_onroerendgoed_gegevens v
WHERE wp.prs_alg_ruimte_key = v.alg_onroerendgoed_keys
AND prs_werkplek_key = v_prs_werkplek_key;
END IF;
END IF;
-- Geen werkplek of Melder onbekend - Dan melding op locatie_key 4 (Servicecentrum Sixmastraat 3)
-- Geen werkplek of Melder onbekend - Dan melding op locatie_key 4 (Servicecentrum Sixmastraat 3)
IF (v_count >= 1 AND v_count_wp = 0) OR v_count = 0
THEN
v_locatie_key := 57; -- vullen met juiste key
v_locatie_key := 57; -- vullen met juiste key
v_gebouw_key := 67;
END IF;
-- Melder kan niet bepaald worden, dus inlezen onder 'Melder onbekend (M2M)'
-- Op deze 'Melder onbekend' is aan voorkant wel afdeling en bijbehorende kostenplaats gekoppeld. Deze kp halen we er daarom nu ook bij
IF v_count = 0
IF v_count = 0
THEN
SELECT p.prs_perslid_key, a.prs_kostenplaats_key
INTO v_perslid_key, v_kostenplaats_key
@@ -343,12 +343,9 @@ END IF;
VALUES (psessionid, 'maillog', 'Notitie onder exist-melding ' || v_melding_key);
-- Vlaggetjes zetten zoals mld_edit_note.asp dat doet!
IF fac.getsetting ('mld_melding_actiecode') = 1
THEN
UPDATE mld_melding
SET mld_melding_actiecode = 1 + 128 -- BO + Attentie
WHERE mld_melding_key = v_melding_key;
END IF;
UPDATE mld_melding
SET mld_melding_actiecode = 1 + 128 -- BO + Attentie
WHERE mld_melding_key = v_melding_key;
ELSE -- Nieuwe melding!
-- Bepaal de afgesproken soortmelding met key= 1 Melding via mail - Nog te rubriceren
@@ -419,7 +416,7 @@ END IF;
AND ((k1.mld_stdmelding_key = sm1.mld_stdmelding_key AND k1.mld_kenmerk_niveau = 'S')
OR (k1.mld_stdmelding_key = td1.ins_discipline_key AND k1.mld_kenmerk_niveau = 'D')
OR (k1.mld_stdmelding_key = td1.ins_srtdiscipline_key AND k1.mld_kenmerk_niveau = 'T')
OR (k1.mld_kenmerk_niveau = 'A')
OR (k1.mld_kenmerk_niveau = 'A')
)
AND NOT EXISTS
(SELECT 1
@@ -432,7 +429,7 @@ END IF;
AND ((k2.mld_stdmelding_key = sm2.mld_stdmelding_key AND k2.mld_kenmerk_niveau = 'S')
OR (k2.mld_stdmelding_key = td2.ins_discipline_key AND k2.mld_kenmerk_niveau = 'D')
OR (k2.mld_stdmelding_key = td2.ins_srtdiscipline_key AND k2.mld_kenmerk_niveau = 'T')
OR (k1.mld_kenmerk_niveau = 'A')
OR (k1.mld_kenmerk_niveau = 'A')
)
AND k2.mld_kenmerk_volgnummer < k1.mld_kenmerk_volgnummer);
@@ -440,7 +437,7 @@ END IF;
THEN
INSERT INTO fac_result (fac_result_sessionid, fac_result_naam, fac_result_waarde)
VALUES (psessionid, 'kenmerkpath', 'MLD\M' || TO_CHAR (TRUNC (v_melding_key / 1000), 'FM0000') || '___\M' || v_melding_key || '\' || v_folder_kkey || '\');
-- originele email wordt opgeslagen bij de melding
INSERT INTO fac_result (fac_result_sessionid,
fac_result_naam,
@@ -448,7 +445,7 @@ END IF;
VALUES (psessionid,
'kenmerkorgmailpath',
'MLD\M' || TO_CHAR (TRUNC (v_melding_key / 1000), 'FM0000') || '___\M' || v_melding_key || '\' || v_folder_kkey || '\');
END IF;
ELSE
@@ -514,7 +511,7 @@ AS
v_errormsg VARCHAR2 (400);
v_errorhint VARCHAR2 (400);
v_aantal_in_fclt NUMBER;
-- overige variabelen
v_prs_afdeling_key NUMBER(10);
c_prs_afdeling_key NUMBER(10) := 62 ; -- Fallback-afdeling 'ONBEKEND_SINN'
@@ -526,17 +523,17 @@ AS
v_alg_verdieping_volgnr NUMBER(3);
v_alg_ruimte_key NUMBER(10);
v_alg_ruimte_nr VARCHAR2(20);
CURSOR c_afd
IS
SELECT fac_imp_file_index, prs_kenmerk1, prs_afdeling_naam
SELECT fac_imp_file_index, prs_kenmerk1, prs_afdeling_naam
FROM fac_imp_perslid
WHERE fac_import_key = p_import_key ;
CURSOR c_loc
IS
SELECT fac_imp_file_index, prs_kenmerk4
SELECT fac_imp_file_index, prs_kenmerk4
FROM fac_imp_perslid
WHERE fac_import_key = p_import_key ;
@@ -548,9 +545,9 @@ IS
AND i.prs_perslid_oslogin = p.prs_perslid_oslogin
AND p.prs_perslid_verwijder IS NULL
AND p.prs_perslid_key = v.prs_perslid_key (+)
AND (v.ins_deel_key IS NULL OR v.ins_deel_key IN (select min(ins_deel_key) from sinn_v_telefoonnr_klantobject where prs_perslid_key = p.prs_perslid_key))
AND (v.ins_deel_key IS NULL OR v.ins_deel_key IN (select min(ins_deel_key) from sinn_v_telefoonnr_klantobject where prs_perslid_key = p.prs_perslid_key))
;
BEGIN
-- Het aangeleverde bestand heeft de gegevens komma gescheiden ipv ;
@@ -571,8 +568,8 @@ BEGIN
--- Afdelingsnaam uit CSV (Department) wordt op kenmerk1 gevuld (nr27) en later gebruikt om de juiste afdeling te koppelen
-- Naam is ook verplicht veld (nr8) - Ook deze niet altijd goed gevuld in CSV en dus deze ook eerst vullen met GebruikerLocatie en in kenmerk2 (nr28) wordt uit csv de Surname gezet
-- Functie is ook verplicht veld (nr21) - Omdat deze ook niet altijd gevuld is in CSV gaan we deze ook vullen met UserPrincipalName en in kenmerk3 (nr29) wordt uit csv de JobTitle gezet
-- Locatie uit CSV (PhysicalDeliveryOfficeName) wordt op kenmerk4 gevuld (nr30) en later gebruikt om juiste werkplek-koppeling te maken
-- Login (nr 22) wordt bij de import nog wel uit het bestand gehaald 3e kolom, maar later omgezet naar emailadres.
-- Locatie uit CSV (PhysicalDeliveryOfficeName) wordt op kenmerk4 gevuld (nr30) en later gebruikt om juiste werkplek-koppeling te maken
-- Login (nr 22) wordt bij de import nog wel uit het bestand gehaald 3e kolom, maar later omgezet naar emailadres.
-- UserPRincipalName wordt gevuld op Kenmerk5 - Om later records op te deleten (@friesekleintjes.nl)
prs.import_perslid (
p_import_key,
@@ -592,7 +589,7 @@ BEGIN
UPPER((SUBSTR (prs_perslid_email,
0,
INSTR (prs_perslid_email, '@') - 1)))
WHERE
WHERE
(UPPER (prs_perslid_email) LIKE '%SINNEKINDEROPVANG.NL' OR UPPER (prs_perslid_email) LIKE '%FRIESEKLEINTJES.NL')
AND prs_perslid_email IS NOT NULL
AND LENGTH((SUBSTR (prs_perslid_email,
@@ -605,7 +602,7 @@ BEGIN
-- UserPrincipalName afwijkend @sinnekinderopvang.nl
DELETE fac_imp_perslid
WHERE UPPER (prs_kenmerk3) IN ('GEDEELD POSTVAK','GENERIEK ACCOUNT', 'OC', 'RVT', 'RESOURCES') OR prs_kenmerk3 IS NULL;
DELETE fac_imp_perslid
WHERE UPPER (prs_kenmerk5) NOT LIKE '%SINNEKINDEROPVANG.NL';
@@ -613,13 +610,13 @@ BEGIN
-- Functie is niet altijd gevuld, eerst gevuld met Gebruikerslocatie, nu vullen met kenmerk3 (of 'Onbekend').
UPDATE fac_imp_perslid
SET prs_srtperslid_omschrijving =
DECODE (prs_kenmerk3, NULL, 'Onbekend', prs_kenmerk3);
DECODE (prs_kenmerk3, NULL, 'Onbekend', prs_kenmerk3);
v_errorhint := 'Naam goed vullen';
-- Naam is niet altijd gevuld, eerst gevuld met Gebruikerslocatie, nu vullen met kenmerk2 (of 'Algemeen').
UPDATE fac_imp_perslid
SET prs_perslid_naam =
DECODE (prs_kenmerk2, NULL, 'Algemeen', prs_kenmerk2);
DECODE (prs_kenmerk2, NULL, 'Algemeen', prs_kenmerk2);
v_errorhint := 'Afdeling bepalen en vullen';
-- Afdeling bepalen waar persoon onder komt te vallen
@@ -631,27 +628,27 @@ BEGIN
SELECT min(prs_afdeling_key)
INTO v_prs_afdeling_key
FROM prs_v_afdeling
FROM prs_v_afdeling
WHERE UPPER(prs_afdeling_naam) = UPPER(rec.prs_kenmerk1)
AND prs_bedrijf_key = 21 -- bedrijf SINNE
AND prs_afdeling_verwijder IS NULL ;
IF v_prs_afdeling_key IS NOT NULL THEN
UPDATE fac_imp_perslid
SET prs_afdeling_naam = (SELECT prs_afdeling_upper FROM prs_afdeling WHERE prs_afdeling_key = v_prs_afdeling_key)
SET prs_afdeling_naam = (SELECT prs_afdeling_upper FROM prs_afdeling WHERE prs_afdeling_key = v_prs_afdeling_key)
WHERE fac_imp_file_index = rec.fac_imp_file_index ;
ELSE
UPDATE fac_imp_perslid
SET prs_afdeling_naam = (SELECT prs_afdeling_upper FROM prs_afdeling WHERE prs_afdeling_key = c_prs_afdeling_key)
WHERE fac_imp_file_index = rec.fac_imp_file_index ;
END IF;
END;
END LOOP;
END LOOP;
v_errorhint := 'Locatie bepalen en vullen';
-- Default Locatie / Standplaats bepalen voor persoon
@@ -667,30 +664,30 @@ BEGIN
SELECT min(alg_locatie_key)
INTO v_alg_locatie_key
FROM alg_locatie
FROM alg_locatie
WHERE UPPER(alg_locatie_omschrijving) = UPPER(rec.prs_kenmerk4)
AND (TRUNC(alg_locatie_vervaldatum) > TRUNC(sysdate) OR alg_locatie_vervaldatum IS NULL )
AND (TRUNC(alg_locatie_vervaldatum) > TRUNC(sysdate) OR alg_locatie_vervaldatum IS NULL )
AND alg_locatie_verwijder IS NULL ;
IF v_alg_locatie_key IS NOT NULL THEN
-- Locatie_code ophalen
SELECT alg_locatie_code
INTO v_alg_locatie_code
FROM alg_locatie
FROM alg_locatie
WHERE alg_locatie_key = v_alg_locatie_key ;
-- Gebouw_key ophalen
SELECT min(alg_gebouw_key)
INTO v_alg_gebouw_key
FROM alg_gebouw
FROM alg_gebouw
WHERE alg_locatie_key = v_alg_locatie_key
AND alg_gebouw_verwijder IS NULL
AND (TRUNC(alg_gebouw_vervaldatum) > TRUNC(sysdate) OR alg_gebouw_vervaldatum IS NULL ) ;
-- Om bij update dit kenmerkveld weg te kunnen schrijven naar kenmerkveld 'default standplaats'
UPDATE fac_imp_perslid
SET prs_kenmerk6 = (SELECT UPPER(alg_locatie_code) || alg_locatie_omschrijving FROM alg_locatie WHERE alg_locatie_key = v_alg_locatie_key)
SET prs_kenmerk6 = (SELECT UPPER(alg_locatie_code) || alg_locatie_omschrijving FROM alg_locatie WHERE alg_locatie_key = v_alg_locatie_key)
WHERE fac_imp_file_index = rec.fac_imp_file_index ;
IF v_alg_gebouw_key IS NOT NULL THEN
@@ -698,33 +695,33 @@ BEGIN
-- Gebouw_code ophalen
SELECT alg_gebouw_code
INTO v_alg_gebouw_code
FROM alg_gebouw
FROM alg_gebouw
WHERE alg_gebouw_key = v_alg_gebouw_key ;
-- Verdiepings_key ophalen
SELECT min(alg_verdieping_key)
INTO v_alg_verdieping_key
FROM alg_verdieping
FROM alg_verdieping
WHERE alg_gebouw_key = v_alg_gebouw_key
AND alg_verdieping_verwijder IS NULL ;
END IF;
IF v_alg_verdieping_key IS NOT NULL THEN
-- Verdieping_volgnr ophalen
SELECT alg_verdieping_volgnr
INTO v_alg_verdieping_volgnr
FROM alg_verdieping
FROM alg_verdieping
WHERE alg_verdieping_key = v_alg_verdieping_key ;
-- Ruimte_key ophalen
-- Ruimte_key ophalen
SELECT min(alg_ruimte_key)
INTO v_alg_ruimte_key
FROM alg_ruimte
FROM alg_ruimte
WHERE alg_verdieping_key = v_alg_verdieping_key
AND alg_ruimte_verwijder IS NULL ;
END IF;
IF v_alg_ruimte_key IS NOT NULL THEN
@@ -732,17 +729,17 @@ BEGIN
-- Ruimte_nr ophalen
SELECT alg_ruimte_nr
INTO v_alg_ruimte_nr
FROM alg_ruimte
FROM alg_ruimte
WHERE alg_ruimte_key = v_alg_ruimte_key ;
-- Vullen vastgoed-keten in import-tabel
UPDATE fac_imp_perslid
SET alg_locatie_code = v_alg_locatie_code,
SET alg_locatie_code = v_alg_locatie_code,
alg_gebouw_code = v_alg_gebouw_code,
alg_verdieping_volgnr = v_alg_verdieping_volgnr,
alg_ruimte_nr = v_alg_ruimte_nr
WHERE fac_imp_file_index = rec.fac_imp_file_index ;
END IF;
ELSE
@@ -751,9 +748,9 @@ BEGIN
UPDATE fac_imp_perslid
SET prs_kenmerk6 = 'LOCATIE ONBEKEND'
WHERE fac_imp_file_index = rec.fac_imp_file_index ;
END IF;
END;
END LOOP;
@@ -762,14 +759,14 @@ BEGIN
FOR rec IN c_mob
LOOP
BEGIN
IF rec.nummer_object IS NOT NULL
THEN
UPDATE fac_imp_perslid
SET prs_perslid_mobiel = rec.nummer_object
WHERE fac_imp_file_index = rec.fac_imp_file_index ;
END IF;
IF rec.nummer_object IS NULL AND rec.prs_perslid_mobiel IS NOT NULL
@@ -778,7 +775,7 @@ BEGIN
UPDATE fac_imp_perslid
SET prs_perslid_mobiel = rec.prs_perslid_mobiel
WHERE fac_imp_file_index = rec.fac_imp_file_index ;
END IF;
IF rec.prs_perslid_telefoonnr IS NOT NULL
@@ -787,9 +784,9 @@ BEGIN
UPDATE fac_imp_perslid
SET prs_perslid_telefoonnr = rec.prs_perslid_telefoonnr
WHERE fac_imp_file_index = rec.fac_imp_file_index ;
END IF;
END;
END LOOP;
@@ -828,7 +825,7 @@ IS
FROM prs_v_aanwezigperslid p, fac_imp_perslid i
WHERE p.prs_perslid_key = i.prs_perslid_key
ORDER BY 1;
v_count NUMBER;
oracle_err_num NUMBER;
oracle_err_mes VARCHAR2 (200);
@@ -859,14 +856,14 @@ BEGIN
FOR rec IN c_del
LOOP
BEGIN
-- zie ticket SINN#74504
DELETE FROM fac_kenmwaarden WHERE prs_perslid_key = rec.prs_perslid_key ;
prs.delete_perslid (p_import_key, rec.prs_perslid_key);
END;
END LOOP;
FOR rec IN c_flex
LOOP
BEGIN
@@ -874,11 +871,11 @@ BEGIN
PRS.upsertkenmerk (1020, rec.prs_perslid_key, rec.prs_kenmerk4);
v_errorhint:='Fout bijwerken kenmerkveld1 - Department)';
PRS.upsertkenmerk (1380, rec.prs_perslid_key, rec.prs_kenmerk1);
PRS.upsertkenmerk (1380, rec.prs_perslid_key, rec.prs_kenmerk1);
END;
END LOOP;
ELSE
fac.imp_writelog (p_import_key,
'E',
@@ -920,13 +917,13 @@ AS
prs_bedrijf b
WHERE
p.prs_afdeling_key = a.prs_afdeling_key
AND a.prs_bedrijf_key = b.prs_bedrijf_key
AND a.prs_bedrijf_key = b.prs_bedrijf_key
AND b.prs_bedrijf_key = 21
AND p.prs_perslid_voornaam !='TEAM' -- Voor team-accounts
ORDER BY p.prs_perslid_naam
;
-- Bedrijf EXTERN - Voor aanduiding 'Eigenaar/Huurder van Gebouw(onderdeel)' in vastgoedketen
-- Bedrijf EXTERN - Voor aanduiding 'Eigenaar/Huurder van Gebouw(onderdeel)' in vastgoedketen
CREATE OR REPLACE VIEW SINN_V_EIGENAAR_VERHUURDER
(
PRS_AFDELING_KEY,
@@ -1009,21 +1006,21 @@ AS
v.alg_gebouw_naam,
-- Kenmerkvelden uit formulier
sinn_get_kenmerk('MLD', 155 , m.mld_melding_key)
gemeld_door,
gemeld_door,
sinn_get_kenmerk('MLD', 157 , m.mld_melding_key)
groep,
groep,
sinn_get_kenmerk('MLD', 192, m.mld_melding_key)
opvangsoort,
sinn_get_kenmerk('MLD', 146 , m.mld_melding_key)
datum_ongeval,
datum_ongeval,
sinn_get_kenmerk('MLD', 199 , m.mld_melding_key)
tijdstip_ongeval,
tijdstip_ongeval,
sinn_get_kenmerk('MLD', 161 , m.mld_melding_key)
initialen_kind,
initialen_kind,
sinn_get_kenmerk('MLD', 164 , m.mld_melding_key)
leeftijd_kind,
leeftijd_kind,
sinn_get_kenmerk('MLD', 136 , m.mld_melding_key)
betrokkene,
betrokkene,
sinn_get_kenmerk('MLD', 137 , m.mld_melding_key)
betrokkene_wie,
sinn_get_kenmerk('MLD', 194 , m.mld_melding_key)
@@ -1087,7 +1084,7 @@ AS
AND sm.mld_ins_discipline_key = md.ins_discipline_key
AND m.mld_alg_locatie_key = l.alg_locatie_key
AND l.alg_district_key = d.alg_district_key
AND m.mld_alg_onroerendgoed_keys = v.alg_onroerendgoed_keys
AND m.mld_alg_onroerendgoed_keys = v.alg_onroerendgoed_keys
AND m.mld_melding_status = st.mld_statuses_key
AND md.ins_discipline_key = 36
AND md.ins_srtdiscipline_key = sd.ins_srtdiscipline_key
@@ -1115,7 +1112,7 @@ AS
DECODE(v.prs_afdeling_key, NULL, 'nee', 'ja')
externe_ev,
ra.prs_ruimteafdeling_bezetting,
ROUND(r.alg_ruimte_bruto_vloeropp * (ra.prs_ruimteafdeling_bezetting/100), 2)
ROUND(r.alg_ruimte_bruto_vloeropp * (ra.prs_ruimteafdeling_bezetting/100), 2)
prs_ruimteafdeling_m2
FROM alg_ruimte r, prs_ruimteafdeling ra, prs_afdeling a, sinn_v_eigenaar_verhuurder v
WHERE r.alg_ruimte_key = ra.alg_ruimte_key
@@ -1167,10 +1164,10 @@ CREATE OR REPLACE VIEW SINN_V_ALG_ONROERENDGOED
M2_SLG,
M2_BSO,
M2_VSO,
M2_OVERIG,
M2_OVERIG,
-- Externe partijen
EXTERNE_EV_R, -- welke externe eigenaren/verhuurders zitten op deze ruimte - via afdeling-koppeling - m2 bezetting
EXTERNE_EV_R_PERC, -- idem - % bezetting
EXTERNE_EV_R_PERC, -- idem - % bezetting
EXTERNE_EV_M2 -- en hoeveel M2 hebben zij
)
AS
@@ -1196,7 +1193,7 @@ AS
kmg.vso_lrk,
v.alg_verdieping_omschrijving || ' - ' || v.alg_verdieping_code
verdieping,
v.alg_ruimte_key,
v.alg_ruimte_key,
v.alg_ruimte_nr,
v.alg_ruimte_omschrijving,
sr.alg_srtruimte_omschrijving,
@@ -1216,10 +1213,10 @@ AS
m2_bso,
CASE WHEN kmr.vso_r = 1 THEN r.alg_ruimte_bruto_vloeropp/kmr.aantal_opvangsoorten_r ELSE 0 END
m2_vso,
CASE WHEN kmr.aantal_opvangsoorten_r = 0 THEN r.alg_ruimte_bruto_vloeropp ELSE 0 END
m2_overig,
CASE WHEN kmr.aantal_opvangsoorten_r = 0 THEN r.alg_ruimte_bruto_vloeropp ELSE 0 END
m2_overig,
-- M2 externe partijen
ra.externe_ev_r,
ra.externe_ev_r,
ra.externe_ev_r_perc,
ra.externe_ev_m2
FROM alg_v_onroerendgoed_gegevens v,
@@ -1230,11 +1227,11 @@ AS
flx.getdomeinwaarde(41, flx.getflex('ALG',1103, g.alg_gebouw_key, 'G')) eigenaar_verhuurder_1,
flx.getdomeinwaarde(41, flx.getflex('ALG',1104, g.alg_gebouw_key, 'G')) eigenaar_verhuurder_2,
flx.getdomeinwaarde(41, flx.getflex('ALG',1105, g.alg_gebouw_key, 'G')) eigenaar_verhuurder_3,
flx.getflex('ALG',1012, g.alg_gebouw_key, 'G') eigenaarschap_toelichting,
flx.getflex('ALG',1012, g.alg_gebouw_key, 'G') eigenaarschap_toelichting,
flx.getflex('ALG',1040, g.alg_gebouw_key, 'G') DOV,
flx.getflex('ALG',1041, g.alg_gebouw_key, 'G') SLG,
flx.getflex('ALG',1042, g.alg_gebouw_key, 'G') BSO,
flx.getflex('ALG',1360, g.alg_gebouw_key, 'G') VSO,
flx.getflex('ALG',1360, g.alg_gebouw_key, 'G') VSO,
flx.getflex('ALG',1035, g.alg_gebouw_key, 'G') DOV_LRK,
flx.getflex('ALG',1120, g.alg_gebouw_key, 'G') SLG_LRK,
flx.getflex('ALG',1121, g.alg_gebouw_key, 'G') BSO_LRK,
@@ -1247,10 +1244,10 @@ AS
flx.getflex('ALG',1342, r.alg_ruimte_key, 'R') SLG_R,
flx.getflex('ALG',1343, r.alg_ruimte_key, 'R') BSO_R,
flx.getflex('ALG',1380, r.alg_ruimte_key, 'R') VSO_R,
COALESCE(fac.safe_to_number(flx.getflex('ALG',1341, r.alg_ruimte_key, 'R')), 0)
+ COALESCE(fac.safe_to_number(flx.getflex('ALG',1342, r.alg_ruimte_key, 'R')), 0)
+ COALESCE(fac.safe_to_number(flx.getflex('ALG',1343, r.alg_ruimte_key, 'R')), 0)
+ COALESCE(fac.safe_to_number(flx.getflex('ALG',1380, r.alg_ruimte_key, 'R')), 0)
COALESCE(fac.safe_to_number(flx.getflex('ALG',1341, r.alg_ruimte_key, 'R')), 0)
+ COALESCE(fac.safe_to_number(flx.getflex('ALG',1342, r.alg_ruimte_key, 'R')), 0)
+ COALESCE(fac.safe_to_number(flx.getflex('ALG',1343, r.alg_ruimte_key, 'R')), 0)
+ COALESCE(fac.safe_to_number(flx.getflex('ALG',1380, r.alg_ruimte_key, 'R')), 0)
aantal_opvangsoorten_r
FROM alg_ruimte r ) kmr, -- kenmerken ruimte
alg_srtruimte sr,
@@ -1269,7 +1266,7 @@ AS
AND v.alg_gebouw_key = kmg.alg_gebouw_key
AND v.alg_ruimte_key = r.alg_ruimte_key AND r.alg_ruimte_verwijder IS NULL
AND r.alg_ruimte_key = kmr.alg_ruimte_key (+)
AND r.alg_srtruimte_key = sr.alg_srtruimte_key (+)
AND r.alg_srtruimte_key = sr.alg_srtruimte_key (+)
AND r.alg_ruimte_key = ra.alg_ruimte_key (+)
ORDER BY d.alg_district_omschrijving, l.alg_locatie_code, v.alg_gebouw_code, v.alg_verdieping_code, v.alg_ruimte_nr ;
@@ -1283,11 +1280,11 @@ AS
FROM sinn_v_alg_onroerendgoed v1,
sinn_v_alg_onroerendgoed_org v2
WHERE v1.alg_ruimte_key = v2.alg_ruimte_key (+) ;
-- RIE - INSPECTIES ---
-- 1. Basislijst uitgevoerde inspecties
-- 2. De ingevoerde vragenlijst - Gestylde versie voor GGD
-- 2. De ingevoerde vragenlijst - Gestylde versie voor GGD
CREATE OR REPLACE VIEW SINN_V_RIE_UITGEVOERD
(