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

YAXX#83574 Bestaande functionaliteit afsplitsen van nieuwe werkwijze.

Browse Source 
svn path=/Customer/trunk/; revision=67241
This commit is contained in:
Arthur Egberink
2024-11-29 14:34:13 +00:00
parent acc3e49220
commit 2a23b6eedc
1 changed files with 7 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
VBXX/vbxx.sql
View File

@@ -618,12 +618,13 @@ AS
BEGIN
SELECT prs_kenmerklink_waarde, o.mld_opdr_kosten
INTO v_mandaatbedrag, v_opdr_kosten
FROM prs_kenmerklink kl, prs_kenmerk k, prs_bedrijf b, mld_opdr o
FROM prs_kenmerklink kl, prs_kenmerk k, prs_bedrijf b, mld_opdr o, mld_typeopdr ot
WHERE o.mld_uitvoerende_keys = b.prs_bedrijf_key
AND b.prs_bedrijf_key = kl.prs_link_key
AND kl.prs_kenmerk_key = k.prs_kenmerk_key
AND k.prs_kenmerk_code = 'MANDAATBEDRAG'
AND o.mld_typeopdr_key = 22 -- Mandaatopdracht
AND o.mld_typeopdr_key = ot.mld_typeopdr_key
AND UPPER(ot.mld_typeopdr_omschrijving) like 'MANDAAT%' -- Mandaatopdracht
AND o.mld_opdr_key = p_opdr_key;
IF v_opdr_kosten IS NULL
@@ -1750,7 +1751,7 @@ AS
prs_contactpersoon cp,
prs_perslid pcp
WHERE o.mld_typeopdr_key = ot.mld_typeopdr_key
AND UPPER(ot.mld_typeopdr_omschrijving) = 'REVERSEDBILLINGOPDRACHT'
AND UPPER(ot.mld_typeopdr_omschrijving) LIKE 'REVERSED%'
AND o.mld_statusopdr_key = 9
-- Moeten we niet alle openstaande opdrachten opnemen?
-- CHECK AND fac.gettrackingdate ('ORDAFR', o.mld_opdr_key) > TRUNC (SYSDATE, 'mm') -- Actual = Deze maand Afgerond (en nog niet Verwerkt)
@@ -1869,7 +1870,7 @@ AS
prs_perslid pcp,
prs_perslid pcm
WHERE o.mld_typeopdr_key = ot.mld_typeopdr_key
AND UPPER(ot.mld_typeopdr_omschrijving) = 'REVERSEDBILLINGOPDRACHT'
AND UPPER(ot.mld_typeopdr_omschrijving) LIKE 'REVERSED%'
AND o.mld_statusopdr_key = 9
AND NOT EXISTS
( SELECT mld_kenmerkopdr_waarde
@@ -1953,7 +1954,7 @@ AS
prs_perslid pcp,
prs_perslid pcm
WHERE o.mld_typeopdr_key = ot.mld_typeopdr_key
AND UPPER(ot.mld_typeopdr_omschrijving) = 'REVERSEDBILLINGOPDRACHT'
AND UPPER(ot.mld_typeopdr_omschrijving) LIKE 'REVERSED%'
AND o.mld_statusopdr_key = 9 -- ORDAFR
AND fac.gettrackingdate ('ORDAFR', o.mld_opdr_key) BETWEEN TO_DATE ('20190101', 'yyyymmdd') AND TRUNC (SYSDATE, 'mm') -- Actual = Deze maand Afgerond (en nog niet Verwerkt)
AND NOT EXISTS
@@ -3514,7 +3515,7 @@ BEGIN
WHERE k.mld_srtkenmerk_key = sk.mld_srtkenmerk_key
AND sk.mld_srtkenmerk_code = 'TS_REVERSEDBILLING'
AND k.mld_typeopdr_key = ot.mld_typeopdr_key
AND UPPER(ot.mld_typeopdr_omschrijving) = 'REVERSEDBILLINGOPDRACHT';
AND UPPER(ot.mld_typeopdr_omschrijving) LIKE 'REVERSED%';
FOR rec IN c4
LOOP