PROR#86510 -- Rapportage aangepast zodat niet de eurest view gebruikt wordt maar eigen view

svn path=/Customer/trunk/; revision=67988
This commit is contained in:
Norbert Wassink
2025-02-14 13:02:55 +00:00
parent 0f1561dcb6
commit 06e39fd860

View File

@@ -1495,6 +1495,182 @@ AS
AND b.prs_bedrijf_key = pdl.prs_bedrijf_key
AND m.melding_key=ms.mld_stdmelding_key(+);
-- VIEW TBV Financiele caterng rappoortage
CREATE OR REPLACE VIEW pror_v_select_catering
AS
SELECT distinct rra.res_rsv_ruimte_key rrr_key,
rrr.res_reservering_key||'/'||rrr.res_rsv_ruimte_volgnr reservering,
rrr.res_rsv_ruimte_opmerking opmerking,
'Regulier' extra_opmerking,
rrr.res_rsv_ruimte_van van,
rrr.res_rsv_ruimte_tot tot,
(SELECT prs_perslid_naam_friendly
FROM prs_v_perslid_fullnames
WHERE prs_perslid_key=rrr.res_rsv_ruimte_contact_key) aanvrager,
p.prs_perslid_telefoonnr telefoon,
p.prs_perslid_email email,
k.prs_kostenplaats_key,
k.prs_kostenplaats_nr kostenplaats,
k.prs_kostenplaats_omschrijving,
COALESCE (
(SELECT alg_locatie_code||'-'||alg_gebouw_upper||'-'||alg_ruimte_nr
FROM alg_v_ruimte_gegevens alg
WHERE alg.alg_ruimte_key=rrr.alg_ruimte_key),
(SELECT alg_locatie_code||'-'||alg_gebouw_upper||'-'||MIN(alg.alg_ruimte_nr)
FROM res_ruimte_opstelling rro, res_ruimte rr, res_alg_ruimte rarm, alg_v_ruimte_gegevens_all alg
WHERE rrr.res_ruimte_opstel_key = rro.res_ruimte_opstel_key
AND rr.res_ruimte_key = rro.res_ruimte_key
AND rarm.res_ruimte_key = rr.res_ruimte_key
AND rarm.res_alg_ruimte_verwijder IS NULL
AND alg.alg_ruimte_key = rarm.alg_ruimte_key
GROUP BY alg_locatie_code,alg_gebouw_upper,alg_verdieping_code)) loc_gb_ruimtenr,
COALESCE (
(SELECT alg_ruimte_nr
FROM alg_v_ruimte_gegevens alg
WHERE alg.alg_ruimte_key=rrr.alg_ruimte_key),
(SELECT MIN(alg.alg_ruimte_nr)
FROM res_ruimte_opstelling rro, res_ruimte rr, res_alg_ruimte rarm, alg_v_ruimte_gegevens_all alg
WHERE rrr.res_ruimte_opstel_key = rro.res_ruimte_opstel_key
AND rr.res_ruimte_key = rro.res_ruimte_key
AND rarm.res_ruimte_key = rr.res_ruimte_key
AND rarm.res_alg_ruimte_verwijder IS NULL
AND alg.alg_ruimte_key = rarm.alg_ruimte_key)) ruimtenr,
rrr.res_activiteit_key activiteit_key
FROM res_rsv_artikel rra,
res_rsv_ruimte rrr,
prs_kostenplaats k,
prs_v_perslid_gegevens p
WHERE rrr.res_rsv_ruimte_van > TO_DATE('01-05-2022','DD-MM-YYYY')
AND rrr.res_rsv_ruimte_key = rra.res_rsv_ruimte_key
AND rrr.prs_kostenplaats_key = k.prs_kostenplaats_key(+)
AND rrr.res_status_bo_key = 2
AND rrr.res_status_fo_key = 2
AND p.prs_perslid_key=rrr.res_rsv_ruimte_contact_key
AND rra.res_rsv_artikel_verwijder IS NULL
AND rrr.res_rsv_ruimte_verwijder IS NULL
UNION -- alle bezrogde reserveringn
SELECT distinct rra.res_rsv_ruimte_key rrr_key,
rrr.res_reservering_key||'/'||rrr.res_rsv_ruimte_volgnr reservering,
rrr.res_rsv_ruimte_opmerking opmerking,
'Bezorgen' extra_opmerking,
rrr.res_rsv_ruimte_van van,
rrr.res_rsv_ruimte_tot tot,
(SELECT prs_perslid_naam_friendly
FROM prs_v_perslid_fullnames
WHERE prs_perslid_key=rrr.res_rsv_ruimte_contact_key) aanvrager,
p.prs_perslid_telefoonnr telefoon,
p.prs_perslid_email email,
k.prs_kostenplaats_key,
k.prs_kostenplaats_nr kostenplaats,
k.prs_kostenplaats_omschrijving,
-- b.prs_bedrijf_key,
-- b.prs_overeenkomst_nr,
COALESCE (
(SELECT alg_locatie_code||'-'||alg_gebouw_upper||'-'||alg_ruimte_nr
FROM alg_v_ruimte_gegevens alg
WHERE alg.alg_ruimte_key=rrr.alg_ruimte_key),
(SELECT alg_locatie_code||'-'||alg_gebouw_upper||'-'||MIN(alg.alg_ruimte_nr)
FROM res_ruimte_opstelling rro, res_ruimte rr, res_alg_ruimte rarm, alg_v_ruimte_gegevens_all alg
WHERE rrr.res_ruimte_opstel_key = rro.res_ruimte_opstel_key
AND rr.res_ruimte_key = rro.res_ruimte_key
AND rarm.res_ruimte_key = rr.res_ruimte_key
AND rarm.res_alg_ruimte_verwijder IS NULL
AND alg.alg_ruimte_key = rarm.alg_ruimte_key
GROUP BY alg_locatie_code,alg_gebouw_upper,alg_verdieping_code)) loc_gb_ruimtenr,
COALESCE (
(SELECT alg_ruimte_nr
FROM alg_v_ruimte_gegevens alg
WHERE alg.alg_ruimte_key=rrr.alg_ruimte_key),
(SELECT MIN(alg.alg_ruimte_nr)
FROM res_ruimte_opstelling rro, res_ruimte rr, res_alg_ruimte rarm, alg_v_ruimte_gegevens_all alg
WHERE rrr.res_ruimte_opstel_key = rro.res_ruimte_opstel_key
AND rr.res_ruimte_key = rro.res_ruimte_key
AND rarm.res_ruimte_key = rr.res_ruimte_key
AND rarm.res_alg_ruimte_verwijder IS NULL
AND alg.alg_ruimte_key = rarm.alg_ruimte_key)) ruimtenr,
rrr.res_activiteit_key activiteit_key
FROM res_rsv_artikel rra,
res_rsv_ruimte rrr,
prs_kostenplaats k,
prs_v_perslid_gegevens p
WHERE rrr.res_rsv_ruimte_van > TO_DATE('01-05-2022','DD-MM-YYYY')
AND rrr.res_rsv_ruimte_key = rra.res_rsv_ruimte_key
AND rrr.prs_kostenplaats_key = k.prs_kostenplaats_key(+)
AND rrr.res_status_fo_key = 2 -- Alleen definitieve res
AND rrr.res_rsv_ruimte_cvab_mode IS NOT NULL -- betreft een losse catering
AND p.prs_perslid_key=rrr.res_rsv_ruimte_contact_key
UNION -- alle te laat verwijderde outlook reservereingen met catering
SELECT distinct rrr.res_rsv_ruimte_key rrr_key,
rrr.res_reservering_key||'/'||rrr.res_rsv_ruimte_volgnr reservering,
rrr.res_rsv_ruimte_opmerking opmerking,
'Te late annulering' extra_opmerking,
rrr.res_rsv_ruimte_van van,
rrr.res_rsv_ruimte_tot tot,
(SELECT prs_perslid_naam_friendly FROM prs_v_perslid_fullnames WHERE prs_perslid_key=rrr.res_rsv_ruimte_contact_key) aanvrager,
p.prs_perslid_telefoonnr telefoon,
p.prs_perslid_email email,
k.prs_kostenplaats_key,
k.prs_kostenplaats_nr kostenplaats,
k.prs_kostenplaats_omschrijving,
COALESCE (
(SELECT alg_locatie_code||'-'||alg_gebouw_upper||'-'||alg_ruimte_nr
FROM alg_v_ruimte_gegevens alg
WHERE alg.alg_ruimte_key=rrr.alg_ruimte_key),
(SELECT alg_locatie_code||'-'||alg_gebouw_upper||'-'||MIN(alg.alg_ruimte_nr)
FROM res_ruimte_opstelling rro, res_ruimte rr, res_alg_ruimte rarm, alg_v_ruimte_gegevens_all alg
WHERE rrr.res_ruimte_opstel_key = rro.res_ruimte_opstel_key
AND rr.res_ruimte_key = rro.res_ruimte_key
AND rarm.res_ruimte_key = rr.res_ruimte_key
AND rarm.res_alg_ruimte_verwijder IS NULL
AND alg.alg_ruimte_key = rarm.alg_ruimte_key
GROUP BY alg_locatie_code,alg_gebouw_upper,alg_verdieping_code)) loc_gb_ruimtenr,
COALESCE (
(SELECT alg_ruimte_nr
FROM alg_v_ruimte_gegevens alg
WHERE alg.alg_ruimte_key=rrr.alg_ruimte_key),
(SELECT MIN(alg.alg_ruimte_nr)
FROM res_ruimte_opstelling rro, res_ruimte rr, res_alg_ruimte rarm, alg_v_ruimte_gegevens_all alg
WHERE rrr.res_ruimte_opstel_key = rro.res_ruimte_opstel_key
AND rr.res_ruimte_key = rro.res_ruimte_key
AND rarm.res_ruimte_key = rr.res_ruimte_key
AND rarm.res_alg_ruimte_verwijder IS NULL
AND alg.alg_ruimte_key = rarm.alg_ruimte_key)) ruimtenr,
rrr.res_activiteit_key activiteit_key
FROM res_rsv_ruimte rrr,
prs_kostenplaats k,
prs_v_perslid_gegevens p,
(SElECT r.*,
(SELECT MAX(rdp.res_disc_params_cancel_dagen) annuleer_dagen
FROM res_rsv_artikel rra, res_artikel ra, res_discipline rd, res_disc_params rdp
WHERE res_rsv_ruimte_key = r.res_rsv_ruimte_key
AND ra.res_artikel_key = rra.res_artikel_key
AND ra.res_discipline_key = rd.ins_discipline_key
AND rdp.res_ins_discipline_key=rd.ins_discipline_key) annuleer_dagen
FROM (SELECT DISTINCT
res.res_rsv_ruimte_key res_rsv_ruimte_key,
res.res_reservering_key res_reservering_key,
res.res_rsv_ruimte_volgnr res_rsv_ruimte_volgnr,
res.res_rsv_ruimte_host_key gastheer_key,
res.res_rsv_ruimte_verwijder datum_verwijder,
fac.safe_to_date (
TO_CHAR (res.res_rsv_ruimte_van, 'DD-MM-YYYY')||' 12:00',
'DD-MM-YYYY HH24:MI') leverdatum
FROM res_rsv_ruimte res, res_rsv_artikel rra
WHERE res.res_rsv_ruimte_verwijder IS NOT NULL
AND res.res_rsv_ruimte_externnr IS NOT NULL
-- AND res.res_status_fo_key=4
AND rra.res_rsv_ruimte_key=res.res_rsv_ruimte_key) r) x
WHERE rrr.res_rsv_ruimte_van > TO_DATE('01-05-2022','DD-MM-YYYY')
AND rrr.res_rsv_ruimte_key = x.res_rsv_ruimte_key
AND rrr.prs_kostenplaats_key = k.prs_kostenplaats_key(+)
AND p.prs_perslid_key=rrr.res_rsv_ruimte_contact_key
AND x.datum_verwijder> x.leverdatum - x.annuleer_dagen -- bepalen of de annulering te laat was
AND rrr.res_rsv_ruimte_key NOT IN (SELECT rkw.res_rsv_ruimte_key -- deze zijn door kenmerk uitgesloten van facturatie (aangegeven door cateraar)
FROM res_kenmerkwaarde rkw, res_kenmerk rk
WHERE rkw.res_rsv_ruimte_key = rrr.res_rsv_ruimte_key
AND rkw.res_kenmerk_key = rk.res_kenmerk_key
AND rk.res_kenmerk_omschrijving='Niet factureren');
CREATE OR REPLACE VIEW pror_v_fin_catering_rapport
(
@@ -1564,7 +1740,7 @@ AS
FROM res_kenmerk k
WHERE k.res_kenmerk_omschrijving='ExternSyncDatum'
AND k.res_activiteit_key = p.activiteit_key) kenmerk_sync_key
FROM pror_v_select_eurest_cat p,
FROM pror_v_select_catering p,
( SELECT rra.res_rsv_ruimte_key,
rra.res_rsv_artikel_key,
rra.res_rsv_artikel_aantal aantal,
@@ -1661,6 +1837,9 @@ END;
/
-- EINDE PROVAT EXPORT
-- EXPORT VAN CATERING BESTELLINGE TBV Eurest
--
-- VIEW TBV EUREST EXPORT (ook gebruikt in rapportage)