SURF#88345 -- Personen import en SURF package
svn path=/Customer/trunk/; revision=69954
This commit is contained in:
Robin Stoker
657
SURF/surf.sql
Normal file
657
SURF/surf.sql
Normal file
@@ -0,0 +1,657 @@
|
||||
--
|
||||
-- $Id$
|
||||
--
|
||||
-- Script containing customer specific sql statements for the SURF database
|
||||
|
||||
|
||||
DEFINE thisfile = 'SURF.SQL'
|
||||
DEFINE dbuser = 'SURF'
|
||||
|
||||
SET ECHO ON
|
||||
SET DEFINE ON
|
||||
COLUMN fcltlogfile NEW_VALUE fcltlogfile NOPRINT;
|
||||
COLUMN fcltcusttxt NEW_VALUE fcltcusttxt NOPRINT;
|
||||
WHENEVER SQLERROR CONTINUE;
|
||||
SELECT adm.getscriptspoolfile('&thisfile') AS fcltlogfile FROM DUAL;
|
||||
SPOOL &fcltlogfile
|
||||
WHENEVER SQLERROR EXIT;
|
||||
SELECT adm.checkscriptcust('&dbuser') AS fcltcusttxt FROM DUAL;
|
||||
WHENEVER SQLERROR CONTINUE;
|
||||
---------------------------------------
|
||||
PROMPT &fcltcusttxt
|
||||
---------------------------------------
|
||||
SET DEFINE OFF
|
||||
|
||||
------ payload begin ------
|
||||
|
||||
CREATE OR REPLACE PACKAGE SURF
|
||||
AS
|
||||
PROCEDURE res_optie_del;
|
||||
PROCEDURE res_outlook_def;
|
||||
END;
|
||||
/
|
||||
|
||||
CREATE OR REPLACE PACKAGE BODY SURF
|
||||
AS
|
||||
PROCEDURE res_optie_del
|
||||
AS
|
||||
c_applname VARCHAR2 (50) := 'RES_OPTIE_DEL';
|
||||
v_errormsg VARCHAR2 (1000);
|
||||
oracle_err_num NUMBER;
|
||||
oracle_err_mes VARCHAR2 (200);
|
||||
v_aanduiding VARCHAR2 (200);
|
||||
v_count_tot NUMBER (10);
|
||||
|
||||
CURSOR c1 IS
|
||||
SELECT r.res_rsv_ruimte_key, r.res_reservering_key
|
||||
FROM res_rsv_ruimte r, res_kenmerkwaarde rk
|
||||
WHERE rk.res_rsv_ruimte_key = r.res_rsv_ruimte_key
|
||||
AND rk.res_kenmerk_key = 161 -- In optie of definitief, alleen bij optioneel notificeren
|
||||
AND rk.res_kenmerkreservering_waarde = 2
|
||||
AND TRUNC (r.res_rsv_ruimte_aanmaak) = TRUNC (SYSDATE - 15);
|
||||
BEGIN
|
||||
v_count_tot := 0;
|
||||
FOR rec IN c1
|
||||
LOOP
|
||||
v_errormsg := 'Fout verwijderen optie reservering';
|
||||
v_aanduiding := '[' || TO_CHAR (rec.res_rsv_ruimte_key) || '|' || TO_CHAR (rec.res_reservering_key) || '] ';
|
||||
BEGIN
|
||||
UPDATE res_rsv_ruimte
|
||||
SET res_rsv_ruimte_opmerking = 'Optie verwijderd door systeem',
|
||||
res_status_fo_key = 1,
|
||||
res_rsv_ruimte_verwijder = SYSDATE
|
||||
WHERE res_rsv_ruimte_key = rec.res_rsv_ruimte_key;
|
||||
|
||||
fac.trackaction ('RESDEL',
|
||||
rec.res_rsv_ruimte_key,
|
||||
6,
|
||||
NULL,
|
||||
NULL);
|
||||
|
||||
UPDATE res_reservering
|
||||
SET res_reservering_verwijder = SYSDATE
|
||||
WHERE res_reservering_key = rec.res_reservering_key
|
||||
AND NOT EXISTS
|
||||
(SELECT *
|
||||
FROM res_v_aanwezigrsv_ruimte
|
||||
WHERE res_reservering_key = rec.res_reservering_key);
|
||||
END;
|
||||
v_count_tot := v_count_tot + 1;
|
||||
END LOOP;
|
||||
fac.writelog (c_applname, 'S', '#Optionele reserveringen verwijderd: ' || TO_CHAR (v_count_tot), '');
|
||||
COMMIT;
|
||||
EXCEPTION
|
||||
WHEN OTHERS
|
||||
THEN
|
||||
oracle_err_num := SQLCODE;
|
||||
oracle_err_mes := SUBSTR (SQLERRM, 1, 200);
|
||||
v_errormsg := 'ORACLE (error ' || oracle_err_num || '/' || oracle_err_mes || ')';
|
||||
fac.writelog (c_applname, 'E', v_aanduiding || v_errormsg, 'Taak afgebroken!');
|
||||
END;
|
||||
|
||||
PROCEDURE res_outlook_def
|
||||
AS
|
||||
c_applname VARCHAR2 (50) := 'RES_OUTLOOK_DEF';
|
||||
v_errormsg VARCHAR2 (1000);
|
||||
oracle_err_num NUMBER;
|
||||
oracle_err_mes VARCHAR2 (200);
|
||||
v_aanduiding VARCHAR2 (200);
|
||||
v_count_tot NUMBER (10);
|
||||
|
||||
CURSOR c1 IS
|
||||
SELECT r.res_rsv_ruimte_key
|
||||
FROM res_rsv_ruimte r
|
||||
WHERE r.res_rsv_ruimte_verwijder IS NULL
|
||||
AND r.res_rsv_ruimte_externnr IS NOT NULL -- Outlook
|
||||
AND NOT EXISTS -- Kenmerk is nog niet gevuld
|
||||
(SELECT 'x'
|
||||
FROM res_kenmerkwaarde rk
|
||||
WHERE rk.res_rsv_ruimte_key = r.res_rsv_ruimte_key
|
||||
AND rk.res_kenmerk_key = 161);
|
||||
BEGIN
|
||||
v_count_tot := 0;
|
||||
FOR rec IN c1
|
||||
LOOP
|
||||
v_errormsg := 'Fout definitief maken reservering';
|
||||
v_aanduiding := '[' || TO_CHAR (rec.res_rsv_ruimte_key)|| '] ';
|
||||
BEGIN
|
||||
flx.setflex ('RES',
|
||||
161,
|
||||
rec.res_rsv_ruimte_key,
|
||||
'1');
|
||||
|
||||
fac.trackaction ('RESUPD',
|
||||
rec.res_rsv_ruimte_key,
|
||||
6,
|
||||
NULL,
|
||||
'Reservering uit Outlook op definitief gezet');
|
||||
END;
|
||||
v_count_tot := v_count_tot + 1;
|
||||
END LOOP;
|
||||
fac.writelog (c_applname, 'S', '#Reservering definitief gemaakt: ' || TO_CHAR (v_count_tot), '');
|
||||
COMMIT;
|
||||
|
||||
EXCEPTION
|
||||
WHEN OTHERS
|
||||
THEN
|
||||
oracle_err_num := SQLCODE;
|
||||
oracle_err_mes := SUBSTR (SQLERRM, 1, 200);
|
||||
v_errormsg := 'ORACLE (error ' || oracle_err_num || '/' || oracle_err_mes || ')';
|
||||
fac.writelog (c_applname, 'E', v_aanduiding || v_errormsg, 'Taak afgebroken!');
|
||||
END;
|
||||
END;
|
||||
/
|
||||
|
||||
/*
|
||||
CREATE OR REPLACE PROCEDURE SURF_DAILY
|
||||
AS
|
||||
v_errormsg VARCHAR2 (1000);
|
||||
oracle_err_num NUMBER;
|
||||
oracle_err_mes VARCHAR2 (200);
|
||||
BEGIN
|
||||
surf.res_optie_del;
|
||||
EXCEPTION
|
||||
WHEN OTHERS
|
||||
THEN
|
||||
oracle_err_num := SQLCODE;
|
||||
oracle_err_mes := SUBSTR (SQLERRM, 1, 200);
|
||||
v_errormsg := 'ORACLE (error ' || oracle_err_num || '/' || oracle_err_mes || ')';
|
||||
fac.writelog ('DAILY', 'E', 'Proces afgebroken!', v_errormsg);
|
||||
END SURF_DAILY;
|
||||
/
|
||||
*/
|
||||
|
||||
CREATE OR REPLACE PROCEDURE surf_import_perslid(p_import_key IN NUMBER
|
||||
)
|
||||
AS
|
||||
v_seq_of_columns VARCHAR(255);
|
||||
BEGIN
|
||||
v_seq_of_columns := '1;2;3;4;5;6;7;8;9;11;10;0;0;0;0;13;14;15;0;17;16;18;19;12;0;20;27;28;29;30;31;32;33;34;35;36;37;38;39;40;41;42;43;44;45;46;47';
|
||||
prs.import_perslid(p_import_key, v_seq_of_columns, 'Locatiecode;Gebouwcode;Bouwlaagvolgnummer;Ruimtenummer;Werkplekvolgnummer;Omschrijving;Afdelingscode;PersoonAchternaam;Tussenvoegsel;Voorletters;Voornaam;TitelAanhef;Telefoonnummer;Mobiel;Email;Functie;Personeelsnummer;Loginnaam;Password;Kostenplaatsnr%');
|
||||
END;
|
||||
/
|
||||
|
||||
|
||||
CREATE OR REPLACE PROCEDURE surf_update_perslid (
|
||||
p_import_key IN NUMBER
|
||||
) IS
|
||||
BEGIN
|
||||
prs.update_perslid (p_import_key, 'LOGIN', 'A', 1);
|
||||
END surf_update_perslid;
|
||||
/
|
||||
|
||||
|
||||
|
||||
--
|
||||
-- Looplijst Cateraar
|
||||
--
|
||||
CREATE OR REPLACE VIEW surf_v_rap_catering_totaal
|
||||
(
|
||||
KEY,
|
||||
NUMMER,
|
||||
RES_OMSCHRIJVING,
|
||||
INVOERDATUM,
|
||||
DATUM,
|
||||
GASTHEER,
|
||||
ZICHTBARE_GASTHEER,
|
||||
CONTACT,
|
||||
GASTHEER_EMAIL,
|
||||
CONTACT_EMAIL,
|
||||
INVOERDER,
|
||||
KOSTENSOORTGROEP,
|
||||
KOSTENSOORT,
|
||||
KPN,
|
||||
KPN_OMSCHRIJVING,
|
||||
KPN_EXTERN,
|
||||
FCLT_3D_DIVISIE_KEY,
|
||||
DIVISIE_NAAM,
|
||||
DIVISIE_OMSCHRIJVING,
|
||||
FCLT_3D_AFDELING_KEY,
|
||||
AFDELING_CODE,
|
||||
AFDELING_OMSCHRIJVING,
|
||||
REGIO_OMSCHRIJVING,
|
||||
DISTRICT_OMSCHIJVING,
|
||||
FCLT_3D_LOCATIE_KEY,
|
||||
LOCATIE,
|
||||
LOCATIE_OMSCHRIJVING,
|
||||
LOCATIE_PLAATS,
|
||||
GEBOUW,
|
||||
VERDIEPING,
|
||||
RUIMTE,
|
||||
OPSTELLING,
|
||||
CAPACITEIT,
|
||||
NO_SHOW,
|
||||
ACTUAL_SHOWN,
|
||||
MANDAAT,
|
||||
PERSONEELSNR,
|
||||
FCLT_3D_DISCIPLINE_KEY,
|
||||
CATALOGUS_KEY,
|
||||
CATALOGUS,
|
||||
RESERVEERBARE_RUIMTE,
|
||||
BEZOEKERS,
|
||||
VAN,
|
||||
TOT,
|
||||
DUUR,
|
||||
STATUS,
|
||||
BOSTATUS,
|
||||
ACTIVITEIT,
|
||||
SRTACTIVITEIT_KEY,
|
||||
ACTIVITEITSOORT,
|
||||
OPMERKING,
|
||||
VISIBILITY,
|
||||
BEZORGMODE,
|
||||
VOORZIENING_DISCIPLINE_KEY,
|
||||
VOORZIENING_SOORT,
|
||||
VOORZIENING_CATALOGUS,
|
||||
LEVERANCIER,
|
||||
VOORZIENING_PRODUCT_KEY,
|
||||
VOORZIENING_PRODUCT,
|
||||
VOORZIENING_TYPE,
|
||||
VOORZIENING_DIEETWENSEN,
|
||||
VOORZIENING_TOTAALPRIJS,
|
||||
VOORZIENING_VAN,
|
||||
VOORZIENING_TOT,
|
||||
VOORZIENING_AANTAL,
|
||||
VOORZIENING_PRIJS
|
||||
)
|
||||
AS
|
||||
SELECT rrr.res_rsv_ruimte_key,
|
||||
res.res_reservering_key || '/' || rrr.res_rsv_ruimte_volgnr,
|
||||
rrr.res_rsv_ruimte_omschrijving,
|
||||
COALESCE (rrr.res_rsv_ruimte_aanmaak, voorz.van),
|
||||
rrr.res_rsv_ruimte_van,
|
||||
(SELECT prs_perslid_naam_full
|
||||
FROM prs_v_perslid_fullnames_all pf
|
||||
WHERE pf.prs_perslid_key = rrr.res_rsv_ruimte_host_key),
|
||||
DECODE (
|
||||
p.prs_perslid_visibility,
|
||||
1, (SELECT prs_perslid_naam_friendly
|
||||
FROM prs_v_perslid_fullnames_all pf
|
||||
WHERE pf.prs_perslid_key = rrr.res_rsv_ruimte_host_key),
|
||||
a.prs_afdeling_omschrijving)
|
||||
zichtbare_gastheer,
|
||||
(SELECT prs_perslid_naam_full
|
||||
FROM prs_v_perslid_fullnames_all pf
|
||||
WHERE pf.prs_perslid_key = rrr.res_rsv_ruimte_contact_key),
|
||||
(SELECT ph.prs_perslid_email
|
||||
FROM prs_perslid ph
|
||||
WHERE ph.prs_perslid_key = rrr.res_rsv_ruimte_host_key),
|
||||
(SELECT pc.prs_perslid_email
|
||||
FROM prs_perslid pc
|
||||
WHERE pc.prs_perslid_key = rrr.res_rsv_ruimte_contact_key),
|
||||
(SELECT pf.prs_perslid_naam_full
|
||||
FROM fac_tracking tr,
|
||||
fac_srtnotificatie str,
|
||||
prs_v_perslid_fullnames_all pf
|
||||
WHERE tr.prs_perslid_key = pf.prs_perslid_key
|
||||
AND str.fac_srtnotificatie_code = 'RESNEW'
|
||||
AND tr.fac_srtnotificatie_key = str.fac_srtnotificatie_key
|
||||
AND tr.fac_tracking_refkey = rrr.res_rsv_ruimte_key),
|
||||
(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 disc.prs_kostensoort_key
|
||||
FROM res_discipline disc
|
||||
WHERE disc.ins_discipline_key =
|
||||
COALESCE (
|
||||
voorz.ins_discipline_key,
|
||||
(SELECT ins_discipline_key
|
||||
FROM ins_tab_discipline d,
|
||||
res_ruimte_opstelling ro,
|
||||
res_ruimte rr
|
||||
WHERE rrr.res_ruimte_opstel_key =
|
||||
ro.res_ruimte_opstel_key
|
||||
AND ro.res_ruimte_key =
|
||||
rr.res_ruimte_key
|
||||
AND rr.res_discipline_key =
|
||||
d.ins_discipline_key))))
|
||||
kostensoortgroep,
|
||||
(SELECT ks.prs_kostensoort_oms
|
||||
FROM prs_kostensoort ks
|
||||
WHERE ks.prs_kostensoort_key =
|
||||
(SELECT disc.prs_kostensoort_key
|
||||
FROM res_discipline disc
|
||||
WHERE disc.ins_discipline_key =
|
||||
COALESCE (
|
||||
voorz.ins_discipline_key,
|
||||
(SELECT ins_discipline_key
|
||||
FROM ins_tab_discipline d,
|
||||
res_ruimte_opstelling ro,
|
||||
res_ruimte rr
|
||||
WHERE rrr.res_ruimte_opstel_key =
|
||||
ro.res_ruimte_opstel_key
|
||||
AND ro.res_ruimte_key =
|
||||
rr.res_ruimte_key
|
||||
AND rr.res_discipline_key =
|
||||
d.ins_discipline_key))))
|
||||
kostensoort,
|
||||
k.prs_kostenplaats_nr,
|
||||
k.prs_kostenplaats_omschrijving,
|
||||
k.prs_kostenplaats_extern,
|
||||
an.prs_afdeling_key,
|
||||
an.prs_afdeling_naam,
|
||||
an.prs_afdeling_omschrijving,
|
||||
a.prs_afdeling_key,
|
||||
a.prs_afdeling_naam,
|
||||
a.prs_afdeling_omschrijving,
|
||||
(SELECT rg.alg_regio_omschrijving
|
||||
FROM alg_regio rg,
|
||||
alg_district d,
|
||||
alg_locatie l,
|
||||
alg_gebouw g,
|
||||
alg_verdieping v,
|
||||
alg_ruimte r
|
||||
WHERE rg.alg_regio_key = d.alg_regio_key
|
||||
AND d.alg_district_key = l.alg_district_key
|
||||
AND l.alg_locatie_key = g.alg_locatie_key
|
||||
AND g.alg_gebouw_key = v.alg_gebouw_key
|
||||
AND v.alg_verdieping_key = r.alg_verdieping_key
|
||||
AND r.alg_ruimte_key = r2a.alg_ruimte_key),
|
||||
(SELECT d.alg_district_omschrijving
|
||||
FROM alg_district d,
|
||||
alg_locatie l,
|
||||
alg_gebouw g,
|
||||
alg_verdieping v,
|
||||
alg_ruimte r
|
||||
WHERE d.alg_district_key = l.alg_district_key
|
||||
AND l.alg_locatie_key = g.alg_locatie_key
|
||||
AND g.alg_gebouw_key = v.alg_gebouw_key
|
||||
AND v.alg_verdieping_key = r.alg_verdieping_key
|
||||
AND r.alg_ruimte_key = r2a.alg_ruimte_key),
|
||||
(SELECT l.alg_locatie_key
|
||||
FROM alg_locatie l,
|
||||
alg_gebouw g,
|
||||
alg_verdieping v,
|
||||
alg_ruimte r
|
||||
WHERE l.alg_locatie_key = g.alg_locatie_key
|
||||
AND g.alg_gebouw_key = v.alg_gebouw_key
|
||||
AND v.alg_verdieping_key = r.alg_verdieping_key
|
||||
AND r.alg_ruimte_key = r2a.alg_ruimte_key),
|
||||
(SELECT alg_locatie_code
|
||||
FROM alg_locatie l,
|
||||
alg_gebouw g,
|
||||
alg_verdieping v,
|
||||
alg_ruimte r
|
||||
WHERE l.alg_locatie_key = g.alg_locatie_key
|
||||
AND g.alg_gebouw_key = v.alg_gebouw_key
|
||||
AND v.alg_verdieping_key = r.alg_verdieping_key
|
||||
AND r.alg_ruimte_key = r2a.alg_ruimte_key),
|
||||
(SELECT alg_locatie_omschrijving
|
||||
FROM alg_locatie l,
|
||||
alg_gebouw g,
|
||||
alg_verdieping v,
|
||||
alg_ruimte r
|
||||
WHERE l.alg_locatie_key = g.alg_locatie_key
|
||||
AND g.alg_gebouw_key = v.alg_gebouw_key
|
||||
AND v.alg_verdieping_key = r.alg_verdieping_key
|
||||
AND r.alg_ruimte_key = r2a.alg_ruimte_key),
|
||||
(SELECT alg_locatie_plaats
|
||||
FROM alg_locatie l,
|
||||
alg_gebouw g,
|
||||
alg_verdieping v,
|
||||
alg_ruimte r
|
||||
WHERE l.alg_locatie_key = g.alg_locatie_key
|
||||
AND g.alg_gebouw_key = v.alg_gebouw_key
|
||||
AND v.alg_verdieping_key = r.alg_verdieping_key
|
||||
AND r.alg_ruimte_key = r2a.alg_ruimte_key),
|
||||
(SELECT alg_gebouw_code
|
||||
FROM alg_gebouw g, alg_verdieping v, alg_ruimte r
|
||||
WHERE g.alg_gebouw_key = v.alg_gebouw_key
|
||||
AND v.alg_verdieping_key = r.alg_verdieping_key
|
||||
AND r.alg_ruimte_key = r2a.alg_ruimte_key),
|
||||
(SELECT alg_verdieping_code
|
||||
FROM alg_verdieping v, alg_ruimte r
|
||||
WHERE v.alg_verdieping_key = r.alg_verdieping_key
|
||||
AND r.alg_ruimte_key = r2a.alg_ruimte_key),
|
||||
r2a.ruimte_nr,
|
||||
r2a.opstelling,
|
||||
r2a.capaciteit,
|
||||
rrr.res_rsv_ruimte_noshow,
|
||||
rrr.res_rsv_ruimte_bezoekers_shown,
|
||||
NVL ((SELECT pr.fac_profiel_limiet
|
||||
FROM fac_profiel pr
|
||||
WHERE p.fac_profiel_key = pr.fac_profiel_key),
|
||||
0),
|
||||
prs_perslid_nr,
|
||||
COALESCE (
|
||||
voorz.ins_discipline_key,
|
||||
(SELECT ins_discipline_key
|
||||
FROM ins_tab_discipline d,
|
||||
res_ruimte_opstelling ro,
|
||||
res_ruimte rr
|
||||
WHERE rrr.res_ruimte_opstel_key =
|
||||
ro.res_ruimte_opstel_key
|
||||
AND ro.res_ruimte_key = rr.res_ruimte_key
|
||||
AND rr.res_discipline_key = d.ins_discipline_key)),
|
||||
(SELECT ins_discipline_key
|
||||
FROM ins_tab_discipline d,
|
||||
res_ruimte_opstelling ro,
|
||||
res_ruimte rr
|
||||
WHERE rrr.res_ruimte_opstel_key = ro.res_ruimte_opstel_key
|
||||
AND ro.res_ruimte_key = rr.res_ruimte_key
|
||||
AND rr.res_discipline_key = d.ins_discipline_key),
|
||||
(SELECT ins_discipline_omschrijving
|
||||
FROM ins_tab_discipline d,
|
||||
res_ruimte_opstelling ro,
|
||||
res_ruimte rr
|
||||
WHERE rrr.res_ruimte_opstel_key = ro.res_ruimte_opstel_key
|
||||
AND ro.res_ruimte_key = rr.res_ruimte_key
|
||||
AND rr.res_discipline_key = d.ins_discipline_key),
|
||||
DECODE (rrr.alg_ruimte_key, NULL, 'Ja', 'Nee'),
|
||||
rrr.res_rsv_ruimte_bezoekers,
|
||||
rrr.res_rsv_ruimte_van,
|
||||
rrr.res_rsv_ruimte_tot,
|
||||
COALESCE ((rrr.res_rsv_ruimte_tot - rrr.res_rsv_ruimte_van) * 24,
|
||||
0),
|
||||
(SELECT res_status_fo_omschrijving
|
||||
FROM res_status_fo rs
|
||||
WHERE rs.res_status_fo_key = rrr.res_status_fo_key),
|
||||
(SELECT res_status_bo_omschrijving
|
||||
FROM res_status_bo rs
|
||||
WHERE rs.res_status_bo_key = rrr.res_status_bo_key),
|
||||
ra.res_activiteit_omschrijving,
|
||||
rsa.res_srtactiviteit_key,
|
||||
rsa.res_srtactiviteit_omschrijving,
|
||||
rrr.res_rsv_ruimte_opmerking,
|
||||
rrr.res_rsv_ruimte_visibility,
|
||||
DECODE (rrr.res_rsv_ruimte_cvab_mode,
|
||||
0, lcl.l ('lcl_res_afhalen'),
|
||||
1, lcl.l ('lcl_res_bezorgen'),
|
||||
''),
|
||||
voorz.ins_discipline_key,
|
||||
voorz.vtype,
|
||||
voorz.catalogus,
|
||||
(SELECT prs_bedrijf_naam
|
||||
FROM res_disc_params rdp, prs_bedrijf b
|
||||
WHERE rdp.prs_bedrijf_key = b.prs_bedrijf_key
|
||||
AND rdp.res_ins_discipline_key = voorz.ins_discipline_key),
|
||||
voorz.product_key,
|
||||
voorz.product,
|
||||
voorz.type_lunch,
|
||||
voorz.dieetwensen,
|
||||
voorz.totaalprijs,
|
||||
TO_CHAR (voorz.van, 'hh24:mi'),
|
||||
TO_CHAR (voorz.tot, 'hh24:mi'),
|
||||
voorz.aantal,
|
||||
voorz.prijs
|
||||
FROM res_v_aanwezigrsv_ruimte rrr,
|
||||
res_activiteit ra,
|
||||
res_srtactiviteit rsa,
|
||||
res_reservering res,
|
||||
prs_kostenplaats k,
|
||||
prs_perslid p,
|
||||
prs_afdeling a,
|
||||
prs_afdeling an,
|
||||
prs_v_afdeling_boom ab,
|
||||
( SELECT res_rsv_ruimte_key,
|
||||
MAX (o.res_opstelling_omschrijving) opstelling,
|
||||
MAX (ro.res_ruimte_opstel_bezoekers) capaciteit,
|
||||
MAX (ra.alg_ruimte_key) alg_ruimte_key,
|
||||
MAX (rr.res_ruimte_nr) ruimte_nr
|
||||
FROM res_rsv_ruimte r,
|
||||
res_ruimte_opstelling ro,
|
||||
res_opstelling o,
|
||||
res_ruimte rr,
|
||||
res_alg_ruimte ra
|
||||
WHERE r.res_rsv_ruimte_verwijder IS NULL
|
||||
AND r.res_ruimte_opstel_key = ro.res_ruimte_opstel_key
|
||||
AND ro.res_ruimte_key = rr.res_ruimte_key
|
||||
AND ro.res_opstelling_key = o.res_opstelling_key
|
||||
AND rr.res_ruimte_key = ra.res_ruimte_key
|
||||
GROUP BY res_rsv_ruimte_key
|
||||
UNION ALL
|
||||
SELECT res_rsv_ruimte_key,
|
||||
'' opstelling,
|
||||
NULL capaciteit,
|
||||
rrr.alg_ruimte_key,
|
||||
r.alg_ruimte_nr
|
||||
FROM res_rsv_ruimte rrr, alg_ruimte r
|
||||
WHERE rrr.alg_ruimte_key IS NOT NULL
|
||||
AND r.alg_ruimte_key = rrr.alg_ruimte_key) r2a,
|
||||
(SELECT rrd.res_rsv_ruimte_key
|
||||
res_rsv_ruimte_key,
|
||||
-rd.res_deel_key
|
||||
product_key,
|
||||
rd.res_deel_omschrijving
|
||||
product,
|
||||
NULL
|
||||
type_lunch,
|
||||
NULL
|
||||
dieetwensen,
|
||||
DECODE (
|
||||
rd.res_deel_prijs_vast,
|
||||
1, NVL (rrd.res_rsv_deel_prijs, rd.res_deel_prijs),
|
||||
(rrd.res_rsv_deel_tot - rrd.res_rsv_deel_van)
|
||||
* 24
|
||||
* NVL (rrd.res_rsv_deel_prijs, rd.res_deel_prijs))
|
||||
totaalprijs,
|
||||
rrd.res_rsv_deel_van
|
||||
van,
|
||||
rrd.res_rsv_deel_tot
|
||||
tot,
|
||||
(rrd.res_rsv_deel_tot - rrd.res_rsv_deel_van) * 24
|
||||
aantal,
|
||||
NVL (rrd.res_rsv_deel_prijs, rd.res_deel_prijs)
|
||||
prijs,
|
||||
c.ins_discipline_key
|
||||
ins_discipline_key,
|
||||
c.ins_discipline_omschrijving
|
||||
catalogus,
|
||||
'object'
|
||||
vtype
|
||||
FROM res_v_aanwezigrsv_deel rrd,
|
||||
res_deel rd,
|
||||
ins_deel d,
|
||||
ins_tab_discipline c
|
||||
WHERE rrd.res_deel_key = rd.res_deel_key
|
||||
AND d.ins_deel_key = rd.res_ins_deel_key
|
||||
AND rrd.res_rsv_ruimte_key IS NOT NULL
|
||||
AND c.ins_discipline_key = rd.res_discipline_key
|
||||
UNION ALL
|
||||
SELECT rra.res_rsv_ruimte_key
|
||||
res_rsv_ruimte_key,
|
||||
ra.res_artikel_key
|
||||
product_key,
|
||||
ra.res_artikel_omschrijving
|
||||
product,
|
||||
CASE
|
||||
WHEN ra.res_artikel_key = 41
|
||||
THEN
|
||||
(SELECT f.fac_usrdata_omschr
|
||||
FROM res_kenmerkartikel rka, fac_usrdata f
|
||||
WHERE rra.res_rsv_artikel_key =
|
||||
rka.res_rsv_artikel_key
|
||||
AND rka.res_kenmerk_key = 61 -- soort lunch utrecht
|
||||
AND rka.res_kenmerkartikel_waarde =
|
||||
TO_CHAR (f.fac_usrdata_key))
|
||||
WHEN ra.res_artikel_key = 61
|
||||
THEN
|
||||
(SELECT f.fac_usrdata_omschr
|
||||
FROM res_kenmerkartikel rka, fac_usrdata f
|
||||
WHERE rra.res_rsv_artikel_key =
|
||||
rka.res_rsv_artikel_key
|
||||
AND rka.res_kenmerk_key = 82 -- soort lunch amsterdam
|
||||
AND rka.res_kenmerkartikel_waarde =
|
||||
TO_CHAR (f.fac_usrdata_key))
|
||||
ELSE
|
||||
NULL
|
||||
END
|
||||
type_lunch,
|
||||
CASE
|
||||
WHEN ra.res_artikel_key = 41
|
||||
THEN
|
||||
(SELECT rka.res_kenmerkartikel_waarde
|
||||
FROM res_kenmerkartikel rka
|
||||
WHERE rra.res_rsv_artikel_key =
|
||||
rka.res_rsv_artikel_key
|
||||
AND rka.res_kenmerk_key = 102)
|
||||
WHEN ra.res_artikel_key = 61
|
||||
THEN
|
||||
(SELECT rka.res_kenmerkartikel_waarde
|
||||
FROM res_kenmerkartikel rka
|
||||
WHERE rra.res_rsv_artikel_key =
|
||||
rka.res_rsv_artikel_key
|
||||
AND rka.res_kenmerk_key = 101)
|
||||
WHEN ra.res_artikel_key = 81
|
||||
THEN
|
||||
(SELECT rka.res_kenmerkartikel_waarde
|
||||
FROM res_kenmerkartikel rka
|
||||
WHERE rra.res_rsv_artikel_key =
|
||||
rka.res_rsv_artikel_key
|
||||
AND rka.res_kenmerk_key = 181)
|
||||
ELSE
|
||||
NULL
|
||||
END
|
||||
dieetwensen,
|
||||
NVL (rra.res_rsv_artikel_prijs,
|
||||
rra.res_rsv_artikel_aantal * res_artikel_prijs)
|
||||
totaalprijs,
|
||||
rra.res_rsv_artikel_levering
|
||||
van,
|
||||
NULL
|
||||
tot,
|
||||
rra.res_rsv_artikel_aantal
|
||||
aantal,
|
||||
NVL (
|
||||
rra.res_rsv_artikel_prijs / rra.res_rsv_artikel_aantal,
|
||||
res_artikel_prijs)
|
||||
prijs,
|
||||
c.ins_discipline_key
|
||||
ins_discipline_key,
|
||||
c.ins_discipline_omschrijving
|
||||
catalogus,
|
||||
'consumable'
|
||||
vtype
|
||||
FROM res_v_aanwezigrsv_artikel rra,
|
||||
res_artikel ra,
|
||||
ins_tab_discipline c
|
||||
WHERE rra.res_artikel_key = ra.res_artikel_key
|
||||
AND ra.res_discipline_key = c.ins_discipline_key) voorz
|
||||
WHERE rrr.res_reservering_key = res.res_reservering_key
|
||||
AND rrr.res_rsv_ruimte_key = r2a.res_rsv_ruimte_key(+)
|
||||
AND rrr.prs_kostenplaats_key = k.prs_kostenplaats_key(+)
|
||||
AND rrr.res_rsv_ruimte_key = voorz.res_rsv_ruimte_key
|
||||
AND rrr.res_activiteit_key = ra.res_activiteit_key
|
||||
AND ra.res_srtactiviteit_key = rsa.res_srtactiviteit_key
|
||||
AND rrr.res_rsv_ruimte_host_key = p.prs_perslid_key
|
||||
AND p.prs_afdeling_key = a.prs_afdeling_key
|
||||
AND p.prs_afdeling_key = ab.prs_afdeling_key
|
||||
AND ab.prs_afdeling_key1 = an.prs_afdeling_key
|
||||
AND ( rrr.res_ruimte_opstel_key IS NOT NULL
|
||||
OR voorz.res_rsv_ruimte_key IS NOT NULL)
|
||||
AND rrr.res_rsv_ruimte_van >= TO_DATE ('01-01-2010', 'DD-MM-YYYY');
|
||||
|
||||
|
||||
|
||||
------ payload end ------
|
||||
|
||||
SET DEFINE OFF
|
||||
BEGIN adm.systrackscriptId ('$Id$', 0); END;
|
||||
/
|
||||
|
||||
COMMIT;
|
||||
SET ECHO OFF
|
||||
SPOOL OFF
|
||||
SET DEFINE ON
|
||||
PROMPT Logfile of this upgrade is: &fcltlogfile
|
||||
Reference in New Issue
Block a user