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

BLCC#76362 17. Mailinglijst

Browse Source 
svn path=/Customer/trunk/; revision=61179
This commit is contained in:
Suzan Wiegerinck
2023-07-13 12:44:12 +00:00
parent b32f18367e
commit 0fbe03fbf5
1 changed files with 596 additions and 299 deletions
Download Patch File Download Diff File Expand all files Collapse all files

895
BLCC/blcc.sql
View File

@@ -28521,310 +28521,607 @@ AS
CREATE OR REPLACE VIEW BLCC_V_RAP_MAILING_CONTACT
(
UITSLUITEN,
GEBOUW,
ROL,
MAILADRESSEN
)
AS
SELECT alg_gebouw_code,
'Huisbaas' rol,
LISTAGG (LOWER (prs_perslid_email), ';')
WITHIN GROUP (ORDER BY alg_gebouw_code) mailing_ad
FROM (SELECT DISTINCT g.alg_gebouw_code, p.prs_perslid_email
FROM alg_kenmerk k,
alg_onrgoedkenmerk rk,
alg_ruimte r,
alg_verdieping v,
alg_gebouw g,
prs_perslid p
WHERE k.alg_kenmerk_niveau = 'R'
AND k.alg_kenmerk_key = 1981 --- huisbaas
AND rk.alg_kenmerk_key = k.alg_kenmerk_key
AND k.alg_kenmerk_verwijder IS NULL
AND rk.alg_onrgoedkenmerk_verwijder IS NULL
AND rk.alg_onrgoedkenmerk_waarde IS NOT NULL
AND r.alg_ruimte_key = rk.alg_onrgoed_key
AND v.alg_verdieping_key = r.alg_verdieping_key
AND g.alg_gebouw_key = v.alg_gebouw_key
AND fac.safe_to_number (rk.alg_onrgoedkenmerk_waarde) =
p.prs_perslid_key)
GROUP BY alg_gebouw_code, 'Huisbaas'
UNION ALL
SELECT alg_gebouw_code,
'Plaatsvervangend huisbaas' rol,
LISTAGG (LOWER (prs_perslid_email), ';')
WITHIN GROUP (ORDER BY alg_gebouw_code) mailing_ad
FROM (SELECT DISTINCT g.alg_gebouw_code, p.prs_perslid_email
FROM alg_kenmerk k,
alg_onrgoedkenmerk rk,
alg_ruimte r,
alg_verdieping v,
alg_gebouw g,
prs_perslid p
WHERE k.alg_kenmerk_niveau = 'R'
AND k.alg_kenmerk_key = 1982 --- plaatsvervangend huisbaas
AND rk.alg_kenmerk_key = k.alg_kenmerk_key
AND k.alg_kenmerk_verwijder IS NULL
AND rk.alg_onrgoedkenmerk_verwijder IS NULL
AND rk.alg_onrgoedkenmerk_waarde IS NOT NULL
AND r.alg_ruimte_key = rk.alg_onrgoed_key
AND v.alg_verdieping_key = r.alg_verdieping_key
AND g.alg_gebouw_key = v.alg_gebouw_key
AND fac.safe_to_number (rk.alg_onrgoedkenmerk_waarde) =
p.prs_perslid_key)
GROUP BY alg_gebouw_code, 'Plaatsvervangend huisbaas'
UNION ALL
SELECT alg_gebouw_code,
'SHE contactpersoon' rol,
LISTAGG (LOWER (prs_perslid_email), ';')
WITHIN GROUP (ORDER BY alg_gebouw_code) mailing_ad
FROM (SELECT DISTINCT g.alg_gebouw_code, p.prs_perslid_email
FROM alg_kenmerk k,
alg_onrgoedkenmerk rk,
alg_ruimte r,
alg_verdieping v,
alg_gebouw g,
prs_perslid p
WHERE k.alg_kenmerk_niveau = 'R'
AND k.alg_kenmerk_key = 1983 --- SHE contactpersoon
AND rk.alg_kenmerk_key = k.alg_kenmerk_key
AND k.alg_kenmerk_verwijder IS NULL
AND rk.alg_onrgoedkenmerk_verwijder IS NULL
AND rk.alg_onrgoedkenmerk_waarde IS NOT NULL
AND r.alg_ruimte_key = rk.alg_onrgoed_key
AND v.alg_verdieping_key = r.alg_verdieping_key
AND g.alg_gebouw_key = v.alg_gebouw_key
AND fac.safe_to_number (rk.alg_onrgoedkenmerk_waarde) =
p.prs_perslid_key)
GROUP BY alg_gebouw_code, 'SHE contactpersoon'
UNION ALL
SELECT alg_gebouw_code,
'DCO' rol,
LISTAGG (LOWER (prs_perslid_email), ';')
WITHIN GROUP (ORDER BY alg_gebouw_code) mailing_ad
FROM (SELECT DISTINCT g.alg_gebouw_code, p.prs_perslid_email
FROM alg_kenmerk k,
alg_onrgoedkenmerk rk,
alg_ruimte r,
alg_verdieping v,
alg_gebouw g,
prs_perslid p
WHERE k.alg_kenmerk_niveau = 'R'
AND k.alg_kenmerk_key = 1984 --- Naam DCO
AND rk.alg_kenmerk_key = k.alg_kenmerk_key
AND k.alg_kenmerk_verwijder IS NULL
AND rk.alg_onrgoedkenmerk_verwijder IS NULL
AND rk.alg_onrgoedkenmerk_waarde IS NOT NULL
AND r.alg_ruimte_key = rk.alg_onrgoed_key
AND v.alg_verdieping_key = r.alg_verdieping_key
AND g.alg_gebouw_key = v.alg_gebouw_key
AND fac.safe_to_number (rk.alg_onrgoedkenmerk_waarde) =
p.prs_perslid_key)
GROUP BY alg_gebouw_code, 'DCO'
UNION ALL
SELECT alg_gebouw_code,
'Plaatsvervangend DCO' rol,
LISTAGG (LOWER (prs_perslid_email), ';')
WITHIN GROUP (ORDER BY alg_gebouw_code) mailing_ad
FROM (SELECT DISTINCT g.alg_gebouw_code, p.prs_perslid_email
FROM alg_kenmerk k,
alg_onrgoedkenmerk rk,
alg_ruimte r,
alg_verdieping v,
alg_gebouw g,
prs_perslid p
WHERE k.alg_kenmerk_niveau = 'R'
AND k.alg_kenmerk_key = 1985 --- Plaatsvervangend DCO
AND rk.alg_kenmerk_key = k.alg_kenmerk_key
AND k.alg_kenmerk_verwijder IS NULL
AND rk.alg_onrgoedkenmerk_verwijder IS NULL
AND rk.alg_onrgoedkenmerk_waarde IS NOT NULL
AND r.alg_ruimte_key = rk.alg_onrgoed_key
AND v.alg_verdieping_key = r.alg_verdieping_key
AND g.alg_gebouw_key = v.alg_gebouw_key
AND fac.safe_to_number (rk.alg_onrgoedkenmerk_waarde) =
p.prs_perslid_key)
GROUP BY alg_gebouw_code, 'Plaatsvervangend DCO'
UNION ALL
SELECT alg_gebouw_code,
'Operations contact' rol,
LISTAGG (LOWER (prs_perslid_email), ';')
WITHIN GROUP (ORDER BY alg_gebouw_code) mailing_ad
FROM (SELECT DISTINCT g.alg_gebouw_code, p.prs_perslid_email
FROM alg_kenmerk k,
alg_onrgoedkenmerk rk,
alg_ruimte r,
alg_verdieping v,
alg_gebouw g,
prs_perslid p
WHERE k.alg_kenmerk_niveau = 'R'
AND k.alg_kenmerk_key = 2040 --- Operations contact
AND rk.alg_kenmerk_key = k.alg_kenmerk_key
AND k.alg_kenmerk_verwijder IS NULL
AND rk.alg_onrgoedkenmerk_verwijder IS NULL
AND rk.alg_onrgoedkenmerk_waarde IS NOT NULL
AND r.alg_ruimte_key = rk.alg_onrgoed_key
AND v.alg_verdieping_key = r.alg_verdieping_key
AND g.alg_gebouw_key = v.alg_gebouw_key
AND fac.safe_to_number (rk.alg_onrgoedkenmerk_waarde) =
p.prs_perslid_key)
GROUP BY alg_gebouw_code, 'Operations contact'
UNION ALL
SELECT alg_gebouw_code,
'Plaatsvervangend operations contact' rol,
LISTAGG (LOWER (prs_perslid_email), ';')
WITHIN GROUP (ORDER BY alg_gebouw_code) mailing_ad
FROM (SELECT DISTINCT g.alg_gebouw_code, p.prs_perslid_email
FROM alg_kenmerk k,
alg_onrgoedkenmerk rk,
alg_ruimte r,
alg_verdieping v,
alg_gebouw g,
prs_perslid p
WHERE k.alg_kenmerk_niveau = 'R'
AND k.alg_kenmerk_key = 2060 --- Plaatsvervangend operations contact
AND rk.alg_kenmerk_key = k.alg_kenmerk_key
AND k.alg_kenmerk_verwijder IS NULL
AND rk.alg_onrgoedkenmerk_verwijder IS NULL
AND rk.alg_onrgoedkenmerk_waarde IS NOT NULL
AND r.alg_ruimte_key = rk.alg_onrgoed_key
AND v.alg_verdieping_key = r.alg_verdieping_key
AND g.alg_gebouw_key = v.alg_gebouw_key
AND fac.safe_to_number (rk.alg_onrgoedkenmerk_waarde) =
p.prs_perslid_key)
GROUP BY alg_gebouw_code, 'Plaatsvervangend operations contact'
UNION ALL
SELECT DISTINCT
g.alg_gebouw_code,
'Financial contact',
fc.financial_contact mailing_ad
FROM cnt_contract_plaats cr,
cnt_contract c,
alg_ruimte r,
alg_verdieping v,
alg_gebouw g,
prs_bedrijf b,
(SELECT b.prs_bedrijf_key, fc.financial_cont_email financial_contact
FROM prs_bedrijf b,
(SELECT p.prs_perslid_key financial_cont_key,
p.prs_perslid_email financial_cont_email,
deb_nr.debiteurnummer
FROM prs_perslid p,
prs_afdeling a,
(SELECT kl.prs_kenmerklink_waarde debiteurnummer,
kl.prs_link_key prs_afdeling_key
FROM prs_kenmerk k, prs_kenmerklink kl
WHERE k.prs_kenmerk_niveau = 'A'
AND k.prs_kenmerk_key = 1001
AND kl.prs_kenmerklink_verwijder IS NULL
AND kl.prs_kenmerk_key = k.prs_kenmerk_key)
deb_nr
WHERE p.prs_srtperslid_key = 76841 ---- financial contact
AND p.prs_afdeling_key = a.prs_afdeling_key
AND p.prs_perslid_verwijder IS NULL
AND deb_nr.prs_afdeling_key = a.prs_afdeling_key) fc
WHERE fc.debiteurnummer = b.prs_overeenkomst_nr
AND fc.financial_cont_key IS NOT NULL) fc
WHERE cr.cnt_alg_plaats_code = 'R'
AND cr.cnt_contract_plaats_verwijder IS NULL
AND c.cnt_contract_key = cr.cnt_contract_key
AND c.cnt_contract_verwijder IS NULL
AND c.cnt_contract_status = 0
AND cr.cnt_alg_plaats_key = r.alg_ruimte_key
AND r.alg_verdieping_key = v.alg_verdieping_key
AND g.alg_gebouw_key = v.alg_gebouw_key
AND c.cnt_prs_bedrijf_key = b.prs_bedrijf_key
AND fc.prs_bedrijf_key = b.prs_bedrijf_key
AND c.ins_discipline_key IN (2122,
2121,
2123,
224)
AND SYSDATE BETWEEN TRUNC (c.cnt_contract_looptijd_van)
AND TRUNC (c.cnt_contract_looptijd_tot + 1)
UNION ALL
SELECT DISTINCT
g.alg_gebouw_code,
'Secretariaat',
secr.secretariaat mailing_ad
FROM cnt_contract_plaats cr,
cnt_contract c,
alg_ruimte r,
alg_verdieping v,
alg_gebouw g,
prs_bedrijf b,
( SELECT b.prs_bedrijf_key,
secr.secretariaat_email
secretariaat
FROM prs_bedrijf b,
(SELECT p.prs_perslid_key
secretariaat_key,
p.prs_perslid_email
secretariaat_email,
p.prs_perslid_mobiel
secretariaat_mobiel,
prs_perslid_naam
|| DECODE (
p.prs_perslid_voorletters,
NULL, '',
', ' || p.prs_perslid_voorletters)
|| DECODE (
p.prs_perslid_tussenvoegsel,
NULL, '',
' ' || p.prs_perslid_tussenvoegsel)
|| DECODE (
p.prs_perslid_voornaam,
NULL, '',
' ('
|| p.prs_perslid_voornaam
|| ')')
secretariaat_naam_full,
DECODE (p.prs_perslid_voornaam,
NULL, '',
p.prs_perslid_voornaam || ' ')
|| DECODE (
p.prs_perslid_tussenvoegsel,
NULL, '',
p.prs_perslid_tussenvoegsel || ' ')
|| prs_perslid_naam
secretariaat_naam_friendly,
h.debiteurnummer
FROM prs_perslid p,
prs_afdeling a,
(SELECT kl.prs_kenmerklink_waarde
debiteurnummer,
kl.prs_link_key
prs_afdeling_key
FROM prs_kenmerk k, prs_kenmerklink kl
WHERE k.prs_kenmerk_niveau = 'A'
AND kl.prs_kenmerklink_verwijder
IS NULL
AND k.prs_kenmerk_key = 1001
AND kl.prs_kenmerk_key =
k.prs_kenmerk_key) h
WHERE p.prs_srtperslid_key = 76861 ---- secretariaat
AND p.prs_afdeling_key =
a.prs_afdeling_key
AND h.prs_afdeling_key =
a.prs_afdeling_key
AND p.prs_perslid_verwijder IS NULL) secr
WHERE secr.debiteurnummer(+) = b.prs_overeenkomst_nr
AND secr.secretariaat_key IS NOT NULL) secr
WHERE cr.cnt_alg_plaats_code = 'R'
AND cr.cnt_contract_plaats_verwijder IS NULL
AND c.cnt_contract_key = cr.cnt_contract_key
AND c.cnt_contract_verwijder IS NULL
AND c.cnt_contract_status = 0
AND cr.cnt_alg_plaats_key = r.alg_ruimte_key
AND r.alg_verdieping_key = v.alg_verdieping_key
AND g.alg_gebouw_key = v.alg_gebouw_key
AND c.cnt_prs_bedrijf_key = b.prs_bedrijf_key
AND secr.prs_bedrijf_key = b.prs_bedrijf_key
AND c.ins_discipline_key IN (2122,
2121,
2123,
224)
AND SYSDATE BETWEEN TRUNC (c.cnt_contract_looptijd_van)
AND TRUNC (c.cnt_contract_looptijd_tot + 1);
/* Formatted on 13-7-2023 14:40:15 (QP5 v5.336) */
SELECT 'Nee' uitsluiten,
alg_gebouw_code,
'Huisbaas' rol,
LISTAGG (LOWER (prs_perslid_email), ';')
WITHIN GROUP (ORDER BY alg_gebouw_code) mailing_ad
FROM (SELECT DISTINCT g.alg_gebouw_code, p.prs_perslid_email
FROM alg_kenmerk k,
alg_onrgoedkenmerk rk,
alg_ruimte r,
alg_verdieping v,
alg_gebouw g,
prs_perslid p
WHERE k.alg_kenmerk_niveau = 'R'
AND k.alg_kenmerk_key = 1981 --- huisbaas
AND rk.alg_kenmerk_key = k.alg_kenmerk_key
AND k.alg_kenmerk_verwijder IS NULL
AND rk.alg_onrgoedkenmerk_verwijder IS NULL
AND rk.alg_onrgoedkenmerk_waarde IS NOT NULL
AND r.alg_ruimte_key = rk.alg_onrgoed_key
AND v.alg_verdieping_key = r.alg_verdieping_key
AND g.alg_gebouw_key = v.alg_gebouw_key
AND fac.safe_to_number (rk.alg_onrgoedkenmerk_waarde) =
p.prs_perslid_key)
GROUP BY alg_gebouw_code, 'Huisbaas'
UNION ALL
SELECT 'Nee' uitsluiten,
alg_gebouw_code,
'Plaatsvervangend huisbaas' rol,
LISTAGG (LOWER (prs_perslid_email), ';')
WITHIN GROUP (ORDER BY alg_gebouw_code) mailing_ad
FROM (SELECT DISTINCT g.alg_gebouw_code, p.prs_perslid_email
FROM alg_kenmerk k,
alg_onrgoedkenmerk rk,
alg_ruimte r,
alg_verdieping v,
alg_gebouw g,
prs_perslid p
WHERE k.alg_kenmerk_niveau = 'R'
AND k.alg_kenmerk_key = 1982 --- plaatsvervangend huisbaas
AND rk.alg_kenmerk_key = k.alg_kenmerk_key
AND k.alg_kenmerk_verwijder IS NULL
AND rk.alg_onrgoedkenmerk_verwijder IS NULL
AND rk.alg_onrgoedkenmerk_waarde IS NOT NULL
AND r.alg_ruimte_key = rk.alg_onrgoed_key
AND v.alg_verdieping_key = r.alg_verdieping_key
AND g.alg_gebouw_key = v.alg_gebouw_key
AND fac.safe_to_number (rk.alg_onrgoedkenmerk_waarde) =
p.prs_perslid_key)
GROUP BY alg_gebouw_code, 'Plaatsvervangend huisbaas'
UNION ALL
SELECT 'Nee' uitsluiten,
alg_gebouw_code,
'SHE contactpersoon' rol,
LISTAGG (LOWER (prs_perslid_email), ';')
WITHIN GROUP (ORDER BY alg_gebouw_code) mailing_ad
FROM (SELECT DISTINCT g.alg_gebouw_code, p.prs_perslid_email
FROM alg_kenmerk k,
alg_onrgoedkenmerk rk,
alg_ruimte r,
alg_verdieping v,
alg_gebouw g,
prs_perslid p
WHERE k.alg_kenmerk_niveau = 'R'
AND k.alg_kenmerk_key = 1983 --- SHE contactpersoon
AND rk.alg_kenmerk_key = k.alg_kenmerk_key
AND k.alg_kenmerk_verwijder IS NULL
AND rk.alg_onrgoedkenmerk_verwijder IS NULL
AND rk.alg_onrgoedkenmerk_waarde IS NOT NULL
AND r.alg_ruimte_key = rk.alg_onrgoed_key
AND v.alg_verdieping_key = r.alg_verdieping_key
AND g.alg_gebouw_key = v.alg_gebouw_key
AND fac.safe_to_number (rk.alg_onrgoedkenmerk_waarde) =
p.prs_perslid_key)
GROUP BY alg_gebouw_code, 'SHE contactpersoon'
UNION ALL
SELECT 'Nee' uitsluiten,
alg_gebouw_code,
'DCO' rol,
LISTAGG (LOWER (prs_perslid_email), ';')
WITHIN GROUP (ORDER BY alg_gebouw_code) mailing_ad
FROM (SELECT DISTINCT g.alg_gebouw_code, p.prs_perslid_email
FROM alg_kenmerk k,
alg_onrgoedkenmerk rk,
alg_ruimte r,
alg_verdieping v,
alg_gebouw g,
prs_perslid p
WHERE k.alg_kenmerk_niveau = 'R'
AND k.alg_kenmerk_key = 1984 --- Naam DCO
AND rk.alg_kenmerk_key = k.alg_kenmerk_key
AND k.alg_kenmerk_verwijder IS NULL
AND rk.alg_onrgoedkenmerk_verwijder IS NULL
AND rk.alg_onrgoedkenmerk_waarde IS NOT NULL
AND r.alg_ruimte_key = rk.alg_onrgoed_key
AND v.alg_verdieping_key = r.alg_verdieping_key
AND g.alg_gebouw_key = v.alg_gebouw_key
AND fac.safe_to_number (rk.alg_onrgoedkenmerk_waarde) =
p.prs_perslid_key)
GROUP BY alg_gebouw_code, 'DCO'
UNION ALL
SELECT 'Nee' uitsluiten,
alg_gebouw_code,
'Plaatsvervangend DCO' rol,
LISTAGG (LOWER (prs_perslid_email), ';')
WITHIN GROUP (ORDER BY alg_gebouw_code) mailing_ad
FROM (SELECT DISTINCT g.alg_gebouw_code, p.prs_perslid_email
FROM alg_kenmerk k,
alg_onrgoedkenmerk rk,
alg_ruimte r,
alg_verdieping v,
alg_gebouw g,
prs_perslid p
WHERE k.alg_kenmerk_niveau = 'R'
AND k.alg_kenmerk_key = 1985 --- Plaatsvervangend DCO
AND rk.alg_kenmerk_key = k.alg_kenmerk_key
AND k.alg_kenmerk_verwijder IS NULL
AND rk.alg_onrgoedkenmerk_verwijder IS NULL
AND rk.alg_onrgoedkenmerk_waarde IS NOT NULL
AND r.alg_ruimte_key = rk.alg_onrgoed_key
AND v.alg_verdieping_key = r.alg_verdieping_key
AND g.alg_gebouw_key = v.alg_gebouw_key
AND fac.safe_to_number (rk.alg_onrgoedkenmerk_waarde) =
p.prs_perslid_key)
GROUP BY alg_gebouw_code, 'Plaatsvervangend DCO'
UNION ALL
SELECT 'Nee' uitsluiten,
alg_gebouw_code,
'Operations contact' rol,
LISTAGG (LOWER (prs_perslid_email), ';')
WITHIN GROUP (ORDER BY alg_gebouw_code) mailing_ad
FROM (SELECT DISTINCT g.alg_gebouw_code, p.prs_perslid_email
FROM alg_kenmerk k,
alg_onrgoedkenmerk rk,
alg_ruimte r,
alg_verdieping v,
alg_gebouw g,
prs_perslid p
WHERE k.alg_kenmerk_niveau = 'R'
AND k.alg_kenmerk_key = 2040 --- Operations contact
AND rk.alg_kenmerk_key = k.alg_kenmerk_key
AND k.alg_kenmerk_verwijder IS NULL
AND rk.alg_onrgoedkenmerk_verwijder IS NULL
AND rk.alg_onrgoedkenmerk_waarde IS NOT NULL
AND r.alg_ruimte_key = rk.alg_onrgoed_key
AND v.alg_verdieping_key = r.alg_verdieping_key
AND g.alg_gebouw_key = v.alg_gebouw_key
AND fac.safe_to_number (rk.alg_onrgoedkenmerk_waarde) =
p.prs_perslid_key)
GROUP BY alg_gebouw_code, 'Operations contact'
UNION ALL
SELECT 'Nee' uitsluiten,
alg_gebouw_code,
'Plaatsvervangend operations contact' rol,
LISTAGG (LOWER (prs_perslid_email), ';')
WITHIN GROUP (ORDER BY alg_gebouw_code) mailing_ad
FROM (SELECT DISTINCT g.alg_gebouw_code, p.prs_perslid_email
FROM alg_kenmerk k,
alg_onrgoedkenmerk rk,
alg_ruimte r,
alg_verdieping v,
alg_gebouw g,
prs_perslid p
WHERE k.alg_kenmerk_niveau = 'R'
AND k.alg_kenmerk_key = 2060 --- Plaatsvervangend operations contact
AND rk.alg_kenmerk_key = k.alg_kenmerk_key
AND k.alg_kenmerk_verwijder IS NULL
AND rk.alg_onrgoedkenmerk_verwijder IS NULL
AND rk.alg_onrgoedkenmerk_waarde IS NOT NULL
AND r.alg_ruimte_key = rk.alg_onrgoed_key
AND v.alg_verdieping_key = r.alg_verdieping_key
AND g.alg_gebouw_key = v.alg_gebouw_key
AND fac.safe_to_number (rk.alg_onrgoedkenmerk_waarde) =
p.prs_perslid_key)
GROUP BY alg_gebouw_code, 'Plaatsvervangend operations contact'
UNION ALL
SELECT DISTINCT 'Nee' uitsluiten,
g.alg_gebouw_code,
'Financial contact',
fc.financial_contact mailing_ad
FROM cnt_contract_plaats cr,
cnt_contract c,
alg_ruimte r,
alg_verdieping v,
alg_gebouw g,
prs_bedrijf b,
(SELECT b.prs_bedrijf_key, fc.financial_cont_email financial_contact
FROM prs_bedrijf b,
(SELECT p.prs_perslid_key financial_cont_key,
p.prs_perslid_email financial_cont_email,
deb_nr.debiteurnummer
FROM prs_perslid p,
prs_afdeling a,
(SELECT kl.prs_kenmerklink_waarde debiteurnummer,
kl.prs_link_key prs_afdeling_key
FROM prs_kenmerk k, prs_kenmerklink kl
WHERE k.prs_kenmerk_niveau = 'A'
AND k.prs_kenmerk_key = 1001
AND kl.prs_kenmerklink_verwijder IS NULL
AND kl.prs_kenmerk_key = k.prs_kenmerk_key)
deb_nr
WHERE p.prs_srtperslid_key = 76841 ---- financial contact
AND p.prs_afdeling_key = a.prs_afdeling_key
AND p.prs_perslid_verwijder IS NULL
AND deb_nr.prs_afdeling_key = a.prs_afdeling_key) fc
WHERE fc.debiteurnummer = b.prs_overeenkomst_nr
AND fc.financial_cont_key IS NOT NULL) fc
WHERE cr.cnt_alg_plaats_code = 'R'
AND cr.cnt_contract_plaats_verwijder IS NULL
AND c.cnt_contract_key = cr.cnt_contract_key
AND c.cnt_contract_verwijder IS NULL
AND c.cnt_contract_status = 0
AND cr.cnt_alg_plaats_key = r.alg_ruimte_key
AND r.alg_verdieping_key = v.alg_verdieping_key
AND g.alg_gebouw_key = v.alg_gebouw_key
AND c.cnt_prs_bedrijf_key = b.prs_bedrijf_key
AND fc.prs_bedrijf_key = b.prs_bedrijf_key
AND c.ins_discipline_key IN (2122,
2121,
2123,
224)
AND SYSDATE BETWEEN TRUNC (c.cnt_contract_looptijd_van)
AND TRUNC (c.cnt_contract_looptijd_tot + 1)
UNION ALL
SELECT DISTINCT 'Nee' uitsluiten,
g.alg_gebouw_code,
'Secretariaat',
secr.secretariaat mailing_ad
FROM cnt_contract_plaats cr,
cnt_contract c,
alg_ruimte r,
alg_verdieping v,
alg_gebouw g,
prs_bedrijf b,
(SELECT b.prs_bedrijf_key, secr.secretariaat_email secretariaat
FROM prs_bedrijf b,
(SELECT p.prs_perslid_key
secretariaat_key,
p.prs_perslid_email
secretariaat_email,
p.prs_perslid_mobiel
secretariaat_mobiel,
prs_perslid_naam
|| DECODE (p.prs_perslid_voorletters,
NULL, '',
', ' || p.prs_perslid_voorletters)
|| DECODE (p.prs_perslid_tussenvoegsel,
NULL, '',
' ' || p.prs_perslid_tussenvoegsel)
|| DECODE (p.prs_perslid_voornaam,
NULL, '',
' (' || p.prs_perslid_voornaam || ')')
secretariaat_naam_full,
DECODE (p.prs_perslid_voornaam,
NULL, '',
p.prs_perslid_voornaam || ' ')
|| DECODE (p.prs_perslid_tussenvoegsel,
NULL, '',
p.prs_perslid_tussenvoegsel || ' ')
|| prs_perslid_naam
secretariaat_naam_friendly,
h.debiteurnummer
FROM prs_perslid p,
prs_afdeling a,
(SELECT kl.prs_kenmerklink_waarde debiteurnummer,
kl.prs_link_key prs_afdeling_key
FROM prs_kenmerk k, prs_kenmerklink kl
WHERE k.prs_kenmerk_niveau = 'A'
AND kl.prs_kenmerklink_verwijder IS NULL
AND k.prs_kenmerk_key = 1001
AND kl.prs_kenmerk_key = k.prs_kenmerk_key) h
WHERE p.prs_srtperslid_key = 76861 ---- secretariaat
AND p.prs_afdeling_key = a.prs_afdeling_key
AND h.prs_afdeling_key = a.prs_afdeling_key
AND p.prs_perslid_verwijder IS NULL) secr
WHERE secr.debiteurnummer(+) = b.prs_overeenkomst_nr
AND secr.secretariaat_key IS NOT NULL) secr
WHERE cr.cnt_alg_plaats_code = 'R'
AND cr.cnt_contract_plaats_verwijder IS NULL
AND c.cnt_contract_key = cr.cnt_contract_key
AND c.cnt_contract_verwijder IS NULL
AND c.cnt_contract_status = 0
AND cr.cnt_alg_plaats_key = r.alg_ruimte_key
AND r.alg_verdieping_key = v.alg_verdieping_key
AND g.alg_gebouw_key = v.alg_gebouw_key
AND c.cnt_prs_bedrijf_key = b.prs_bedrijf_key
AND secr.prs_bedrijf_key = b.prs_bedrijf_key
AND c.ins_discipline_key IN (2122,
2121,
2123,
224)
AND SYSDATE BETWEEN TRUNC (c.cnt_contract_looptijd_van)
AND TRUNC (c.cnt_contract_looptijd_tot + 1)
UNION ALL
SELECT 'Ja' uitsluiten,
alg_gebouw_code,
'Huisbaas' rol,
LISTAGG (LOWER (prs_perslid_email), ';')
WITHIN GROUP (ORDER BY alg_gebouw_code) mailing_ad
FROM (SELECT DISTINCT g.alg_gebouw_code, p.prs_perslid_email
FROM alg_kenmerk k,
alg_onrgoedkenmerk rk,
alg_ruimte r,
alg_verdieping v,
alg_gebouw g,
prs_perslid p
WHERE k.alg_kenmerk_niveau = 'R'
AND k.alg_kenmerk_key = 1981 --- huisbaas
AND rk.alg_kenmerk_key = k.alg_kenmerk_key
AND k.alg_kenmerk_verwijder IS NULL
AND rk.alg_onrgoedkenmerk_verwijder IS NULL
AND rk.alg_onrgoedkenmerk_waarde IS NOT NULL
AND r.alg_ruimte_key = rk.alg_onrgoed_key
AND v.alg_verdieping_key = r.alg_verdieping_key
AND g.alg_gebouw_key = v.alg_gebouw_key
AND p.prs_perslid_key NOT IN (6601, 43821)
AND fac.safe_to_number (rk.alg_onrgoedkenmerk_waarde) =
p.prs_perslid_key)
GROUP BY alg_gebouw_code, 'Huisbaas'
UNION ALL
SELECT 'Ja' uitsluiten,
alg_gebouw_code,
'Plaatsvervangend huisbaas' rol,
LISTAGG (LOWER (prs_perslid_email), ';')
WITHIN GROUP (ORDER BY alg_gebouw_code) mailing_ad
FROM (SELECT DISTINCT g.alg_gebouw_code, p.prs_perslid_email
FROM alg_kenmerk k,
alg_onrgoedkenmerk rk,
alg_ruimte r,
alg_verdieping v,
alg_gebouw g,
prs_perslid p
WHERE k.alg_kenmerk_niveau = 'R'
AND k.alg_kenmerk_key = 1982 --- plaatsvervangend huisbaas
AND rk.alg_kenmerk_key = k.alg_kenmerk_key
AND k.alg_kenmerk_verwijder IS NULL
AND rk.alg_onrgoedkenmerk_verwijder IS NULL
AND rk.alg_onrgoedkenmerk_waarde IS NOT NULL
AND r.alg_ruimte_key = rk.alg_onrgoed_key
AND v.alg_verdieping_key = r.alg_verdieping_key
AND g.alg_gebouw_key = v.alg_gebouw_key
AND p.prs_perslid_key NOT IN (6601, 43821)
AND fac.safe_to_number (rk.alg_onrgoedkenmerk_waarde) =
p.prs_perslid_key)
GROUP BY alg_gebouw_code, 'Plaatsvervangend huisbaas'
UNION ALL
SELECT 'Ja' uitsluiten,
alg_gebouw_code,
'SHE contactpersoon' rol,
LISTAGG (LOWER (prs_perslid_email), ';')
WITHIN GROUP (ORDER BY alg_gebouw_code) mailing_ad
FROM (SELECT DISTINCT g.alg_gebouw_code, p.prs_perslid_email
FROM alg_kenmerk k,
alg_onrgoedkenmerk rk,
alg_ruimte r,
alg_verdieping v,
alg_gebouw g,
prs_perslid p
WHERE k.alg_kenmerk_niveau = 'R'
AND k.alg_kenmerk_key = 1983 --- SHE contactpersoon
AND rk.alg_kenmerk_key = k.alg_kenmerk_key
AND k.alg_kenmerk_verwijder IS NULL
AND rk.alg_onrgoedkenmerk_verwijder IS NULL
AND rk.alg_onrgoedkenmerk_waarde IS NOT NULL
AND r.alg_ruimte_key = rk.alg_onrgoed_key
AND v.alg_verdieping_key = r.alg_verdieping_key
AND g.alg_gebouw_key = v.alg_gebouw_key
AND p.prs_perslid_key NOT IN (6601, 43821)
AND fac.safe_to_number (rk.alg_onrgoedkenmerk_waarde) =
p.prs_perslid_key)
GROUP BY alg_gebouw_code, 'SHE contactpersoon'
UNION ALL
SELECT 'Ja' uitsluiten,
alg_gebouw_code,
'DCO' rol,
LISTAGG (LOWER (prs_perslid_email), ';')
WITHIN GROUP (ORDER BY alg_gebouw_code) mailing_ad
FROM (SELECT DISTINCT g.alg_gebouw_code, p.prs_perslid_email
FROM alg_kenmerk k,
alg_onrgoedkenmerk rk,
alg_ruimte r,
alg_verdieping v,
alg_gebouw g,
prs_perslid p
WHERE k.alg_kenmerk_niveau = 'R'
AND k.alg_kenmerk_key = 1984 --- Naam DCO
AND rk.alg_kenmerk_key = k.alg_kenmerk_key
AND k.alg_kenmerk_verwijder IS NULL
AND rk.alg_onrgoedkenmerk_verwijder IS NULL
AND rk.alg_onrgoedkenmerk_waarde IS NOT NULL
AND r.alg_ruimte_key = rk.alg_onrgoed_key
AND v.alg_verdieping_key = r.alg_verdieping_key
AND g.alg_gebouw_key = v.alg_gebouw_key
AND p.prs_perslid_key NOT IN (6601, 43821)
AND fac.safe_to_number (rk.alg_onrgoedkenmerk_waarde) =
p.prs_perslid_key)
GROUP BY alg_gebouw_code, 'DCO'
UNION ALL
SELECT 'Ja' uitsluiten,
alg_gebouw_code,
'Plaatsvervangend DCO' rol,
LISTAGG (LOWER (prs_perslid_email), ';')
WITHIN GROUP (ORDER BY alg_gebouw_code) mailing_ad
FROM (SELECT DISTINCT g.alg_gebouw_code, p.prs_perslid_email
FROM alg_kenmerk k,
alg_onrgoedkenmerk rk,
alg_ruimte r,
alg_verdieping v,
alg_gebouw g,
prs_perslid p
WHERE k.alg_kenmerk_niveau = 'R'
AND k.alg_kenmerk_key = 1985 --- Plaatsvervangend DCO
AND rk.alg_kenmerk_key = k.alg_kenmerk_key
AND k.alg_kenmerk_verwijder IS NULL
AND rk.alg_onrgoedkenmerk_verwijder IS NULL
AND rk.alg_onrgoedkenmerk_waarde IS NOT NULL
AND r.alg_ruimte_key = rk.alg_onrgoed_key
AND v.alg_verdieping_key = r.alg_verdieping_key
AND g.alg_gebouw_key = v.alg_gebouw_key
AND p.prs_perslid_key NOT IN (6601, 43821)
AND fac.safe_to_number (rk.alg_onrgoedkenmerk_waarde) =
p.prs_perslid_key)
GROUP BY alg_gebouw_code, 'Plaatsvervangend DCO'
UNION ALL
SELECT 'Ja' uitsluiten,
alg_gebouw_code,
'Operations contact' rol,
LISTAGG (LOWER (prs_perslid_email), ';')
WITHIN GROUP (ORDER BY alg_gebouw_code) mailing_ad
FROM (SELECT DISTINCT g.alg_gebouw_code, p.prs_perslid_email
FROM alg_kenmerk k,
alg_onrgoedkenmerk rk,
alg_ruimte r,
alg_verdieping v,
alg_gebouw g,
prs_perslid p
WHERE k.alg_kenmerk_niveau = 'R'
AND k.alg_kenmerk_key = 2040 --- Operations contact
AND rk.alg_kenmerk_key = k.alg_kenmerk_key
AND k.alg_kenmerk_verwijder IS NULL
AND rk.alg_onrgoedkenmerk_verwijder IS NULL
AND rk.alg_onrgoedkenmerk_waarde IS NOT NULL
AND r.alg_ruimte_key = rk.alg_onrgoed_key
AND v.alg_verdieping_key = r.alg_verdieping_key
AND g.alg_gebouw_key = v.alg_gebouw_key
AND p.prs_perslid_key NOT IN (6601, 43821)
AND fac.safe_to_number (rk.alg_onrgoedkenmerk_waarde) =
p.prs_perslid_key)
GROUP BY alg_gebouw_code, 'Operations contact'
UNION ALL
SELECT 'Ja' uitsluiten,
alg_gebouw_code,
'Plaatsvervangend operations contact' rol,
LISTAGG (LOWER (prs_perslid_email), ';')
WITHIN GROUP (ORDER BY alg_gebouw_code) mailing_ad
FROM (SELECT DISTINCT g.alg_gebouw_code, p.prs_perslid_email
FROM alg_kenmerk k,
alg_onrgoedkenmerk rk,
alg_ruimte r,
alg_verdieping v,
alg_gebouw g,
prs_perslid p
WHERE k.alg_kenmerk_niveau = 'R'
AND k.alg_kenmerk_key = 2060 --- Plaatsvervangend operations contact
AND rk.alg_kenmerk_key = k.alg_kenmerk_key
AND k.alg_kenmerk_verwijder IS NULL
AND rk.alg_onrgoedkenmerk_verwijder IS NULL
AND rk.alg_onrgoedkenmerk_waarde IS NOT NULL
AND r.alg_ruimte_key = rk.alg_onrgoed_key
AND v.alg_verdieping_key = r.alg_verdieping_key
AND g.alg_gebouw_key = v.alg_gebouw_key
AND p.prs_perslid_key NOT IN (6601, 43821)
AND fac.safe_to_number (rk.alg_onrgoedkenmerk_waarde) =
p.prs_perslid_key)
GROUP BY alg_gebouw_code, 'Plaatsvervangend operations contact'
UNION ALL
SELECT DISTINCT 'Ja' uitsluiten,
g.alg_gebouw_code,
'Financial contact',
fc.financial_contact mailing_ad
FROM cnt_contract_plaats cr,
cnt_contract c,
alg_ruimte r,
alg_verdieping v,
alg_gebouw g,
prs_bedrijf b,
(SELECT b.prs_bedrijf_key, fc.financial_cont_email financial_contact
FROM prs_bedrijf b,
(SELECT p.prs_perslid_key financial_cont_key,
p.prs_perslid_email financial_cont_email,
deb_nr.debiteurnummer
FROM prs_perslid p,
prs_afdeling a,
(SELECT kl.prs_kenmerklink_waarde debiteurnummer,
kl.prs_link_key prs_afdeling_key
FROM prs_kenmerk k, prs_kenmerklink kl
WHERE k.prs_kenmerk_niveau = 'A'
AND k.prs_kenmerk_key = 1001
AND kl.prs_kenmerklink_verwijder IS NULL
AND kl.prs_kenmerk_key = k.prs_kenmerk_key)
deb_nr
WHERE p.prs_srtperslid_key = 76841 ---- financial contact
AND p.prs_afdeling_key = a.prs_afdeling_key
AND p.prs_perslid_verwijder IS NULL
AND p.prs_perslid_key NOT IN (6601, 43821)
AND deb_nr.prs_afdeling_key = a.prs_afdeling_key) fc
WHERE fc.debiteurnummer = b.prs_overeenkomst_nr
AND fc.financial_cont_key IS NOT NULL) fc
WHERE cr.cnt_alg_plaats_code = 'R'
AND cr.cnt_contract_plaats_verwijder IS NULL
AND c.cnt_contract_key = cr.cnt_contract_key
AND c.cnt_contract_verwijder IS NULL
AND c.cnt_contract_status = 0
AND cr.cnt_alg_plaats_key = r.alg_ruimte_key
AND r.alg_verdieping_key = v.alg_verdieping_key
AND g.alg_gebouw_key = v.alg_gebouw_key
AND c.cnt_prs_bedrijf_key = b.prs_bedrijf_key
AND fc.prs_bedrijf_key = b.prs_bedrijf_key
AND c.ins_discipline_key IN (2122,
2121,
2123,
224)
AND SYSDATE BETWEEN TRUNC (c.cnt_contract_looptijd_van)
AND TRUNC (c.cnt_contract_looptijd_tot + 1)
UNION ALL
SELECT DISTINCT 'Ja' uitsluiten,
g.alg_gebouw_code,
'Secretariaat',
secr.secretariaat mailing_ad
FROM cnt_contract_plaats cr,
cnt_contract c,
alg_ruimte r,
alg_verdieping v,
alg_gebouw g,
prs_bedrijf b,
(SELECT b.prs_bedrijf_key, secr.secretariaat_email secretariaat
FROM prs_bedrijf b,
(SELECT p.prs_perslid_key
secretariaat_key,
p.prs_perslid_email
secretariaat_email,
p.prs_perslid_mobiel
secretariaat_mobiel,
prs_perslid_naam
|| DECODE (p.prs_perslid_voorletters,
NULL, '',
', ' || p.prs_perslid_voorletters)
|| DECODE (p.prs_perslid_tussenvoegsel,
NULL, '',
' ' || p.prs_perslid_tussenvoegsel)
|| DECODE (p.prs_perslid_voornaam,
NULL, '',
' (' || p.prs_perslid_voornaam || ')')
secretariaat_naam_full,
DECODE (p.prs_perslid_voornaam,
NULL, '',
p.prs_perslid_voornaam || ' ')
|| DECODE (p.prs_perslid_tussenvoegsel,
NULL, '',
p.prs_perslid_tussenvoegsel || ' ')
|| prs_perslid_naam
secretariaat_naam_friendly,
h.debiteurnummer
FROM prs_perslid p,
prs_afdeling a,
(SELECT kl.prs_kenmerklink_waarde debiteurnummer,
kl.prs_link_key prs_afdeling_key
FROM prs_kenmerk k, prs_kenmerklink kl
WHERE k.prs_kenmerk_niveau = 'A'
AND kl.prs_kenmerklink_verwijder IS NULL
AND k.prs_kenmerk_key = 1001
AND kl.prs_kenmerk_key = k.prs_kenmerk_key) h
WHERE p.prs_srtperslid_key = 76861 ---- secretariaat
AND p.prs_afdeling_key = a.prs_afdeling_key
AND h.prs_afdeling_key = a.prs_afdeling_key
AND p.prs_perslid_key NOT IN (6601, 43821)
AND p.prs_perslid_verwijder IS NULL) secr
WHERE secr.debiteurnummer(+) = b.prs_overeenkomst_nr
AND secr.secretariaat_key IS NOT NULL) secr
WHERE cr.cnt_alg_plaats_code = 'R'
AND cr.cnt_contract_plaats_verwijder IS NULL
AND c.cnt_contract_key = cr.cnt_contract_key
AND c.cnt_contract_verwijder IS NULL
AND c.cnt_contract_status = 0
AND cr.cnt_alg_plaats_key = r.alg_ruimte_key
AND r.alg_verdieping_key = v.alg_verdieping_key
AND g.alg_gebouw_key = v.alg_gebouw_key
AND c.cnt_prs_bedrijf_key = b.prs_bedrijf_key
AND secr.prs_bedrijf_key = b.prs_bedrijf_key
AND c.ins_discipline_key IN (2122,
2121,
2123,
224)
AND SYSDATE BETWEEN TRUNC (c.cnt_contract_looptijd_van)
AND TRUNC (c.cnt_contract_looptijd_tot + 1);
CREATE OR REPLACE VIEW BLCC_V_MEDEWERKERS
(