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

PZEE#75214 Implementatie Provincie Zeeland

Browse Source 
svn path=/Customer/trunk/; revision=59777
This commit is contained in:
Suzan Wiegerinck
2023-03-28 11:53:49 +00:00
parent 08548d3da7
commit a2dfb9256f
1 changed files with 934 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

935
PZEE/PZEE.sql
View File

@@ -1,4 +1,3 @@
/* Formatted on 23/1/2023 09:55:58 (QP5 v5.336) */
--
-- $Id$
--
@@ -29,6 +28,71 @@ SET DEFINE OFF
------ payload begin ------
CREATE OR REPLACE PACKAGE PZEE
AS
PROCEDURE prs_mandaten;
END;
/
CREATE OR REPLACE PACKAGE BODY PZEE
AS
PROCEDURE prs_mandaten
AS
oracle_err_num NUMBER;
oracle_err_mes VARCHAR2 (200);
v_errormsg VARCHAR2 (200);
CURSOR c IS
SELECT p.prs_perslid_key,
kp.prs_kostenplaats_key,
kp.prs_kostenplaats_nr,
kp.prs_kostenplaats_omschrijving
FROM prs_perslid p, prs_kostenplaats kp
WHERE p.prs_perslid_verwijder IS NULL
AND kp.prs_kostenplaatsgrp_key = 1
AND kp.prs_kostenplaats_verwijder IS NULL
AND ( kp.prs_kostenplaats_eind IS NULL
OR TRUNC (kp.prs_kostenplaats_eind) > TRUNC (SYSDATE))
AND NOT EXISTS
(SELECT *
FROM prs_perslidkostenplaats m
WHERE m.prs_kostenplaats_key =
kp.prs_kostenplaats_key
AND m.prs_perslid_key = p.prs_perslid_key);
BEGIN
FOR rec IN C
LOOP
INSERT INTO prs_perslidkostenplaats (
prs_perslid_key,
prs_kostenplaats_key,
prs_perslidkostenplaats_boeken,
prs_perslidkostenplaats_aanmk)
VALUES (rec.prs_perslid_key,
rec.prs_kostenplaats_key,
1,
SYSDATE);
COMMIT;
END LOOP;
EXCEPTION
WHEN OTHERS
THEN
oracle_err_num := SQLCODE;
oracle_err_mes := SUBSTR (SQLERRM, 1, 100);
v_errormsg :=
'OTHERS (error '
|| oracle_err_num
|| '/'
|| oracle_err_mes
|| ')';
fac.writelog ('Mandatering externe medewerker',
'E',
v_errormsg,
'');
END;
END;
/
CREATE OR REPLACE PROCEDURE pzee_import_perslid (p_import_key IN NUMBER)
AS
oracle_err_num NUMBER;
@@ -128,6 +192,9 @@ BEGIN
END;
END LOOP;
--- En dan zorgen we ook even dat alle mandaten goed staan voor eventuele nieuwe personen
pzee.prs_mandaten;
COMMIT;
END pzee_update_perslid;
/
@@ -340,6 +407,9 @@ CREATE OR REPLACE PROCEDURE pzee_update_kpl (p_import_key IN NUMBER)
AS
BEGIN
fac_update_kpn (p_import_key);
-- dan zorgen we vervolgens ook even dat alle mandaten goed staan
pzee.prs_mandaten;
END pzee_update_kpl;
/
@@ -366,6 +436,869 @@ AS
'Defect') ins_status
FROM ins_v_deel_gegevens d;
CREATE OR REPLACE VIEW PZEE_V_RAP_INFOBORD
(
RESERVERING,
AKTIEF,
DATUM,
DAG_VAN,
TIJD_VAN,
DAG_TOT,
TIJD_TOT,
RUIMTE,
RUIMTENR,
GASTHEER,
GASTHEER_NAAM,
AANVRAGER,
AANVRAGER_NAAM,
OMSCHRIJVING,
LOCATIE_OMSCHRIJVING,
GEBOUW_CODE,
GEBOUW,
VERDIEPING_OMSCHRIJVING,
VERDIEPING_VOLGNR,
TITEL
)
AS
SELECT res_reservering_key || '/' || rrr.res_rsv_ruimte_volgnr
reservering,
(CASE
WHEN res_rsv_ruimte_van > SYSDATE THEN 'expected'
WHEN res_rsv_ruimte_tot < SYSDATE THEN 'passed'
ELSE 'active'
END)
aktief,
res_rsv_ruimte_van
datum,
TO_CHAR (res_rsv_ruimte_van, 'dd-mm-yyyy')
dag_van,
TO_CHAR (res_rsv_ruimte_van, 'hh24:mi')
tijd_van,
TO_CHAR (res_rsv_ruimte_van, 'dd-mm-yyyy')
dag_van,
TO_CHAR (res_rsv_ruimte_tot, 'hh24:mi')
tijd_tot,
res_ruimte_nr
ruimte,
SUBSTR (res_ruimte_nr, 1, 4)
ruimtenr,
gastheer.prs_perslid_naam_full
gastheer,
gastheer.prs_perslid_naam_friendly
gastheer_naam,
aanvrager.prs_perslid_naam_full,
aanvrager.prs_perslid_naam_friendly
aanvrager_naam,
res_rsv_ruimte_omschrijving
omschrijving,
l.alg_locatie_omschrijving
locatie_omschrijving,
g.alg_gebouw_code
gebouw_code,
g.alg_gebouw_naam
gebouw,
v.alg_verdieping_omschrijving
verdieping_omschrijving,
v.alg_verdieping_volgnr
verdieping_volgnr,
titel.titel
FROM res_v_aanwezigrsv_ruimte rrr,
res_ruimte_opstelling rro,
prs_v_perslid_fullnames aanvrager,
prs_v_perslid_fullnames gastheer,
res_v_res_ruimte_gegevens rrg,
alg_locatie l,
alg_gebouw g,
alg_verdieping v,
res_status_fo sf,
res_discipline rd,
(SELECT res_rsv_ruimte_key,
ud.fac_usrdata_omschr weergeven,
ud.fac_usrdata_key
FROM res_kenmerkwaarde kw,
res_kenmerk k,
res_srtkenmerk sk,
fac_usrdata ud,
fac_usrtab ut
WHERE kw.res_kenmerk_key = k.res_kenmerk_key
AND k.res_srtkenmerk_key = sk.res_srtkenmerk_key
AND fac.safe_to_number (kw.res_kenmerkreservering_waarde) =
ud.fac_usrdata_key
AND ud.fac_usrtab_key = ut.fac_usrtab_key
AND sk.res_srtkenmerk_key = 41
AND ut.fac_usrtab_key = 202) weergeven,
(SELECT kw.res_rsv_ruimte_key,
kw.res_kenmerkreservering_waarde titel
FROM res_kenmerkwaarde kw, res_kenmerk k
WHERE kw.res_kenmerk_key = k.res_kenmerk_key
AND k.res_kenmerk_key = 63) titel
WHERE rrr.res_ruimte_opstel_key = rro.res_ruimte_opstel_key
AND rro.res_ruimte_key = rrg.res_ruimte_key
AND rrr.res_rsv_ruimte_host_key = gastheer.prs_perslid_key
AND rrr.res_rsv_ruimte_contact_key = aanvrager.prs_perslid_key
AND rrg.alg_locatie_key = l.alg_locatie_key
AND rrg.alg_gebouw_key = g.alg_gebouw_key
AND rrg.alg_verdieping_key = v.alg_verdieping_key
AND rrr.res_status_fo_key = sf.res_status_fo_key
AND rrg.res_discipline_key = rd.ins_discipline_key
AND weergeven.res_rsv_ruimte_key(+) = rrr.res_rsv_ruimte_key
AND titel.res_rsv_ruimte_key(+) = rrr.res_rsv_ruimte_key
AND weergeven.fac_usrdata_key = 181;
CREATE OR REPLACE VIEW pzee_v_rap_bruikleenovk
(
datum,
perslid_key,
perslid_voorletters,
perslid_voornaam,
perslid_voorletter,
perslid_naam,
perslid_tussenvoegsel,
perslid_achternaam,
personeelsnr,
objectsoort,
object_id,
object_omschrijving,
serienummer,
selectie
)
AS
SELECT TO_CHAR (SYSDATE, 'dd-mm-yyyy'),
p.prs_perslid_key,
p.prs_perslid_voorletters,
p.prs_perslid_voornaam,
SUBSTR (p.prs_perslid_voornaam, 1, 1) || '.' voorletter,
p.prs_perslid_naam,
p.prs_perslid_tussenvoegsel,
CASE
WHEN p.prs_perslid_tussenvoegsel IS NOT NULL
THEN
p.prs_perslid_naam || ', ' || p.prs_perslid_tussenvoegsel
ELSE
p.prs_perslid_naam
END AS achternaam,
p.prs_perslid_nr,
sd.ins_srtdeel_omschrijving,
d.ins_deel_omschrijving,
d.ins_deel_opmerking,
sn.serienummer,
s.selectie
FROM ins_deel d,
prs_perslid p,
ins_srtdeel sd,
(SELECT kd.ins_deel_key, kd.ins_kenmerkdeel_waarde serienummer
FROM ins_srtkenmerk sk, ins_kenmerk k, ins_kenmerkdeel kd
WHERE sk.ins_srtkenmerk_key = 23
AND k.ins_srtkenmerk_key = sk.ins_srtkenmerk_key
AND kd.ins_kenmerk_key = k.ins_kenmerk_key
AND kd.ins_kenmerkdeel_verwijder IS NULL) sn,
(SELECT DECODE (unpivot_row,
1, 'Bruikleenovereenkomst',
2, 'Bruikleenovereenkomst ambtsdrager') AS selectie
FROM DUAL,
( SELECT LEVEL AS unpivot_row
FROM DUAL
CONNECT BY LEVEL <= 2)) s
WHERE d.ins_alg_ruimte_type = 'P'
AND d.ins_alg_ruimte_key = p.prs_perslid_key
AND d.ins_srtdeel_key = sd.ins_srtdeel_key
AND sn.ins_deel_key(+) = d.ins_deel_key
UNION ALL
SELECT TO_CHAR (SYSDATE, 'dd-mm-yyyy'),
p.prs_perslid_key,
p.prs_perslid_voorletters,
SUBSTR (p.prs_perslid_voornaam, 1, 1) || '.' voorletter,
p.prs_perslid_voornaam,
p.prs_perslid_naam,
p.prs_perslid_tussenvoegsel,
CASE
WHEN p.prs_perslid_tussenvoegsel IS NOT NULL
THEN
p.prs_perslid_naam || ', ' || p.prs_perslid_tussenvoegsel
ELSE
p.prs_perslid_naam
END AS achternaam,
p.prs_perslid_nr,
sd.ins_srtdeel_omschrijving,
d.ins_deel_omschrijving,
d.ins_deel_opmerking,
sn.serienummer,
s.selectie
FROM ins_deel d,
prs_perslid p,
ins_srtdeel sd,
(SELECT kd.ins_deel_key, kd.ins_kenmerkdeel_waarde serienummer
FROM ins_srtkenmerk sk, ins_kenmerk k, ins_kenmerkdeel kd
WHERE sk.ins_srtkenmerk_key = 23
AND k.ins_srtkenmerk_key = sk.ins_srtkenmerk_key
AND kd.ins_kenmerk_key = k.ins_kenmerk_key
AND kd.ins_kenmerkdeel_verwijder IS NULL) sn,
(SELECT DECODE (unpivot_row,
1, 'Bruikleenovereenkomst',
2, 'Bruikleenovereenkomst ambtsdrager') AS selectie
FROM DUAL,
( SELECT LEVEL AS unpivot_row
FROM DUAL
CONNECT BY LEVEL <= 2)) s
WHERE d.ins_alg_ruimte_type_org = 'P'
AND d.ins_alg_ruimte_key_org = p.prs_perslid_key
AND d.ins_srtdeel_key = sd.ins_srtdeel_key
AND sn.ins_deel_key(+) = d.ins_deel_key;
CREATE OR REPLACE VIEW pzee_v_rap_vrijwaring
(
datum,
perslid_key,
perslid_voorletters,
perslid_voornaam,
perslid_voorletter,
perslid_naam,
perslid_achternaam,
personeelsnr,
objectsoort,
object_id,
object_omschrijving,
serienummer,
selectie
)
AS
SELECT TO_CHAR (SYSDATE, 'dd-mm-yyyy'),
p.prs_perslid_key,
p.prs_perslid_voorletters,
p.prs_perslid_voornaam,
SUBSTR (p.prs_perslid_voornaam, 1, 1) || '.' voorletter,
SUBSTR (p.prs_perslid_voornaam, 1, 1)
|| '. '
|| CASE
WHEN p.prs_perslid_tussenvoegsel IS NOT NULL
THEN
p.prs_perslid_tussenvoegsel
|| ' '
|| p.prs_perslid_naam
ELSE
p.prs_perslid_naam
END naam_full,
CASE
WHEN p.prs_perslid_tussenvoegsel IS NOT NULL
THEN
p.prs_perslid_naam || ', ' || p.prs_perslid_tussenvoegsel
ELSE
p.prs_perslid_naam
END AS achternaam,
p.prs_perslid_nr,
sd.ins_srtdeel_omschrijving,
d.ins_deel_omschrijving,
d.ins_deel_opmerking,
sn.serienummer,
s.selectie
FROM ins_deel d,
prs_perslid p,
ins_srtdeel sd,
(SELECT kd.ins_deel_key, kd.ins_kenmerkdeel_waarde serienummer
FROM ins_srtkenmerk sk, ins_kenmerk k, ins_kenmerkdeel kd
WHERE sk.ins_srtkenmerk_key = 23
AND k.ins_srtkenmerk_key = sk.ins_srtkenmerk_key
AND kd.ins_kenmerk_key = k.ins_kenmerk_key
AND kd.ins_kenmerkdeel_verwijder IS NULL) sn,
(SELECT DECODE (unpivot_row,
1, 'Vrijwaring',
2, 'Vrijwaring ambtsdrager') AS selectie
FROM DUAL,
( SELECT LEVEL AS unpivot_row
FROM DUAL
CONNECT BY LEVEL <= 2)) s
WHERE d.ins_alg_ruimte_type = 'P'
AND d.ins_alg_ruimte_key = p.prs_perslid_key
AND d.ins_srtdeel_key = sd.ins_srtdeel_key
AND sn.ins_deel_key(+) = d.ins_deel_key
UNION ALL
SELECT TO_CHAR (SYSDATE, 'dd-mm-yyyy'),
p.prs_perslid_key,
p.prs_perslid_voorletters,
p.prs_perslid_voornaam,
SUBSTR (p.prs_perslid_voornaam, 1, 1) || '.' voorletter,
SUBSTR (p.prs_perslid_voornaam, 1, 1)
|| '. '
|| CASE
WHEN p.prs_perslid_tussenvoegsel IS NOT NULL
THEN
p.prs_perslid_tussenvoegsel
|| ' '
|| p.prs_perslid_naam
ELSE
p.prs_perslid_naam
END naam_full,
CASE
WHEN p.prs_perslid_tussenvoegsel IS NOT NULL
THEN
p.prs_perslid_naam || ', ' || p.prs_perslid_tussenvoegsel
ELSE
p.prs_perslid_naam
END AS achternaam,
p.prs_perslid_nr,
sd.ins_srtdeel_omschrijving,
d.ins_deel_omschrijving,
d.ins_deel_opmerking,
sn.serienummer,
s.selectie
FROM ins_deel d,
prs_perslid p,
ins_srtdeel sd,
(SELECT kd.ins_deel_key, kd.ins_kenmerkdeel_waarde serienummer
FROM ins_srtkenmerk sk, ins_kenmerk k, ins_kenmerkdeel kd
WHERE sk.ins_srtkenmerk_key = 23
AND k.ins_srtkenmerk_key = sk.ins_srtkenmerk_key
AND kd.ins_kenmerk_key = k.ins_kenmerk_key
AND kd.ins_kenmerkdeel_verwijder IS NULL) sn,
(SELECT DECODE (unpivot_row,
1, 'vrijwaring',
2, 'vrijwaring ambtsdrager') AS selectie
FROM DUAL,
( SELECT LEVEL AS unpivot_row
FROM DUAL
CONNECT BY LEVEL <= 2)) s
WHERE d.ins_alg_ruimte_type_org = 'P'
AND d.ins_alg_ruimte_key_org = p.prs_perslid_key
AND d.ins_srtdeel_key = sd.ins_srtdeel_key
AND sn.ins_deel_key(+) = d.ins_deel_key;
CREATE OR REPLACE VIEW PZEE_RAP_KALENDER_OMBOUW
(
USER_KEY,
TITLE,
VAN,
TOT,
ITEM_KEY,
COLOR,
TEXTCOLOR,
URL
)
AS
SELECT DISTINCT
NULL user_key,
r.alg_ruimte_omschrijving title,
fac.safe_to_date (
TO_CHAR (mld_melding_einddatum, 'DD-MM-YYYY') || ' ' || tijd,
' dd-mm-yyyy HH24:mi:ss') van,
mld_melding_einddatum tot,
m.mld_melding_key item_key,
CASE
WHEN s.mld_statuses_key <> 5 THEN '#fc0303'
ELSE '#008000'
END color,
'#FFFFFF' textcolor,
'?u=melding' || CHR (38) || 'k=' || m.mld_melding_key url
FROM mld_stdmelding sm,
mld_melding m,
mld_statuses s,
alg_ruimte r,
res_alg_ruimte ra,
res_ruimte rr,
(SELECT km.mld_kenmerkmelding_waarde tijd, km.mld_melding_key
FROM mld_srtkenmerk sk, mld_kenmerk k, mld_kenmerkmelding km
WHERE sk.mld_srtkenmerk_key = 461
AND k.mld_srtkenmerk_key = sk.mld_srtkenmerk_key
AND km.mld_kenmerk_key = k.mld_kenmerk_key) tijd_van
WHERE sm.mld_stdmelding_key = m.mld_stdmelding_key
AND s.mld_statuses_key = m.mld_melding_status
AND m.mld_alg_onroerendgoed_keys = r.alg_ruimte_key
AND r.alg_ruimte_key = ra.alg_ruimte_key
AND ra.res_ruimte_key = rr.res_ruimte_key
AND tijd_van.mld_melding_key = m.mld_melding_key
AND sm.mld_stdmelding_key = 401;
CREATE OR REPLACE FORCE VIEW PZEE_V_INS_QRC_ALG
(
HIDE_F_SORT,
LOCATIE_CODE,
FCLT_F_LOCATIE,
FCLT_F_GEBOUW,
FCLT_F_PLAATS,
RUIMTENR,
NAAM,
FCLT_F_DISCIPLINE,
FCLT_F_OBJECTGROEP,
FCLT_F_OBJECTSOORT,
FCLT_F_IDENTIFICATIE,
FCLT_F_BOOKMARK,
INS_DEEL_KEY,
INS_SRTDEEL_KEY,
FCLT_3D_DISCIPLINE_KEY,
FCLT_3D_LOCATIE_KEY,
INS_ALG_RUIMTE_TYPE,
INS_ALG_RUIMTE_KEY,
BOOKMARK_ID,
GEKOPPELD_AAN
)
AS
SELECT i.ins_deel_omschrijving
hide_f_sort,
l.alg_locatie_code,
l.alg_locatie_code || ' ' || l.alg_locatie_omschrijving
fclt_f_locatie,
o.alg_gebouw_omschrijving
fclt_f_gebouw,
SUBSTR (o.alg_plaatsaanduiding, 13)
fclt_f_plaats,
o.alg_ruimte_nr,
NULL
prs_perslid_naam,
d.ins_discipline_omschrijving
fclt_f_discipline,
g.ins_srtgroep_omschrijving
fclt_f_objectgroep,
s.ins_srtdeel_omschrijving
fclt_f_objectsoort,
i.ins_deel_omschrijving
fclt_f_identificatie,
b.fac_bookmark_naam
fclt_f_bookmark,
i.ins_deel_key,
s.ins_srtdeel_key,
i.ins_discipline_key
fclt_3d_discipline_key,
l.alg_locatie_key
fclt_3d_locatie_key,
i.ins_alg_ruimte_type,
i.ins_alg_ruimte_key,
b.fac_bookmark_id
hide_f_bookmark_id,
'Ruimte'
Gekoppeld_aan
FROM ins_deel i,
ins_v_alg_overzicht o,
ins_srtdeel s,
ins_srtgroep g,
ins_discipline d,
alg_locatie l,
fac_bookmark b
WHERE UPPER (b.fac_bookmark_naam) = 'QRC NAAR OBJECT'
AND COALESCE (b.fac_bookmark_expire, SYSDATE + 1) > SYSDATE
AND ins_deel_verwijder IS NULL
AND COALESCE (i.ins_deel_vervaldatum, SYSDATE + 1) > SYSDATE
AND i.ins_deel_module = 'INS'
AND i.ins_deel_parent_key IS NULL
AND s.ins_srtdeel_key = i.ins_srtdeel_key
AND g.ins_srtgroep_key = s.ins_srtgroep_key
AND d.ins_discipline_key = g.ins_discipline_key
AND o.alg_onroerendgoed_keys =
COALESCE (i.ins_alg_ruimte_key_org, i.ins_alg_ruimte_key)
AND o.alg_onroerendgoed_type =
COALESCE (i.ins_alg_ruimte_type_org, i.ins_alg_ruimte_type)
AND COALESCE (i.ins_alg_ruimte_type_org, i.ins_alg_ruimte_type) IN
('T', 'R', 'W')
AND o.alg_locatie_key = i.ins_alg_locatie_key
AND l.alg_locatie_key = i.ins_alg_locatie_key
UNION ALL
SELECT i.ins_deel_omschrijving hide_f_sort,
NULL,
NULL fclt_f_locatie,
NULL fclt_f_gebouw,
NULL fclt_f_plaats,
NULL,
p.prs_perslid_naam,
d.ins_discipline_omschrijving fclt_f_discipline,
g.ins_srtgroep_omschrijving fclt_f_objectgroep,
s.ins_srtdeel_omschrijving fclt_f_objectsoort,
i.ins_deel_omschrijving fclt_f_identificatie,
b.fac_bookmark_naam fclt_f_bookmark,
i.ins_deel_key,
s.ins_srtdeel_key,
i.ins_discipline_key fclt_3d_discipline_key,
NULL fclt_3d_locatie_key,
i.ins_alg_ruimte_type,
i.ins_alg_ruimte_key,
b.fac_bookmark_id hide_f_bookmark_id,
'Persoon'
FROM ins_deel i,
ins_srtdeel s,
ins_srtgroep g,
prs_perslid p,
ins_discipline d,
fac_bookmark b
WHERE UPPER (b.fac_bookmark_naam) = 'QRC NAAR OBJECT'
AND COALESCE (b.fac_bookmark_expire, SYSDATE + 1) > SYSDATE
AND ins_deel_verwijder IS NULL
AND COALESCE (i.ins_deel_vervaldatum, SYSDATE + 1) > SYSDATE
AND i.ins_deel_module = 'INS'
AND i.ins_deel_parent_key IS NULL
AND s.ins_srtdeel_key = i.ins_srtdeel_key
AND g.ins_srtgroep_key = s.ins_srtgroep_key
AND d.ins_discipline_key = g.ins_discipline_key
AND p.prs_perslid_key =
COALESCE (i.ins_alg_ruimte_key_org, i.ins_alg_ruimte_key)
AND COALESCE (i.ins_alg_ruimte_type_org, i.ins_alg_ruimte_type) =
'P';
-- Voor de koppeling met BIS is een specifieke opbouw van de rapportage nodig
CREATE OR REPLACE VIEW meeting
(
res_date,
starttime,
endtime,
name,
location
)
AS
SELECT datum, tijd_van, tijd_tot, titel, ruimte FROM pzee_v_rap_infobord;
-- Voor de koppeling met Intranet is een specifieke opbouw van de rapportage nodig
CREATE OR REPLACE VIEW VERGADERING
(
RES_DATE,
STARTDATUM,
EINDDATUM,
BEGINTIJD,
EINDTIJD,
ONDERWERP,
AANVRAGER,
LOCATIECODE,
LOCATIECODELINK,
LOCATIE
)
AS
SELECT DATUM,
DAG_VAN,
DAG_TOT,
TIJD_VAN,
TIJD_TOT,
OMSCHRIJVING,
AANVRAGER_NAAM,
RUIMTENR,
RUIMTENR LOCATIELINK,
RUIMTE
FROM PZEE_V_RAP_INFOBORD;
--- reserveringen met catering
CREATE OR REPLACE VIEW PZEE_V_RAP_CATERING
AS
SELECT DISTINCT
rrr.res_rsv_ruimte_key,
rrr.res_reservering_key,
rrr.res_reservering_key || '/' || rrr.res_rsv_ruimte_volgnr
reservering,
(SELECT MAX (fac_tracking_datum)
FROM fac_tracking
WHERE fac_tracking_refkey = rrr.res_rsv_ruimte_key
AND fac_srtnotificatie_key = 117 --- resupd
AND UPPER (COALESCE (fac_tracking_oms, ' ')) NOT LIKE
'%ERROR%')
laatste_upd,
rrr.res_rsv_ruimte_externsyncdate
datum_export,
rrr.res_rsv_ruimte_verwijder
datum_verwijderd,
cat.ins_discipline_key
ruimte_catalogus_key,
cat.ins_discipline_omschrijving
ruimte_catalogus,
rer.res_ruimte_nr
ruimte,
(SELECT gb.alg_gebouw_code
FROM alg_gebouw gb
WHERE gb.alg_gebouw_key = alg.alg_gebouw_key)
gebouw,
rrr.res_rsv_ruimte_van
datum_van,
rrr.res_rsv_ruimte_tot
datum_tot,
rrr.res_rsv_ruimte_omschrijving
oms,
(SELECT prs_perslid_naam_friendly
FROM prs_v_perslid_fullnames
WHERE prs_perslid_key = rrr.res_rsv_ruimte_host_key)
gastheer,
kstp.prs_kostenplaats_nr
act_nr,
(SELECT res_kenmerkreservering_waarde
FROM res_kenmerkwaarde kw, res_kenmerk k, res_srtkenmerk sk
WHERE kw.res_rsv_ruimte_key = rrr.res_rsv_ruimte_key
AND k.res_kenmerk_key = kw.res_kenmerk_key
AND sk.res_srtkenmerk_key = k.res_srtkenmerk_key
AND sk.res_srtkenmerk_key = 1) --- allergie/dieet
wensen,
(SELECT CASE
WHEN res_kenmerkreservering_waarde = 181 THEN 'Nee'
ELSE 'Ja'
END externen
FROM res_kenmerkwaarde kw, res_kenmerk k, res_srtkenmerk sk
WHERE kw.res_rsv_ruimte_key = rrr.res_rsv_ruimte_key
AND k.res_kenmerk_key = kw.res_kenmerk_key
AND sk.res_srtkenmerk_key = k.res_srtkenmerk_key
AND sk.res_srtkenmerk_key = 81) --- externen
externen,
(SELECT res_kenmerkreservering_waarde
FROM res_kenmerkwaarde kw, res_kenmerk k, res_srtkenmerk sk
WHERE kw.res_rsv_ruimte_key = rrr.res_rsv_ruimte_key
AND k.res_kenmerk_key = kw.res_kenmerk_key
AND sk.res_srtkenmerk_key = k.res_srtkenmerk_key
AND sk.res_srtkenmerk_key = 161) --- aantal
aantal
FROM res_rsv_ruimte rrr,
res_rsv_artikel rar,
res_ruimte_opstelling rop,
res_ruimte rer,
ins_tab_discipline cat,
res_alg_ruimte rarm,
alg_v_ruimte_gegevens_all alg,
prs_kostenplaats kstp
WHERE rrr.res_rsv_ruimte_verwijder IS NULL
AND cat.ins_discipline_key = rer.res_discipline_key
AND rar.res_rsv_ruimte_key = rrr.res_rsv_ruimte_key
AND rrr.res_ruimte_opstel_key = rop.res_ruimte_opstel_key
AND rer.res_ruimte_key = rop.res_ruimte_key
AND rarm.res_ruimte_key = rer.res_ruimte_key
AND alg.alg_ruimte_key = rarm.alg_ruimte_key
AND kstp.prs_kostenplaats_key = rrr.prs_kostenplaats_key
UNION ALL
SELECT DISTINCT
rrr.res_rsv_ruimte_key,
rrr.res_reservering_key,
rrr.res_reservering_key || '/' || rrr.res_rsv_ruimte_volgnr
reservering,
(SELECT MAX (fac_tracking_datum)
FROM fac_tracking
WHERE fac_tracking_refkey = rrr.res_rsv_ruimte_key
AND fac_srtnotificatie_key = 117 --- resupd
AND UPPER (COALESCE (fac_tracking_oms, ' ')) NOT LIKE
'%ERROR%')
laatste_upd,
rrr.res_rsv_ruimte_externsyncdate
last_export,
rrr.res_rsv_ruimte_verwijder
datum_verwijderd,
0
ruimte_catalogus_key,
'Losse catering'
ruimte_catalogus,
alg.alg_ruimte_nr || ' ' || alg.alg_ruimte_omschrijving
ruimte,
(SELECT gb.alg_gebouw_code
FROM alg_gebouw gb
WHERE gb.alg_gebouw_key = alg.alg_gebouw_key)
gebouw,
rrr.res_rsv_ruimte_van
datum_van,
rrr.res_rsv_ruimte_tot
datum_tot,
COALESCE (rrr.res_rsv_ruimte_omschrijving, 'Catering ')
oms,
(SELECT prs_perslid_naam_friendly
FROM prs_v_perslid_fullnames
WHERE prs_perslid_key = rrr.res_rsv_ruimte_host_key)
gastheer,
kstp.prs_kostenplaats_nr
act_nr,
(SELECT res_kenmerkreservering_waarde
FROM res_kenmerkwaarde kw, res_kenmerk k, res_srtkenmerk sk
WHERE kw.res_rsv_ruimte_key = rrr.res_rsv_ruimte_key
AND k.res_kenmerk_key = kw.res_kenmerk_key
AND sk.res_srtkenmerk_key = k.res_srtkenmerk_key
AND sk.res_srtkenmerk_key = 1) --- allergie/dieet
wensen,
(SELECT CASE
WHEN res_kenmerkreservering_waarde = 181 THEN 'Ja'
ELSE 'Nee'
END externen
FROM res_kenmerkwaarde kw, res_kenmerk k, res_srtkenmerk sk
WHERE kw.res_rsv_ruimte_key = rrr.res_rsv_ruimte_key
AND k.res_kenmerk_key = kw.res_kenmerk_key
AND sk.res_srtkenmerk_key = k.res_srtkenmerk_key
AND sk.res_srtkenmerk_key = 81) --- externen
externen,
(SELECT res_kenmerkreservering_waarde
FROM res_kenmerkwaarde kw, res_kenmerk k, res_srtkenmerk sk
WHERE kw.res_rsv_ruimte_key = rrr.res_rsv_ruimte_key
AND k.res_kenmerk_key = kw.res_kenmerk_key
AND sk.res_srtkenmerk_key = k.res_srtkenmerk_key
AND sk.res_srtkenmerk_key = 161) --- aantal
aantal
FROM res_rsv_ruimte rrr,
res_rsv_artikel rar,
alg_v_ruimte_gegevens_all alg,
prs_kostenplaats kstp
WHERE rrr.res_rsv_ruimte_verwijder IS NULL
AND rar.res_rsv_ruimte_key = rrr.res_rsv_ruimte_key
AND alg.alg_ruimte_key = rrr.alg_ruimte_key
AND kstp.prs_kostenplaats_key = rrr.prs_kostenplaats_key
ORDER BY res_rsv_ruimte_key;
--- catering artikelen die besteld mogen worden conform de gestelde catalogus instellingen
CREATE OR REPLACE VIEW PZEE_V_RAP_CATERING_RGL
AS
SELECT b.prs_bedrijf_key || rar.res_rsv_ruimte_key extra_key,
rar.res_rsv_ruimte_key,
b.prs_bedrijf_key bedrijfs_key,
b.prs_bedrijf_naam leverancier,
SUBSTR (ba.prs_bedrijfadres_url,
INSTR (ba.prs_bedrijfadres_url, ':') + 1) mailadres,
rar.res_artikel_key,
rar.res_rsv_artikel_key,
art.res_artikel_omschrijving,
rar.res_rsv_artikel_aantal,
rar.res_rsv_artikel_levering,
art.res_discipline_key,
rar.res_rsv_artikel_externsyncdate,
cat.ins_discipline_omschrijving,
cat_s.res_disc_params_expire_dagen,
cat_s.res_disc_params_expire_tijd,
t1.t1,
TRUNC (fac.datumtijdplusuitvoertijd (SYSDATE,
res_disc_params_expire_dagen,
'DAGEN',
t1,
res_disc_params_expire_tijd,
1)) bestelling_voor
FROM res_rsv_artikel rar,
res_artikel art,
ins_tab_discipline cat,
res_disc_params cat_s,
prs_bedrijf b,
prs_bedrijfadres ba,
(SELECT COALESCE (cat_t1, res_t1) t1
FROM (SELECT (SELECT fac_setting_pvalue
FROM fac_setting
WHERE fac_setting_name = 'res_cat_t1')
cat_t1,
(SELECT fac_setting_pvalue
FROM fac_setting
WHERE fac_setting_name = 'res_t1')
res_t1
FROM DUAL)) t1
WHERE art.res_artikel_key = rar.res_artikel_key
AND cat.ins_discipline_key = art.res_discipline_key
AND rar.res_rsv_artikel_verwijder IS NULL
AND cat_s.res_ins_discipline_key = cat.ins_discipline_key
AND cat_s.prs_bedrijf_key = b.prs_bedrijf_key
AND ba.prs_bedrijf_key = b.prs_bedrijf_key
AND rar.res_rsv_artikel_externsyncdate IS NULL;
-- rapport met bestellingen dat naar de leverancier gestuurd mag worden
CREATE OR REPLACE VIEW PZEE_V_RAP_NOTI_LEVERANCIER
AS
SELECT c.res_rsv_ruimte_key,
c.reservering,
c.oms omschrijving,
c.ruimte_catalogus_key,
ruimte_catalogus,
CASE
WHEN c.ruimte_catalogus_key IN (804, 0) THEN 'keuken A (A138)'
ELSE 'keuken in het hoofdgebouw (begane grond)'
END afleverlocatie,
c.gebouw,
c.ruimte,
c.act_nr activiteitennr,
c.externen externen_aanwezig,
c.aantal aant_externen,
c.wensen dieet_allergie,
cr.ins_discipline_omschrijving catalogus,
cr.res_discipline_key catalogus_key,
fac.safe_to_number (cr.extra_key) extra_key,
cr.bedrijfs_key,
cr.leverancier,
cr.mailadres,
cr.res_artikel_omschrijving artikel,
cr.res_rsv_artikel_aantal aantal,
cr.res_rsv_artikel_levering artikel_levering,
TO_CHAR (cr.res_rsv_artikel_levering, 'hh:mi') levertijd,
TO_CHAR (cr.res_rsv_artikel_levering, 'dd-mm-yyyy') leverdatum,
TO_CHAR (cr.res_rsv_artikel_levering, 'd') leverdag --- zondag is dag 1 van de week
FROM pzee_v_rap_catering c, pzee_v_rap_catering_rgl cr
WHERE c.res_rsv_ruimte_key = cr.res_rsv_ruimte_key
AND cr.bestelling_voor = TRUNC ( cr.res_rsv_artikel_levering );
--- flag = 9 dus:
--- SELECT sender, receiver, text, code, key, xkey, xsender, xemail, xmobile
CREATE OR REPLACE VIEW PZEE_V_NOTI_BAKKERBEST
(
SENDER,
RECEIVER,
TEXT,
CODE,
KEY,
XKEY,
XSENDER,
XEMAIL,
XMOBILE
)
AS
SELECT DISTINCT
3 sender, -- Facilitor
NULL
receiver,
'Bestelling ' || b.reservering || ' voor ' || leverdatum
text,
sn.fac_srtnotificatie_code
code,
(SELECT fac_usrrap_key
FROM fac_usrrap
WHERE UPPER (fac_usrrap_view_name) =
'PZEE_V_RAP_NOTI_LEVERANCIER') ---- refkey: is het rapport
key,
b.extra_key
xkey,
NULL
xsender,
CASE
WHEN leverdag = 2 THEN 'Bakkerb@bakker.nl' -- bakker Bliek levert niet op maandag
ELSE b.mailadres
END
xemail,
NULL
xmobile
FROM fac_srtnotificatie sn,
fac_tracking t,
pzee_v_rap_noti_leverancier b,
(SELECT fac_usrrap_key
FROM fac_usrrap
WHERE UPPER (fac_usrrap_view_name) =
'PZEE_V_RAP_NOTI_LEVERANCIER')
WHERE sn.fac_srtnotificatie_code = 'CUST01' AND b.bedrijfs_key = 1842;
CREATE OR REPLACE VIEW PZEE_V_NOTI_SEC_BEST
(
SENDER,
RECEIVER,
TEXT,
CODE,
KEY,
XKEY,
XSENDER,
XEMAIL,
XMOBILE
)
AS
SELECT DISTINCT
3
sender, -- Facilitor
NULL
receiver,
'Bestelling ' || b.reservering || ' voor ' || leverdatum
text,
sn.fac_srtnotificatie_code
code,
(SELECT fac_usrrap_key
FROM fac_usrrap
WHERE UPPER (fac_usrrap_view_name) =
'PZEE_V_RAP_NOTI_LEVERANCIER') ---- refkey: is het rapport
key,
b.extra_key
xkey,
NULL
xsender,
b.mailadres
xemail,
NULL
xmobile
FROM fac_srtnotificatie sn,
fac_tracking t,
pzee_v_rap_noti_leverancier b,
(SELECT fac_usrrap_key
FROM fac_usrrap
WHERE UPPER (fac_usrrap_view_name) =
'PZEE_V_RAP_NOTI_LEVERANCIER')
WHERE sn.fac_srtnotificatie_code = 'CUST01' AND b.bedrijfs_key = 1841;
------ payload end ------
SET DEFINE OFF