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

BSSC#81023 Implementatie facturatieproces RES+BSSC#84263 Rap/Toevoegen kolommen

Browse Source 
svn path=/Customer/trunk/; revision=65389
This commit is contained in:
Maarten van der Heide
2024-07-02 20:38:09 +00:00
parent 0c67059e94
commit 107419b44c
1 changed files with 75 additions and 34 deletions
Download Patch File Download Diff File Expand all files Collapse all files

109
BSSC/bssc.sql
View File

@@ -351,7 +351,9 @@ CREATE OR REPLACE VIEW bssc_v_rap_ssc_cat_looplijst
artikelnr,
artikeloms,
horeca_details,
deelnemers
deelnemers,
fo_status,
wensen
)
AS
SELECT x.res_reservering_key || '/' || x.res_rsv_ruimte_volgnr || DECODE (res_rsv_ruimte_dirtlevel, 0, '', ' [ongeldig]') resnr,
@@ -384,7 +386,9 @@ AS
where rkw.res_kenmerk_key = k.res_kenmerk_key
and k.res_srtkenmerk_key = 142
and x.res_rsv_ruimte_key = rkw.res_rsv_ruimte_key) horeca_details,
x.res_rsv_ruimte_bezoekers
x.res_rsv_ruimte_bezoekers,
(SELECT res_status_fo_omschrijving FROM res_status_fo WHERE res_status_fo_key = x.res_status_fo_key) fo_status,
kw.res_kenmerkreservering_waarde wensen
FROM (SELECT rrr.res_rsv_ruimte_key,
rrr.res_reservering_key,
rrr.res_rsv_ruimte_volgnr,
@@ -404,7 +408,8 @@ AS
ra.res_artikel_nr,
ra.res_artikel_omschrijving,
rrr.res_rsv_ruimte_bezoekers,
rrr.res_rsv_ruimte_dirtlevel
rrr.res_rsv_ruimte_dirtlevel,
rrr.res_status_fo_key
FROM res_rsv_ruimte rrr,
res_activiteit act,
res_ruimte_opstelling rro,
@@ -446,7 +451,11 @@ AS
LEFT JOIN res_ruimte rr
ON x.res_ruimte_key = rr.res_ruimte_key
LEFT JOIN alg_v_ruimte_gegevens_all rg
ON x.alg_ruimte_key = rg.alg_ruimte_key;
ON x.alg_ruimte_key = rg.alg_ruimte_key
LEFT JOIN res_v_aanwezigkenmerkwaarde kw
ON x.res_rsv_ruimte_key = kw.res_rsv_ruimte_key
AND kw.res_kenmerk_key IN (62, 64, 262, 321) -- Wensen m.b.t. de reservering?
;
CREATE OR REPLACE VIEW bssc_v_rap_ssc_cat_factlijst
(
@@ -2801,7 +2810,7 @@ EXCEPTION
fac.writelog (p_applname, 'E', v_errormsg, 'FACT-export afgebroken!');
END;
/
/*
-- 30 Vergadering/2,00 Ruimte
-- 50 Events/8,00 Ruimte
-- 90 Roomservice/0,50 Voorzieningen
@@ -2809,7 +2818,7 @@ END;
-- 190 Projectruimtes Etage 4/8,00 Ruimte
CREATE OR REPLACE VIEW bssc_v_addd_correctie
AS
SELECT '*CONCEPT*' fin_verkoopfactuur_id,
SELECT '*CONCEPT* M' || TO_CHAR (m.mld_melding_key) fin_verkoopfactuur_id,
DECODE (m.mld_stdmelding_key, 1481, 'CHV', 'CMD') || TRIM (SUBSTR (vf.fin_verkoopfactuur_omschr, 1, INSTR (vf.fin_verkoopfactuur_omschr, '/=', -1) - 1)) po_nr, -- Overnemen van te corrigeren factuur?
'01' sortering,
TRIM (ro.waarde) regel,
@@ -2906,7 +2915,7 @@ AS
AND kp.prs_kostenplaatsgrp_key = kpg.prs_kostenplaatsgrp_key(+)
AND m.mld_melding_key = ks.mld_melding_key
UNION ALL
SELECT '*CONCEPT*' fin_verkoopfactuur_id,
SELECT '*CONCEPT* M' || TO_CHAR (m.mld_melding_key) fin_verkoopfactuur_id,
DECODE (m.mld_stdmelding_key, 1481, 'CHV', 'CMD') || TRIM (SUBSTR (vf.fin_verkoopfactuur_omschr, 1, INSTR (vf.fin_verkoopfactuur_omschr, '/=', -1) - 1)) po_nr, -- Overnemen van te corrigeren factuur?
'02' sortering,
TRIM (ro.waarde) regel,
@@ -3002,7 +3011,7 @@ AS
AND kp.prs_kostenplaatsgrp_key = kpg.prs_kostenplaatsgrp_key(+)
AND m.mld_melding_key = ks.mld_melding_key
UNION ALL
SELECT '*CONCEPT*' fin_verkoopfactuur_id,
SELECT '*CONCEPT* M' || TO_CHAR (m.mld_melding_key) fin_verkoopfactuur_id,
DECODE (m.mld_stdmelding_key, 1481, 'CHV', 'CMD') || TRIM (SUBSTR (vf.fin_verkoopfactuur_omschr, 1, INSTR (vf.fin_verkoopfactuur_omschr, '/=', -1) - 1)) po_nr, -- Overnemen van te corrigeren factuur?
'03' sortering,
TRIM (ro.waarde) regel,
@@ -3098,7 +3107,7 @@ AS
AND kp.prs_kostenplaatsgrp_key = kpg.prs_kostenplaatsgrp_key(+)
AND m.mld_melding_key = ks.mld_melding_key
UNION ALL
SELECT '*CONCEPT*' fin_verkoopfactuur_id,
SELECT '*CONCEPT* M' || TO_CHAR (m.mld_melding_key) fin_verkoopfactuur_id,
DECODE (m.mld_stdmelding_key, 1481, 'CHV', 'CMD') || TRIM (SUBSTR (vf.fin_verkoopfactuur_omschr, 1, INSTR (vf.fin_verkoopfactuur_omschr, '/=', -1) - 1)) po_nr, -- Overnemen van te corrigeren factuur?
'04' sortering,
TRIM (ro.waarde) regel,
@@ -3194,7 +3203,7 @@ AS
AND kp.prs_kostenplaatsgrp_key = kpg.prs_kostenplaatsgrp_key(+)
AND m.mld_melding_key = ks.mld_melding_key
UNION ALL
SELECT '*CONCEPT*' fin_verkoopfactuur_id,
SELECT '*CONCEPT* M' || TO_CHAR (m.mld_melding_key) fin_verkoopfactuur_id,
DECODE (m.mld_stdmelding_key, 1481, 'CHV', 'CMD') || TRIM (SUBSTR (vf.fin_verkoopfactuur_omschr, 1, INSTR (vf.fin_verkoopfactuur_omschr, '/=', -1) - 1)) po_nr, -- Overnemen van te corrigeren factuur?
'05' sortering,
TRIM (ro.waarde) regel,
@@ -3292,7 +3301,7 @@ AS
CREATE OR REPLACE VIEW bssc_v_addd_losverkoop
AS
SELECT '*CONCEPT*' fin_verkoopfactuur_id,
SELECT '*CONCEPT* M' || TO_CHAR (m.mld_melding_key) fin_verkoopfactuur_id,
DECODE (m.mld_stdmelding_key, 1641, 'CHV', 'CMD') || TRIM (COALESCE (po.waarde, '-')) po_nr,
'01' sortering,
TRIM (ro.waarde) regel,
@@ -3397,7 +3406,7 @@ AS
AND kp.prs_kostenplaatsgrp_key = kpg.prs_kostenplaatsgrp_key(+)
AND m.mld_melding_key = ks.mld_melding_key
UNION ALL
SELECT '*CONCEPT*' fin_verkoopfactuur_id,
SELECT '*CONCEPT* M' || TO_CHAR (m.mld_melding_key) fin_verkoopfactuur_id,
DECODE (m.mld_stdmelding_key, 1641, 'CHV', 'CMD') || TRIM (COALESCE (po.waarde, '-')) po_nr,
'02' sortering,
TRIM (ro.waarde) regel,
@@ -3502,7 +3511,7 @@ AS
AND kp.prs_kostenplaatsgrp_key = kpg.prs_kostenplaatsgrp_key(+)
AND m.mld_melding_key = ks.mld_melding_key
UNION ALL
SELECT '*CONCEPT*' fin_verkoopfactuur_id,
SELECT '*CONCEPT* M' || TO_CHAR (m.mld_melding_key) fin_verkoopfactuur_id,
DECODE (m.mld_stdmelding_key, 1641, 'CHV', 'CMD') || TRIM (COALESCE (po.waarde, '-')) po_nr,
'03' sortering,
TRIM (ro.waarde) regel,
@@ -3607,7 +3616,7 @@ AS
AND kp.prs_kostenplaatsgrp_key = kpg.prs_kostenplaatsgrp_key(+)
AND m.mld_melding_key = ks.mld_melding_key
UNION ALL
SELECT '*CONCEPT*' fin_verkoopfactuur_id,
SELECT '*CONCEPT* M' || TO_CHAR (m.mld_melding_key) fin_verkoopfactuur_id,
DECODE (m.mld_stdmelding_key, 1641, 'CHV', 'CMD') || TRIM (COALESCE (po.waarde, '-')) po_nr,
'04' sortering,
TRIM (ro.waarde) regel,
@@ -3712,7 +3721,7 @@ AS
AND kp.prs_kostenplaatsgrp_key = kpg.prs_kostenplaatsgrp_key(+)
AND m.mld_melding_key = ks.mld_melding_key
UNION ALL
SELECT '*CONCEPT*' fin_verkoopfactuur_id,
SELECT '*CONCEPT* M' || TO_CHAR (m.mld_melding_key) fin_verkoopfactuur_id,
DECODE (m.mld_stdmelding_key, 1641, 'CHV', 'CMD') || TRIM (COALESCE (po.waarde, '-')) po_nr,
'05' sortering,
TRIM (ro.waarde) regel,
@@ -3816,12 +3825,21 @@ AS
AND mkp.prs_kostenplaats_key = kp.prs_kostenplaats_key(+)
AND kp.prs_kostenplaatsgrp_key = kpg.prs_kostenplaatsgrp_key(+)
AND m.mld_melding_key = ks.mld_melding_key;
*/
CREATE OR REPLACE VIEW bssc_v_addd_actual
AS
--WITH lopendeperiode AS (SELECT TO_CHAR (ADD_MONTHS (SYSDATE, -1), 'yyyymm') maand FROM dual)
SELECT '*CONCEPT*' fin_verkoopfactuur_id,
'CMD' || TRIM (COALESCE (x.en, '-')) po_nr,
SELECT DECODE (
x.prs_bedrijf_key,
NULL,
'*OPEN* R' || x.res_id,
DECODE (
vtfd.res_key,
NULL,
'*OPEN* R' || x.res_id,
'*CONCEPT* R'
|| DECODE (dres.aantal, 1, x.res_id, SUBSTR (x.res_id, 1, INSTR (x.res_id, '/') - 1) || ' [' || TO_CHAR (dres.aantal) || ' deelreserveringen]')))
fin_verkoopfactuur_id,
MIN ('CMD' || TRIM (COALESCE (x.en, '-'))) po_nr,
TO_CHAR (x.reslev, 'yyyymmdd') || SUBSTR ('0000' || TO_CHAR (x.res_rsv_ruimte_key), -7) || TO_CHAR (x.volgnr) sortering, -- TODO
--DECODE (x.res_activiteit_key, 30, 'Vergadering ', 50, 'Event ', 'Roomservice ') || x.res_id regel,
--'Meeting ' || x.res_id regel, -- Factureren per deelreservering!
@@ -3842,12 +3860,9 @@ AS
DECODE (x.btw_vl, '1', 'Verlegd', DECODE (x.btw, 'VL', 'Laag', 'Hoog')) fin_btwtabelwaarde_oms,
DECODE (x.btw_vl, '1', 0, DECODE (x.btw, 'VL', 9, 21)) fin_btwtabelwaarde_perc,
DECODE (x.btw_vl, '1', 1, TO_NUMBER (NULL)) fin_btwtabelwaarde_verlegd,
--x.maand,
NULL maand,
--TO_CHAR (TO_DATE (x.maand, 'yyyymm'), 'dd-mm-yyyy') mndbegin,
NULL mndbegin,
--TO_CHAR (LAST_DAY (TO_DATE (x.maand, 'yyyymm')), 'dd-mm-yyyy') mndeinde,
NULL mndeinde,
TO_CHAR (x.reslev, 'dd-mm-yyyy') mndbegin,
TO_CHAR (x.reslev, 'dd-mm-yyyy') mndeinde,
NULL dagbegin,
NULL dageinde,
TO_NUMBER (NULL) mndbes,
@@ -4234,10 +4249,40 @@ AS
AND rrr.res_rsv_ruimte_key = rrd.res_rsv_ruimte_key
AND rrd.res_discipline_key = rd.ins_discipline_key
AND rd.prs_kostensoort_key = ks.prs_kostensoort_key(+)) x,
( SELECT res_reservering_key, COUNT (DISTINCT res_rsv_ruimte_key) aantal
FROM res_rsv_ruimte
WHERE res_activiteit_key IN (30, 90, 170) -- Meeting room van Campus reserveren/Roomservice/Eigen meeting room reserveren!
AND res_rsv_ruimte_van > TO_DATE ('20231001', 'yyyymmdd') -- TODO
AND res_rsv_ruimte_van < TRUNC (SYSDATE + 1)
AND res_status_bo_key = 5 -- Afgemeld
AND res_rsv_ruimte_dirtlevel = 0
GROUP BY res_reservering_key) dres,
(SELECT kw.res_rsv_ruimte_key res_key, kw.res_kenmerkreservering_waarde
FROM res_kenmerkwaarde kw, res_kenmerk k
WHERE kw.res_kenmerkwaarde_verwijder IS NULL
AND kw.res_kenmerk_key = k.res_kenmerk_key
AND k.res_srtkenmerk_key = 281) vtfd, -- Vrijgegeven ter facturatie door
(SELECT * FROM prs_v_aanwezigkenmerklink WHERE prs_kenmerk_key = 1220) cmdnr
WHERE x.prs_bedrijf_key = cmdnr.prs_link_key(+)
GROUP BY '*CONCEPT*',
'CMD' || TRIM (COALESCE (x.en, '-')),
WHERE SUBSTR (x.res_id, 1, INSTR (x.res_id, '/') - 1) = TO_CHAR (dres.res_reservering_key)
--AND x.prs_bedrijf_key IS NOT NULL -- Bedrijf kan worden bepaald
--AND EXISTS (SELECT 1 -- TODO:Gevuld=VRIJGEGEVEN!!!
-- FROM res_kenmerkwaarde kw, res_kenmerk k
-- WHERE kw.res_kenmerkwaarde_verwijder IS NULL
-- AND kw.res_kenmerk_key = k.res_kenmerk_key
-- AND k.res_srtkenmerk_key = 281 -- Vrijgegeven ter facturatie door
-- AND kw.res_rsv_ruimte_key = x.res_rsv_ruimte_key)
AND x.res_rsv_ruimte_key = vtfd.res_key(+)
AND x.prs_bedrijf_key = cmdnr.prs_link_key(+)
GROUP BY DECODE (
x.prs_bedrijf_key,
NULL,
'*OPEN* R' || x.res_id,
DECODE (
vtfd.res_key,
NULL,
'*OPEN* R' || x.res_id,
'*CONCEPT* R'
|| DECODE (dres.aantal, 1, x.res_id, SUBSTR (x.res_id, 1, INSTR (x.res_id, '/') - 1) || ' [' || TO_CHAR (dres.aantal) || ' deelreserveringen]'))),
TO_CHAR (x.reslev, 'yyyymmdd') || SUBSTR ('0000' || TO_CHAR (res_rsv_ruimte_key), -7) || TO_CHAR (volgnr),
--DECODE (x.res_activiteit_key, 30, 'Vergadering ', 50, 'Event ', 'Roomservice ') || x.res_id,
--'Meeting ' || x.res_id,
@@ -4258,18 +4303,14 @@ AS
DECODE (x.btw_vl, '1', 'Verlegd', DECODE (x.btw, 'VL', 'Laag', 'Hoog')),
DECODE (x.btw_vl, '1', 0, DECODE (x.btw, 'VL', 9, 21)),
DECODE (x.btw_vl, '1', 1, TO_NUMBER (NULL)),
--x.maand,
NULL,
--TO_CHAR (TO_DATE (x.maand, 'yyyymm'), 'dd-mm-yyyy'),
NULL,
--TO_CHAR (LAST_DAY (TO_DATE (x.maand, 'yyyymm')), 'dd-mm-yyyy'),
NULL,
TO_CHAR (x.reslev, 'dd-mm-yyyy'),
TO_CHAR (x.reslev, 'dd-mm-yyyy'),
NULL,
NULL,
TO_NUMBER (NULL),
TO_NUMBER (NULL),
x.aantal,
--TO_NUMBER (NULL),
TO_NUMBER (NULL),
NULL,
TO_NUMBER (NULL),
@@ -4373,7 +4414,7 @@ AS
CREATE OR REPLACE PROCEDURE bssc_select_addd (p_applname IN VARCHAR2,
p_applrun IN VARCHAR2)
AS
CURSOR c1a -- RES-kosten
CURSOR c1a -- RES-kosten (zover bedrijf kan worden bepaald en VRIJGEGEVEN)!
IS
SELECT '[' || v.regel || '|' || v.prs_debiteur_naam || '] ' aanduiding,
v.*