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

PROR#74299 -- Inrichten Prorail omgeving, Eurest export aanpassing

Browse Source 
svn path=/Customer/trunk/; revision=62256
This commit is contained in:
Norbert Wassink
2023-10-18 15:00:50 +00:00
parent 10c6c486c3
commit 7d5433ec45
1 changed files with 4 additions and 17 deletions
Download Patch File Download Diff File Expand all files Collapse all files

21
PROR/PROR.sql
View File

@@ -1525,17 +1525,14 @@ AS
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,
ra.res_artikel_groep soort_locatie,
rrr.res_activiteit_key activiteit_key
FROM res_rsv_artikel rra,
res_artikel ra,
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 rra.res_artikel_key = ra.res_artikel_key
AND rrr.prs_kostenplaats_key = k.prs_kostenplaats_key(+)
AND rrr.res_status_bo_key = 2 -- afgemeld
AND rrr.res_status_fo_key = 2
AND p.prs_perslid_key=rrr.res_rsv_ruimte_contact_key
@@ -1586,17 +1583,14 @@ AS
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,
ra.res_artikel_groep soort_locatie,
rrr.res_activiteit_key activiteit_key
FROM res_rsv_artikel rra,
res_artikel ra,
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 rra.res_artikel_key = ra.res_artikel_key
AND rrr.res_status_fo_key = 2 -- vervallen en te laat uit outllok afgemeld
AND rrr.res_rsv_ruimte_cvab_mode IS NOT NULL -- vervallen en te laat uit outllok afgemeld
AND p.prs_perslid_key=rrr.res_rsv_ruimte_contact_key
@@ -1640,18 +1634,15 @@ AS
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,
ra.res_artikel_groep soort_locatie,
AND alg.alg_ruimte_key = rarm.alg_ruimte_key)) ruimtenr,
rrr.res_activiteit_key activiteit_key
FROM res_rsv_artikel rra,
res_artikel ra,
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 rra.res_artikel_key = ra.res_artikel_key
AND rrr.res_status_fo_key = 4 -- vervallen en te laat uit outllok afgemeld
AND rrr.res_status_bo_key = 2 -- vervallen en te laat uit outllok afgemeld
AND p.prs_perslid_key=rrr.res_rsv_ruimte_contact_key
@@ -1785,12 +1776,8 @@ BEGIN
LOOP
pror.add_xml_row(v_bestand, '<OrderLine>');
pror.add_xml_element (v_bestand, 'Start',TO_CHAR(rec_art.van,'HH24:MI'));
pror.add_xml_row(v_bestand, '<Item>');
IF UPPER(rec_art.catalogus) LIKE 'MAATWERK%' THEN
pror.add_xml_element (v_bestand, 'Description',SUBSTR(rec_art.artikel_omschrijving||', '||rec_art.opmerking,1,100));
ELSE
pror.add_xml_element (v_bestand, 'Description',rec_art.artikel_omschrijving);
END IF;
pror.add_xml_row(v_bestand, '<Item>');
pror.add_xml_element (v_bestand, 'Description',rec_art.artikel_omschrijving);
pror.add_xml_element (v_bestand, 'Reference',rec_art.artikelnr);
pror.add_xml_row(v_bestand, '</Item>');