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

PROR#86510-- Toevoegen VIEW tbv rapport bestelde voorzieningen voor financiële afdeling

Browse Source 
svn path=/Customer/trunk/; revision=67369
This commit is contained in:
Norbert Wassink
2024-12-12 07:34:33 +00:00
parent fc102c73d7
commit 73b2391678
1 changed files with 98 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

103
PROR/PROR.sql
View File

@@ -1509,7 +1509,100 @@ AS
AND m.melding_key=ms.mld_stdmelding_key(+);
CREATE OR REPLACE VIEW pror_v_fin_catering_rapport
(
bestelnr,
bestellingreferentie,
kostenplaatsnr,
locatie,
ruimte,
aanvrager,
leveringsdatum,
aantal,
artikel_nr,
artikel_omschrijving,
prijs_inc_btw,
subtot_inc_btw,
subtot_excl_btw,
btw,
aantal_personen,
kosten_pp_inc_btw,
kosten_pp_exc_btw,
zakelijk_nietzakelijk
)
AS
SELECT bestelnr,
bestellingreferentie,
kostenplaatsnr,
locatie,
ruimte,
aanvrager,
leveringsdatum,
aantal,
artikel_nr,
artikel_omschrijving,
prijs_inc_btw,
subtot_inc_btw,
subtot_excl_btw,
btw,
COALESCE(aantal_personen,1) aantal_personen,
ROUND(subtot_inc_btw/COALESCE(aantal_personen,1),2) kosten_pp_inc_btw,
ROUND(subtot_excl_btw/COALESCE(aantal_personen,1),2) kosten_pp_exc_btw,
zakelijk_nietzakelijk
FROM (
SELECT p.rrr_key bestelnr,
p.reservering bestellingreferentie,
p.kostenplaats kostenplaatsnr,
SUBSTR(p.loc_gb_ruimtenr,INSTR(p.loc_gb_ruimtenr,'-',1,1)+1,INSTR(p.loc_gb_ruimtenr,'-',1,2)-INSTR(p.loc_gb_ruimtenr,'-',1,1)-1) locatie,
p.loc_gb_ruimtenr ruimte,
p.aanvrager aanvrager,
TRUNC(p.van) leveringsdatum,
art.aantal aantal,
art.artikelnr artikel_nr,
art.artikel_omschrijving artikel_omschrijving,
art.prijs prijs_inc_btw,
ROUND(COALESCE(art.totprijs,art.aantal*art.prijs),2) subtot_inc_btw,
ROUND(COALESCE(art.totprijs,art.aantal*art.prijs)/((100+art.btw)/100),2) subtot_excl_btw,
art.btw||'%' btw,
(SELECT res_rsv_ruimte_bezoekers
FROM res_rsv_ruimte
WHERE res_rsv_ruimte_key=p.rrr_key) aantal_personen,
(SELECT rkw.res_kenmerkreservering_waarde
FROM res_kenmerkwaarde rkw, res_kenmerk rk, res_srtkenmerk rsk
WHERE UPPER(rsk.res_srtkenmerk_omschrijving)='Zakelijk/Niet zakelijk'
AND rk.res_srtkenmerk_key=rsk.res_srtkenmerk_key
AND rkw.res_kenmerk_key=rk.res_kenmerk_key
AND rkw.res_rsv_ruimte_key=p.rrr_key) zakelijk_nietzakelijk,
(SELECT k.res_kenmerk_key
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,
( SELECT rra.res_rsv_ruimte_key,
rra.res_rsv_artikel_key,
rra.res_rsv_artikel_aantal aantal,
ra.res_artikel_omschrijving artikel_omschrijving,
COALESCE(ra.res_artikel_nr,ra.res_artikel_externnr) artikelnr,
rra.res_rsv_artikel_levering van,
ra.res_artikel_btw btw,
rra.res_rsv_artikel_prijs totprijs,
ra.res_artikel_prijs prijs,
rd.ins_discipline_omschrijving catalogus,
(SELECT rka.res_kenmerkartikel_waarde
FROM res_kenmerkartikel rka, res_kenmerk rk, res_srtkenmerk rsk
WHERE rka.res_rsv_artikel_key=rra.res_rsv_artikel_key
AND rk.res_kenmerk_key=rka.res_kenmerk_key
AND rsk.res_srtkenmerk_key = rk.res_srtkenmerk_key
AND rsk.res_srtkenmerk_upper='MAATWERK OPMERKING') opmerking
FROM res_rsv_artikel rra,
res_artikel ra,
res_discipline rd
WHERE rra.res_artikel_key = ra.res_artikel_key
AND ra.res_artikel_btw IN (0, 9, 21)
AND rd.ins_discipline_key=ra.res_discipline_key) art
WHERE art.res_rsv_ruimte_key=p.rrr_key
AND TRUNC(p.van)> TRUNC(ADD_MONTHS(SYSDATE, -1),'MM')
AND TRUNC(p.van) <= TRUNC(LAST_DAY(ADD_MONTHS(SYSDATE,-1))));
--- EXPORTS
@@ -1982,7 +2075,7 @@ AS
AND b.PRS_BEDRIJF_VERWIJDER IS NULL)
AND o.MLD_OPDR_EXTERNSYNCDATE < (select MAX(mld_melding_note_aanmaak)
from mld_melding_note
where mld_melding_key=6
where mld_melding_key=o.mld_melding_key
and mld_melding_note_flag =1);
BEGIN
@@ -2005,9 +2098,9 @@ BEGIN
'Verwijderen kenmerk bij de opdracht : '
|| rec.mld_melding_key;
DELETE MLD_KENMERKOPDR ko
WHERE ko.mld_opdr_key = rec.mld_opdr_key
AND ko.mld_kenmerk_key = v_note_key;
-- DELETE MLD_KENMERKOPDR ko
-- WHERE ko.mld_opdr_key = rec.mld_opdr_key
-- AND ko.mld_kenmerk_key = v_note_key;
mld.upsertopdrachtkenmerk (v_note_key,