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

BLCC#51930 TF-export+rap/Logica ombouwen naar 50900 (incl 6,5%)

Browse Source 
svn path=/Customer/trunk/; revision=36754
This commit is contained in:
Maarten van der Heide
2018-01-29 09:10:49 +00:00
parent 668802c168
commit cfeb3f65a4
1 changed files with 54 additions and 43 deletions
Download Patch File Download Diff File Expand all files Collapse all files

97
BLCC/blcc.sql
View File

@@ -946,21 +946,20 @@ AS
|| sm.mld_stdmelding_omschrijving
|| ']'
|| DECODE (km.mld_kenmerkmelding_waarde, NULL, '', ' (=' || km.mld_kenmerkmelding_waarde || ')'),
o.mld_opdr_kosten,
ROUND (o.mld_opdr_kosten * 1.065, 2), -- Management fee 6,5%
NULL,
'VH',
COALESCE (ksm.prs_kostensoort_refcode, ksv.prs_kostensoort_refcode),
NULL,
km.mld_kenmerkmelding_waarde,
NULL,
NULL
FROM mld_opdr o,
fac_tracking t,
mld_v_aanwezigkenmerkopdr ko,
mld_kenmerk k,
mld_melding m,
(SELECT *
FROM mld_v_aanwezigkenmerkmelding
WHERE mld_kenmerk_key = 241) km, -- Refnr. aanvrager
(SELECT km.mld_melding_key, km.mld_kenmerkmelding_waarde
FROM mld_v_aanwezigkenmerkmelding km, mld_kenmerk k
WHERE km.mld_kenmerk_key = k.mld_kenmerk_key
AND k.mld_srtkenmerk_key = 281) km, -- Refnr. aanvrager
prs_perslid p,
prs_v_afdeling_boom ab,
prs_kenmerklink kl,
@@ -973,14 +972,9 @@ AS
prs_kostenplaats kp,
prs_bedrijf b
WHERE o.mld_statusopdr_key = 9 -- Afgerond
--AND o.mld_opdr_ordernr IS NULL Sommige wel, sommige niet!
--AND o.mld_opdr_ordernr IS NULL -- Sommige wel, sommige niet!
AND o.mld_opdr_key = t.fac_tracking_refkey
AND t.fac_srtnotificatie_key = 70 -- ORDAFR
AND o.mld_opdr_key = ko.mld_opdr_key
AND ko.mld_kenmerk_key = k.mld_kenmerk_key
--AND k.mld_srtkenmerk_key = 61 -- Doorbelasten-vinkje
AND k.mld_srtkenmerk_key = 241 -- Doorbelasten-Ja/Nee
AND ko.mld_kenmerkopdr_waarde = '281' -- Ja
AND o.mld_melding_key = m.mld_melding_key
AND m.mld_melding_key = km.mld_melding_key(+)
AND m.prs_perslid_key_voor = p.prs_perslid_key
@@ -995,6 +989,8 @@ AS
AND sm.prs_kostensoort_key = ksm.prs_kostensoort_key(+)
AND td.prs_kostensoort_key = ksv.prs_kostensoort_key(+)
AND o.prs_kostenplaats_key = kp.prs_kostenplaats_key
--AND kp.prs_kostenplaats_upper LIKE '50900%'
AND SUBSTR (kp.prs_kostenplaats_upper, 1, 5) = '50900'
AND o.mld_uitvoerende_keys = b.prs_bedrijf_key
UNION ALL -- "Normale" catering gegroepeerd per debiteur/kostensoort
SELECT TO_CHAR (reslev, 'yyyy-mm'),
@@ -1105,7 +1101,7 @@ AS
NULL,
'VH',
prs_kostensoort_refcode,
NULL,
MIN (res_kenmerkreservering_waarde),
NULL,
NULL
FROM (SELECT rrr.res_reservering_key || '/' || rrr.res_rsv_ruimte_volgnr
@@ -1123,7 +1119,8 @@ AS
'Ruimte ' || rr.res_ruimte_nr res_voorziening,
rrr.res_rsv_ruimte_van reslev,
rrr.res_rsv_ruimte_prijs - COALESCE (rrr.res_rsv_ruimte_korting, 0) verw_prijs,
res.getruimteprijs (rrr.res_rsv_ruimte_key) - COALESCE (rrr.res_rsv_ruimte_korting, 0) prijs
res.getruimteprijs (rrr.res_rsv_ruimte_key) - COALESCE (rrr.res_rsv_ruimte_korting, 0) prijs,
kw.res_kenmerkreservering_waarde
FROM res_v_aanwezigrsv_ruimte rrr,
res_ruimte_opstelling rro,
( SELECT res_ruimte_key, MAX (alg_ruimte_key) alg_ruimte_key
@@ -1140,7 +1137,11 @@ AS
prs_kenmerklink kl,
res_ruimte rr,
res_discipline rd,
prs_kostensoort ks
prs_kostensoort ks,
(SELECT kw.res_rsv_ruimte_key, kw.res_kenmerkreservering_waarde
FROM res_v_aanwezigkenmerkwaarde kw, res_kenmerk k
WHERE kw.res_kenmerk_key = k.res_kenmerk_key
AND k.res_srtkenmerk_key = 1) kw -- Refnr. aanvrager
WHERE rrr.res_activiteit_key = 130 -- Evenement
AND rrr.res_ruimte_opstel_key = rro.res_ruimte_opstel_key -- Alleen Ruimte-reserveringen!
AND rro.res_ruimte_key = rar1.res_ruimte_key(+)
@@ -1155,6 +1156,7 @@ AS
AND COALESCE (rar1.res_ruimte_key, rar2.res_ruimte_key) = rr.res_ruimte_key
AND rr.res_discipline_key = rd.ins_discipline_key
AND rd.prs_kostensoort_key = ks.prs_kostensoort_key(+)
AND rrr.res_rsv_ruimte_key = kw.res_rsv_ruimte_key(+)
AND rrr.res_status_bo_key != 6 -- AV
AND rrr.res_rsv_ruimte_dirtlevel = 0
AND rrr.res_rsv_ruimte_van > TO_DATE ('20170901', 'yyyymmdd')
@@ -1175,7 +1177,8 @@ AS
rd.ins_discipline_omschrijving res_voorziening,
rra.res_rsv_artikel_levering reslev,
rra.res_rsv_artikel_prijs verw_prijs,
rra.res_rsv_artikel_aantal * ra.res_artikel_prijs prijs
rra.res_rsv_artikel_aantal * ra.res_artikel_prijs prijs,
kw.res_kenmerkreservering_waarde
FROM res_rsv_ruimte rrr,
res_ruimte_opstelling rro,
( SELECT res_ruimte_key, MAX (alg_ruimte_key) alg_ruimte_key
@@ -1195,7 +1198,11 @@ AS
res_discipline rd,
res_disc_params dp,
prs_bedrijf b,
prs_kostensoort ks
prs_kostensoort ks,
(SELECT kw.res_rsv_ruimte_key, kw.res_kenmerkreservering_waarde
FROM res_v_aanwezigkenmerkwaarde kw, res_kenmerk k
WHERE kw.res_kenmerk_key = k.res_kenmerk_key
AND k.res_srtkenmerk_key = 1) kw -- Refnr. aanvrager
WHERE rrr.res_activiteit_key = 130 -- Evenement
AND rrr.res_rsv_ruimte_dirtlevel = 0
AND rrr.res_ruimte_opstel_key = rro.res_ruimte_opstel_key(+)
@@ -1221,6 +1228,7 @@ AS
AND dp.prs_bedrijf_key = b.prs_bedrijf_key
--AND ks.prs_kostensoort_doorbelasten(+) = 1
AND rd.prs_kostensoort_key = ks.prs_kostensoort_key(+)
AND rrr.res_rsv_ruimte_key = kw.res_rsv_ruimte_key(+)
AND rra.res_rsv_artikel_dirtlevel = 0
AND rra.res_rsv_artikel_levering > TO_DATE ('20170901', 'yyyymmdd')
AND rra.res_rsv_artikel_levering < SYSDATE)
@@ -1282,21 +1290,20 @@ AS
|| sm.mld_stdmelding_omschrijving
|| ']'
|| DECODE (km.mld_kenmerkmelding_waarde, NULL, '', ' (=' || km.mld_kenmerkmelding_waarde || ')'),
o.mld_opdr_kosten,
ROUND (o.mld_opdr_kosten * 1.065, 2), -- Management fee 6,5%
NULL,
'VH',
COALESCE (ksm.prs_kostensoort_refcode, ksv.prs_kostensoort_refcode),
NULL,
km.mld_kenmerkmelding_waarde,
NULL,
NULL
FROM mld_opdr o,
fac_tracking t,
mld_v_aanwezigkenmerkopdr ko,
mld_kenmerk k,
mld_melding m,
(SELECT *
FROM mld_v_aanwezigkenmerkmelding
WHERE mld_kenmerk_key = 241) km, -- Refnr. aanvrager
(SELECT km.mld_melding_key, km.mld_kenmerkmelding_waarde
FROM mld_v_aanwezigkenmerkmelding km, mld_kenmerk k
WHERE km.mld_kenmerk_key = k.mld_kenmerk_key
AND k.mld_srtkenmerk_key = 281) km, -- Refnr. aanvrager
prs_perslid p,
prs_v_afdeling_boom ab,
prs_kenmerklink kl,
@@ -1312,10 +1319,6 @@ AS
AND o.mld_statusopdr_key = 7 -- Zou zo moeten zijn!
AND o.mld_opdr_key = t.fac_tracking_refkey
AND t.fac_srtnotificatie_key = 70 -- ORDAFR
AND o.mld_opdr_key = ko.mld_opdr_key
AND ko.mld_kenmerk_key = k.mld_kenmerk_key
AND k.mld_srtkenmerk_key = 241 -- Doorbelasten-Ja/Nee
AND ko.mld_kenmerkopdr_waarde = '281' -- Ja
AND o.mld_melding_key = m.mld_melding_key
AND m.mld_melding_key = km.mld_melding_key(+)
AND m.prs_perslid_key_voor = p.prs_perslid_key
@@ -1330,6 +1333,8 @@ AS
AND sm.prs_kostensoort_key = ksm.prs_kostensoort_key(+)
AND td.prs_kostensoort_key = ksv.prs_kostensoort_key(+)
AND o.prs_kostenplaats_key = kp.prs_kostenplaats_key
--AND kp.prs_kostenplaats_upper LIKE '50900%'
AND SUBSTR (kp.prs_kostenplaats_upper, 1, 5) = '50900'
AND o.mld_uitvoerende_keys = b.prs_bedrijf_key
UNION ALL -- "Normale" catering gegroepeerd per debiteur/kostensoort!
SELECT TO_CHAR (TRUNC (resver, 'mm') - 1, 'yyyy-mm'),
@@ -1429,7 +1434,7 @@ AS
NULL,
'VH',
prs_kostensoort_refcode,
NULL,
MIN (res_kenmerkreservering_waarde),
NULL,
NULL
FROM (SELECT rrr.res_reservering_key || '/' || rrr.res_rsv_ruimte_volgnr
@@ -1443,7 +1448,8 @@ AS
rrr.res_rsv_ruimte_key res_item_key,
'Ruimte ' || rr.res_ruimte_nr res_voorziening,
fac.gettrackingdate ('RESVER', rrr.res_rsv_ruimte_key) resver,
COALESCE (rrr.res_rsv_ruimte_prijs, 0) - COALESCE (rrr.res_rsv_ruimte_korting, 0) verw_prijs
COALESCE (rrr.res_rsv_ruimte_prijs, 0) - COALESCE (rrr.res_rsv_ruimte_korting, 0) verw_prijs,
kw.res_kenmerkreservering_waarde
FROM res_rsv_ruimte rrr,
prs_perslid p,
prs_v_afdeling_boom ab,
@@ -1460,7 +1466,11 @@ AS
alg_v_allonroerendgoed aog,
res_ruimte rr,
res_discipline rd,
prs_kostensoort ks
prs_kostensoort ks,
(SELECT kw.res_rsv_ruimte_key, kw.res_kenmerkreservering_waarde
FROM res_v_aanwezigkenmerkwaarde kw, res_kenmerk k
WHERE kw.res_kenmerk_key = k.res_kenmerk_key
AND k.res_srtkenmerk_key = 1) kw -- Refnr. aanvrager
WHERE rrr.res_activiteit_key = 130 -- Evenement
AND rrr.res_rsv_ruimte_host_key = p.prs_perslid_key
AND p.prs_afdeling_key = ab.prs_afdeling_key
@@ -1477,6 +1487,7 @@ AS
AND rr.res_discipline_key = rd.ins_discipline_key
--AND ks.prs_kostensoort_doorbelasten(+) = 1
AND rd.prs_kostensoort_key = ks.prs_kostensoort_key(+)
AND rrr.res_rsv_ruimte_key = kw.res_rsv_ruimte_key(+)
UNION ALL
SELECT rrr.res_reservering_key || '/' || rrr.res_rsv_ruimte_volgnr
resid,
@@ -1489,7 +1500,8 @@ AS
res_rsv_artikel_key res_item_key,
rd.ins_discipline_omschrijving res_voorziening,
rra.res_rsv_artikel_verwerkt resver,
rra.res_rsv_artikel_prijs verw_prijs
rra.res_rsv_artikel_prijs verw_prijs,
kw.res_kenmerkreservering_waarde
FROM res_rsv_ruimte rrr,
prs_perslid p,
prs_v_afdeling_boom ab,
@@ -1507,7 +1519,11 @@ AS
res_v_aanwezigrsv_artikel rra,
res_artikel ra,
res_discipline rd,
prs_kostensoort ks
prs_kostensoort ks,
(SELECT kw.res_rsv_ruimte_key, kw.res_kenmerkreservering_waarde
FROM res_v_aanwezigkenmerkwaarde kw, res_kenmerk k
WHERE kw.res_kenmerk_key = k.res_kenmerk_key
AND k.res_srtkenmerk_key = 1) kw -- Refnr. aanvrager
WHERE rrr.res_activiteit_key = 130 -- Evenement
AND rrr.res_rsv_ruimte_host_key = p.prs_perslid_key
AND p.prs_afdeling_key = ab.prs_afdeling_key
@@ -1525,6 +1541,7 @@ AS
AND ra.res_discipline_key = rd.ins_discipline_key
--AND ks.prs_kostensoort_doorbelasten(+) = 1
AND rd.prs_kostensoort_key = ks.prs_kostensoort_key(+)
AND rrr.res_rsv_ruimte_key = kw.res_rsv_ruimte_key(+)
--AND rra.res_rsv_artikel_levering > TO_DATE ('20170901', 'yyyymmdd')
AND rra.res_rsv_artikel_verwerkt > TO_DATE ('20171001', 'yyyymmdd'))
GROUP BY TO_CHAR (TRUNC (resver, 'mm') - 1, 'yyyy-mm'),
@@ -1648,21 +1665,15 @@ AS
SELECT '[' || TO_CHAR (o.mld_melding_key) || '|' || TO_CHAR (o.mld_opdr_key) || '] ' aanduiding,
o.mld_opdr_key,
o.mld_opdr_kosten,
--k.mld_kenmerk_key,
DECODE (ko.mld_kenmerkopdr_waarde, '281', 1, 0) doorbelasten
FROM mld_opdr o,
fac_tracking t,
mld_v_aanwezigkenmerkopdr ko,
--mld_kenmerk k
(SELECT * FROM mld_kenmerk WHERE mld_srtkenmerk_key = 241) k -- Doorbelasten-Ja/Nee
DECODE (SUBSTR (kp.prs_kostenplaats_upper, 1, 5), '50900', 1, 0) doorbelasten
FROM mld_opdr o, fac_tracking t, prs_kostenplaats kp
WHERE o.mld_opdr_ordernr IS NOT NULL -- Reeds doorgezet naar ProQuro (of 0)
AND o.mld_statusopdr_key = 9 -- Afgerond
AND o.mld_opdr_key = t.fac_tracking_refkey
AND t.fac_srtnotificatie_key = 70 -- ORDAFR
AND t.fac_tracking_datum < TRUNC (SYSDATE, 'mm')
--AND o.mld_opdr_kosten > 0 -- Allemaal, ook als kosten=0
AND o.mld_opdr_key = ko.mld_opdr_key(+)
AND ko.mld_kenmerk_key = k.mld_kenmerk_key(+);
AND o.prs_kostenplaats_key = kp.prs_kostenplaats_key;
CURSOR c2
IS