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

FMHN#63881 Diverse updates (in rapportages en procedures)

Browse Source 
svn path=/Customer/trunk/; revision=53698
This commit is contained in:
Maarten van der Heide
2021-11-15 12:15:43 +00:00
parent 6ba5f81bcb
commit bc3cf0a0ed
1 changed files with 488 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

494
FMHN/fmhn.sql
View File

@@ -1,4 +1,4 @@
--
--
-- $Id$
--
-- Script containing customer specific db-configuration for FMHN.
@@ -2695,22 +2695,24 @@ AS
CASE WHEN c.BTW = 0 THEN c.voorziening_totaalprijs END BTW_0,
CASE
WHEN c.BTW = 9
AND c.voorziening_product NOT IN ('Artikel uit conversie', 'Conversie 0 BTW', 'Conversie 9 BTW', 'Conversie 21 BTW')
AND (c.voorziening_product NOT IN ('Artikel uit conversie', 'Conversie 0 BTW', 'Conversie 9 BTW', 'Conversie 21 BTW') OR c.fclt_3d_locatie_key IN (5, 3, 6))
THEN
c.voorziening_totaalprijs * 1.09
WHEN c.BTW = 9
AND c.voorziening_product IN ('Artikel uit conversie', 'Conversie 0 BTW', 'Conversie 9 BTW', 'Conversie 21 BTW')
AND c.fclt_3d_locatie_key NOT IN (5, 3, 6)
THEN
c.voorziening_totaalprijs
END
BTW_9,
CASE
WHEN c.BTW = 21
AND c.voorziening_product NOT IN ('Artikel uit conversie', 'Conversie 0 BTW', 'Conversie 9 BTW', 'Conversie 21 BTW')
AND (c.voorziening_product NOT IN ('Artikel uit conversie', 'Conversie 0 BTW', 'Conversie 9 BTW', 'Conversie 21 BTW') OR c.fclt_3d_locatie_key IN (5, 3, 6))
THEN
c.voorziening_totaalprijs * 1.21
WHEN c.BTW = 21
AND c.voorziening_product IN ('Artikel uit conversie', 'Conversie 0 BTW', 'Conversie 9 BTW', 'Conversie 21 BTW')
AND c.fclt_3d_locatie_key NOT IN (5, 3, 6)
THEN
c.voorziening_totaalprijs
END
@@ -5262,6 +5264,7 @@ AS
PROCEDURE schonen_lessen;
--FUNCTION change_delimitor (p_string VARCHAR2, p_delimitor VARCHAR2) RETURN VARCHAR2;
PROCEDURE movetoruimte (p_perslid_key NUMBER, p_gebouw_key NUMBER);
PROCEDURE movetopp (p_bezoekers_key NUMBER, p_afspraak_van DATE, p_afspraak_tot DATE, p_terrein_key NUMBER, p_max_cap NUMBER);
PROCEDURE update_fegroep;
PROCEDURE update_min2geb;
PROCEDURE update_afd2geb;
@@ -5435,6 +5438,70 @@ AS
PRS.movetoruimte (p_perslid_key, v_ruimte_key, 'L'); -- Eventueel andere impliciete WPs op Locatie verwijderen!
END;
-- Tijdelijke procedure tbv. migratie, daarna kan deze weg!
PROCEDURE movetopp (p_bezoekers_key NUMBER,
p_afspraak_van DATE,
p_afspraak_tot DATE,
p_terrein_key NUMBER,
p_max_cap NUMBER)
AS
v_count NUMBER (10);
v_res_deel_key NUMBER (10);
BEGIN
-- Bepaal hoeveel bezet
SELECT COUNT ( * ) aant
INTO v_count
FROM ins_v_aanwezigdeel pp, res_v_aanwezigdeel rd
WHERE pp.ins_alg_ruimte_type = 'T'
AND pp.ins_alg_ruimte_key = p_terrein_key
--AND pp.ins_discipline_key = rd.res_discipline_key
AND pp.ins_deel_key = rd.res_ins_deel_key
AND EXISTS -- Bezet
(SELECT 1
FROM res_v_aanwezigrsv_deel
WHERE TRUNC (res_rsv_deel_van) = TRUNC (p_afspraak_van)
AND res_deel_key = rd.res_deel_key);
IF (v_count < p_max_cap)
THEN
-- Bepaal vrije PP
SELECT MIN (rd.res_deel_key)
INTO v_res_deel_key
FROM res_v_aanwezigdeel rd
WHERE EXISTS
(SELECT 1
FROM ins_v_aanwezigdeel d -- Voorkomen op terrein
WHERE d.ins_alg_ruimte_type = 'T'
AND d.ins_alg_ruimte_key = p_terrein_key
AND d.ins_deel_key = rd.res_ins_deel_key)
AND NOT EXISTS -- Vrij zijn
(SELECT 1
FROM res_v_aanwezigrsv_deel
WHERE TRUNC (res_rsv_deel_van) = TRUNC (p_afspraak_van)
AND res_deel_key = rd.res_deel_key);
-- Toekennen PP.
INSERT INTO res_rsv_deel (res_deel_key,
bez_bezoekers_key,
res_rsv_deel_aantal,
res_status_bo_key,
res_rsv_deel_van,
res_rsv_deel_tot)
VALUES (v_res_deel_key,
p_bezoekers_key,
1,
2,
p_afspraak_van,
p_afspraak_tot);
ELSE
-- Geen PP meer beschikbaar (handmatig corrigeren).
fac.writelog ('MOVETOPP', 'I', '[' || TO_CHAR (p_terrein_key) || '|' || TO_CHAR (p_bezoekers_key) || '|' || TO_CHAR (p_afspraak_van, 'dd-mm-yyyy') || ']',
'Geen PP beschikbaar');
END IF;
COMMIT;
END;
PROCEDURE update_fegroep
AS
c_applname VARCHAR2 (50) := 'UPDATE_FEGROEP';
@@ -5541,7 +5608,7 @@ AS
'0363562066'))) -- NEA
ORDER BY p.prs_perslid_key;
CURSOR c_gg_ocw_duo -- OCW-uitzonderingen: 87=DUO
CURSOR c_gg_ocw_duo -- OCW-uitzondering: 87=DUO
IS
SELECT '[' || p.prs_perslid_email || '] ' aanduiding,
p.prs_perslid_key,
@@ -5745,6 +5812,54 @@ AS
WHERE fac_groep_key IN (73, 76, 87, 60, 98, 106, 108)
AND prs_perslid_key = p.prs_perslid_key)
ORDER BY prs_perslid_key;
CURSOR c_gg_jenv_cob -- JenV-uitzondering: 941=COB-zalen tbv. NCTV en NCSC
IS
SELECT '[' || p.prs_perslid_email || '] ' aanduiding,
p.prs_perslid_key,
a.prs_afdeling_externid
FROM prs_v_aanwezigperslid p,
prs_afdeling a,
prs_v_afdeling_boom ab
WHERE SUBSTR (p.prs_perslid_externid, 1, 2) = '07' -- Alleen voor uit IDM geimporteerde personen!
AND p.prs_afdeling_key = a.prs_afdeling_key
AND a.prs_afdeling_key = ab.prs_afdeling_key
AND (EXISTS
(SELECT 1 -- Satellietzetel op afdeling1 van persoon!
FROM prs_afdeling
WHERE prs_afdeling_key = ab.prs_afdeling_key1
AND prs_afdeling_externid IN
('0750001168', -- NCTV
'0763677016')) -- NCSC
OR EXISTS
(SELECT 1 -- Satellietzetel op afdeling2 van persoon!
FROM prs_afdeling
WHERE prs_afdeling_key = ab.prs_afdeling_key2
AND prs_afdeling_externid IN
('0750001168', -- NCTV
'0763677016')) -- NCSC
OR EXISTS
(SELECT 1 -- Satellietzetel op afdeling3 van persoon!
FROM prs_afdeling
WHERE prs_afdeling_key = ab.prs_afdeling_key3
AND prs_afdeling_externid IN
('0750001168', -- NCTV
'0763677016')) -- NCSC
OR EXISTS
(SELECT 1 -- Satellietzetel op afdeling4 van persoon!
FROM prs_afdeling
WHERE prs_afdeling_key = ab.prs_afdeling_key4
AND prs_afdeling_externid IN
('0750001168', -- NCTV
'0763677016')) -- NCSC
OR EXISTS
(SELECT 1 -- Satellietzetel op afdeling5 van persoon!
FROM prs_afdeling
WHERE prs_afdeling_key = ab.prs_afdeling_key5
AND prs_afdeling_externid IN
('0750001168', -- NCTV
'0763677016'))) -- NCSC
ORDER BY p.prs_perslid_key;
BEGIN
v_count := 0;
v_datum1 := SYSDATE;
@@ -5821,6 +5936,7 @@ AS
v_count := 0;
v_datum1 := SYSDATE;
-- LET OP: Eerst de uitzonderingen!
FOR rec IN c_gg_ocw_duo -- 87=DUO
LOOP
BEGIN
@@ -5864,6 +5980,7 @@ AS
v_count := 0;
v_datum1 := SYSDATE;
-- LET OP: Eerst de uitzonderingen!
FOR rec IN c_gg_vws_rivm -- 60=RIVM
LOOP
BEGIN
@@ -5907,6 +6024,7 @@ AS
v_count := 0;
v_datum1 := SYSDATE;
-- LET OP: Eerst de uitzonderingen!
FOR rec IN c_gg_jenv_dtenv -- 106=DTenV
LOOP
BEGIN
@@ -5947,6 +6065,10 @@ AS
fac.writelog (c_applname, 'S', '#GG_JenV-DTenV/toegekend: ' || TO_CHAR (v_count), TO_CHAR (ROUND ((v_datum2 - v_datum1) * 24 * 60), 'FM990') || 'm');
COMMIT;
v_count := 0;
v_datum1 := SYSDATE;
-- LET OP: Eerst de uitzonderingen!
FOR rec IN c_gg_jenv_ind -- 98=IND
LOOP
BEGIN
@@ -5987,6 +6109,10 @@ AS
fac.writelog (c_applname, 'S', '#GG_JenV-IND/toegekend: ' || TO_CHAR (v_count), TO_CHAR (ROUND ((v_datum2 - v_datum1) * 24 * 60), 'FM990') || 'm');
COMMIT;
v_count := 0;
v_datum1 := SYSDATE;
-- LET OP: Eerst de uitzonderingen!
FOR rec IN c_gg_jenv_rvdk -- 108=RvdK
LOOP
BEGIN
@@ -6125,6 +6251,42 @@ AS
v_datum2 := SYSDATE;
fac.writelog (c_applname, 'S', '#GG_Iedereen/toegekend: ' || TO_CHAR (v_count), TO_CHAR (ROUND ((v_datum2 - v_datum1) * 24 * 60), 'FM990') || 'm');
COMMIT;
v_count := 0;
v_datum1 := SYSDATE;
-- Extra COB-rol voor NCTV en NCSC!
FOR rec IN c_gg_jenv_cob -- 941=COB-rol
LOOP
BEGIN
v_errormsg := 'Fout behouden GG_JenV-COB';
INSERT INTO fac_gebruikersgroep (fac_groep_key, prs_perslid_key)
SELECT 941, rec.prs_perslid_key
FROM DUAL
WHERE NOT EXISTS
(SELECT 1
FROM fac_gebruikersgroep
WHERE fac_groep_key = 941
AND prs_perslid_key = rec.prs_perslid_key);
-- TODO:DELETE FROM eventuele andere Iedereen-groepen!
v_count := v_count + 1;
EXCEPTION
WHEN OTHERS
THEN
oracle_err_num := SQLCODE;
oracle_err_mes := SUBSTR (SQLERRM, 1, 200);
v_errormsg := v_errormsg || ' ORACLE (error ' || oracle_err_num || '/' || oracle_err_mes || ')';
fac.writelog (c_applname, 'E', rec.aanduiding || v_errormsg, '');
COMMIT;
END;
END LOOP;
v_datum2 := SYSDATE;
fac.writelog (c_applname, 'S', '#GG_JenV-COB/toegekend: ' || TO_CHAR (v_count), TO_CHAR (ROUND ((v_datum2 - v_datum1) * 24 * 60), 'FM990') || 'm');
COMMIT;
END;
PROCEDURE update_min2geb
@@ -6150,7 +6312,7 @@ AS
AND p.prs_afdeling_key = a.prs_afdeling_key
AND ud.fac_usrtab_key = 141 -- Min2Geb
AND UPPER (SUBSTR (ud.fac_usrdata_code, 4)) = TRIM (g.alg_gebouw_upper)
AND g.alg_locatie_key IN (4, 7, 8, 11, 12, 13, 14, 16, 20, 21, 22, 43) -- Locaties live!
AND g.alg_locatie_key IN (3, 4, 5, 6, 7, 8, 11, 12, 13, 14, 16, 20, 21, 22, 43) -- Locaties live!
AND SUBSTR (ud.fac_usrdata_code, 1, 2) = SUBSTR (a.prs_afdeling_externid, 1, 2) -- Hoofdzetel ministerie van persoon!
AND NOT EXISTS (SELECT 1 -- Nog geen WP op hoofdzetel!
FROM prs_perslidwerkplek pw, prs_werkplek wp, alg_ruimte r, alg_verdieping v
@@ -6210,7 +6372,7 @@ AS
AND p.prs_afdeling_key = ab.prs_afdeling_key
AND ud.fac_usrtab_key = 142 -- Afd2Geb
AND UPPER (SUBSTR (ud.fac_usrdata_code, INSTR (ud.fac_usrdata_code, '/') + 1)) = TRIM (g.alg_gebouw_upper)
AND g.alg_locatie_key IN (4, 7, 8, 11, 12, 13, 14, 16, 20, 21, 22, 43) -- Locaties live!
AND g.alg_locatie_key IN (3, 4, 5, 6, 7, 8, 11, 12, 13, 14, 16, 20, 21, 22, 43) -- Locaties live!
AND (EXISTS
(SELECT 1 -- Satellietzetel op bedrijf van persoon (kan ook)!
FROM prs_v_aanwezigkenmerklink
@@ -9554,6 +9716,326 @@ AS
AND p.prs_afdeling_key = ab.prs_afdeling_key
;
CREATE OR REPLACE VIEW BES_V_UDR_BESTELLING_OPM
(
BESTELLING_KEY,
BESTELAANVRAAGNR,
BESTELDATUM,
LEVERANCIER,
BESTELLER,
INVOERDER,
KOSTENSOORTGROEP,
KOSTENSOORT,
KPN,
KPN_OMSCHRIJVING,
FCLT_3D_AFDELING_KEY,
AFDELING_CODE,
AFDELING_OMSCHRIJVING,
FCLT_3D_LOCATIE_KEY,
LOCATIE_CODE,
REGIO_OMSCHRIJVING,
DISTRICT_OMSCHRIJVING,
AFLEVERADRES,
AFLEVERPLAATS,
MANDAAT,
FCLT_3D_DISCIPLINE_KEY,
CATALOGUS,
GROEP,
PRODUCTOMSCHRIJVING,
PRODUCTCODE,
AFLEVERDATUM,
DOORLOOPTIJD_WERKDGN,
SLA_TIJD,
PRIJS,
INKOOPPRIJS,
STATUS,
GEFIATTEERDDOOR,
BESTELOPDRACHTNUMMER,
AANTAL,
ITEMPRIJS,
ITEMINKOOPPRIJS,
ITEMPOSNR,
OPMERKING
)
AS
SELECT bes_bestelling_key,
bestelaanvraagnr,
besteldatum,
bedrijf_naam,
besteller,
invoerder,
kostensoortgroep,
kostensoort,
kpn,
kpn_omschrijving,
prs_afdeling_key,
afdeling_code,
afdeling_omschrijving,
alg_locatie_key,
locatie_code,
regio_omschrijving,
district_omschijving,
afleveradres,
afleverplaats,
mandaat,
ins_discipline_key,
catalogus,
groep,
productomschrijving,
productcode,
afleverdatum,
doorlooptijd_werkdgn,
sla_tijd,
prijs,
inkoopprijs,
status,
gefiatteerddoor,
bestelopdrachtnummer,
aantal,
itemprijs,
iteminkoopprijs,
itemposnr,
opmerking
FROM (SELECT b.bes_bestelling_key bes_bestelling_key,
'A-' || b.bes_bestelling_key bestelaanvraagnr,
b.bes_bestelling_datum besteldatum,
(SELECT prs_perslid_naam_full
FROM prs_v_perslid_fullnames_all pf
WHERE pf.prs_perslid_key = p.prs_perslid_key)
besteller,
(SELECT prs_perslid_naam_full
FROM prs_v_perslid_fullnames_all pf
WHERE pf.prs_perslid_key =
COALESCE (
fac.gettrackinguserkey ('BESNEW',
b.bes_bestelling_key),
fac.gettrackinguserkey ('BESAP2',
b.bes_bestelling_key)))
invoerder,
(SELECT ksg.prs_kostensoortgrp_oms
FROM prs_kostensoortgrp ksg, prs_kostensoort ks
WHERE ksg.prs_kostensoortgrp_key =
ks.prs_kostensoortgrp_key
AND ks.prs_kostensoort_key =
(SELECT MAX(COALESCE (
bsg.prs_kostensoort_key,
disc.prs_kostensoort_key))
FROM bes_discipline disc, bes_srtgroep bsg
WHERE disc.ins_discipline_key =
d.ins_discipline_key))
kostensoortgroep,
(SELECT ks.prs_kostensoort_oms
FROM prs_kostensoort ks
WHERE ks.prs_kostensoort_key =
(SELECT MAX(COALESCE (bsg.prs_kostensoort_key,
disc.prs_kostensoort_key))
FROM bes_discipline disc, bes_srtgroep bsg
WHERE disc.ins_discipline_key =
bsg.ins_discipline_key
AND disc.ins_discipline_key =
d.ins_discipline_key))
kostensoort,
k.prs_kostenplaats_nr kpn,
k.prs_kostenplaats_omschrijving kpn_omschrijving,
(SELECT b.prs_bedrijf_naam
FROM prs_bedrijf b
WHERE b.prs_bedrijf_key = sd.prs_bedrijf_key)
bedrijf_naam,
a.prs_afdeling_key,
a.prs_afdeling_naam afdeling_code,
a.prs_afdeling_omschrijving afdeling_omschrijving,
ma.alg_locatie_key alg_locatie_key,
(SELECT alg_locatie_code
FROM alg_locatie l
WHERE l.alg_locatie_key = ma.alg_locatie_key)
locatie_code,
(SELECT alg_regio_omschrijving
FROM alg_locatie l, alg_district d, alg_regio r
WHERE r.alg_regio_key = d.alg_regio_key
AND l.alg_district_key = d.alg_district_key
AND l.alg_locatie_key = ma.alg_locatie_key)
regio_omschrijving,
(SELECT alg_district_omschrijving
FROM alg_locatie l, alg_district d
WHERE l.alg_district_key = d.alg_district_key
AND l.alg_locatie_key = ma.alg_locatie_key)
district_omschijving,
ma.mld_adres_naam afleveradres,
b.bes_bestelling_plaats afleverplaats,
NVL ( (SELECT pr.fac_profiel_limiet
FROM fac_profiel pr
WHERE p.fac_profiel_key = pr.fac_profiel_key), 0)
mandaat,
d.ins_discipline_key ins_discipline_key,
d.ins_discipline_omschrijving catalogus,
sg.bes_srtgroep_omschrijving groep,
b.bes_bestelling_leverdatum afleverdatum,
fac.count_work_days (
b.bes_bestelling_datum,
NVL (
fac.gettrackingdate ('BESOTV', b.bes_bestelling_key),
SYSDATE))
doorlooptijd_werkdgn,
NVL (
(SELECT bdp.bes_disc_params_leverdagen
FROM bes_disc_params bdp
WHERE d.ins_discipline_key =
bdp.bes_ins_discipline_key),
0)
sla_tijd,
sd.bes_srtdeel_nr productcode,
bi.bes_bestelling_item_prijs
* bi.bes_bestelling_item_aantal
prijs,
NVL (
bes.getsrtdeelinkprijs (sd.bes_srtdeel_key,
bes_bestelling_datum),
bi.bes_bestelling_item_prijs)
* bi.bes_bestelling_item_aantal
inkoopprijs,
(SELECT bes_bestellingstatuses_omschr
FROM bes_bestellingstatuses bs
WHERE bs.bes_bestellingstatuses_key =
b.bes_bestelling_status)
status,
(SELECT prs_perslid_naam_full
FROM prs_v_perslid_fullnames_all pf
WHERE pf.prs_perslid_key = b.bes_bestelling_fiat_user)
gefiatteerddoor,
'O-' || bo.bes_bestelopdr_id bestelopdrachtnummer,
bi.bes_bestelling_item_aantal aantal,
bi.bes_bestelling_item_prijs itemprijs,
NVL (
bes.getsrtdeelinkprijs (sd.bes_srtdeel_key,
bes_bestelling_datum),
bi.bes_bestelling_item_prijs)
iteminkoopprijs,
sd.bes_srtdeel_omschrijving productomschrijving,
boi.bes_bestelopdr_item_posnr itemposnr,
b.bes_bestelling_opmerking opmerking
FROM bes_bestelling b,
prs_perslid p,
prs_kostenplaats k,
prs_afdeling a,
mld_adres ma,
bes_bestelling_item bi,
bes_bestelopdr_item boi,
bes_bestelopdr bo,
bes_srtdeel sd,
bes_srtgroep sg,
ins_tab_discipline d
WHERE b.prs_perslid_key = p.prs_perslid_key
AND b.prs_kostenplaats_key = k.prs_kostenplaats_key
AND p.prs_afdeling_key = a.prs_afdeling_key
AND b.mld_adres_key_lev = ma.mld_adres_key
AND b.bes_bestelling_key = bi.bes_bestelling_key
AND bi.bes_bestelopdr_item_key =
boi.bes_bestelopdr_item_key(+)
AND boi.bes_bestelopdr_key = bo.bes_bestelopdr_key(+)
AND bi.bes_srtdeel_key = sd.bes_srtdeel_key
AND sd.bes_srtgroep_key = sg.bes_srtgroep_key
AND sg.ins_discipline_key = d.ins_discipline_key);
--FMHN#69317 Tijdelijke view tbv bezoekers met parkeerplaats
CREATE OR REPLACE VIEW fmhn_v_udr_bezoekerspark
(
key,
afspraak_key,
reservering_key,
HOST,
contact,
invoerder,
plaats_code,
plaats_omschrijving,
regio,
district,
locatie_code,
locatie_naam,
locatie_plaats,
gebouw_code,
gebouw_naam,
verdieping_code,
verdieping_naam,
ruimte_code,
ruimte_naam,
afspraak_ruimte,
afspraak_opmerking,
bezoeker_naam,
bezoeker_bedrijf,
bezoek_van,
weekdag_bezoek_van,
bezoek_tot,
actie,
bezoeker_opmerking,
bezoeker_binnen,
bezoeker_buiten,
pasnr,
parkeerplaats,
fclt_3d_locatie_key,
selfservice
)
AS
SELECT b.bez_bezoekers_key,
a.bez_afspraak_key,
a.res_rsv_ruimte_key,
a.bez_afspraak_gastheer bez_afspraak_host,
p2.prs_perslid_naam_full bez_afspraak_contact,
p3.prs_perslid_naam_full bez_afspraak_invoerder,
og.alg_onroerendgoed_code,
og.alg_onroerendgoed_omschrijving,
r.alg_regio_omschrijving,
d.alg_district_omschrijving,
l.alg_locatie_code,
l.alg_locatie_omschrijving,
l.alg_locatie_plaats,
og.alg_gebouw_code,
og.alg_gebouw_naam,
og.alg_verdieping_code,
og.alg_verdieping_omschrijving,
og.alg_ruimte_nr,
og.alg_ruimte_omschrijving,
a.bez_afspraak_ruimte,
a.bez_afspraak_opmerking,
b.bez_afspraak_naam bezoeker_naam,
b.bez_afspraak_bedrijf bezoeker_bedrijf,
a.bez_afspraak_datum,
TO_CHAR (a.bez_afspraak_datum, 'D') weekdag_bezoek_van,
a.bez_afspraak_eind,
ba.bez_actie_omschrijving,
b.bez_bezoekers_opmerking bezoeker_opmerking,
b.bez_bezoekers_done,
b.bez_bezoekers_out,
b.bez_bezoekers_pasnr,
rd.res_deel_omschrijving,
a.alg_locatie_key,
DECODE (p2.prs_perslid_naam_full,
p3.prs_perslid_naam_full, lcl.l ('lcl_yes'),
lcl.l ('lcl_no')) selfservice
FROM bez_afspraak a,
bez_bezoekers b,
prs_v_perslid_fullnames_all p2,
prs_v_perslid_fullnames_all p3,
alg_v_allonrgoed_gegevens og,
alg_locatie l,
alg_district d,
alg_regio r,
bez_actie ba,
res_rsv_deel rrd,
res_deel rd
WHERE a.bez_afspraak_key = b.bez_afspraak_key
AND p2.prs_perslid_key = a.bez_afspraak_contact_key
AND p3.prs_perslid_key(+) = a.prs_perslid_key
AND a.bez_actie_key = ba.bez_actie_key
AND l.alg_district_key = d.alg_district_key
AND d.alg_regio_key = r.alg_regio_key
AND l.alg_locatie_key = a.alg_locatie_key
AND a.alg_onrgoed_keys = og.alg_onroerendgoed_keys(+)
AND b.bez_bezoekers_key = rrd.bez_bezoekers_key(+)
AND rrd.res_deel_key = rd.res_deel_key(+)
AND rd.res_deel_omschrijving IS NOT NULL
AND a.bez_afspraak_datum >= TO_DATE ('01-01-2010', 'DD-MM-YYYY')
ORDER BY bez_bezoekers_key;
/* FALLBACK-SCENARIO!!!