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

YAXX#87526 Het doorbelastingsrapport is aangepast.

Browse Source 
svn path=/Customer/trunk/; revision=67857
This commit is contained in:
Arthur Egberink
2025-02-05 10:03:49 +00:00
parent ddca7b5d59
commit dc34164ae3
1 changed files with 128 additions and 55 deletions
Download Patch File Download Diff File Expand all files Collapse all files

183
VBXX/vbxx.sql
View File

@@ -105,6 +105,7 @@ AS
FROM mld_kenmerk k, mld_srtkenmerk sk, mld_opdr o
WHERE k.mld_srtkenmerk_key = sk.mld_srtkenmerk_key
AND sk.mld_srtkenmerk_code = 'OPSLAGPERC'
AND k.mld_kenmerk_verwijder IS NULL
AND k.mld_typeopdr_key = o.mld_typeopdr_key
AND o.mld_opdr_key = p_opdr_key;
@@ -284,6 +285,7 @@ AS
FROM mld_kenmerk k, mld_srtkenmerk sk, mld_opdr o
WHERE k.mld_srtkenmerk_key = sk.mld_srtkenmerk_key
AND sk.mld_srtkenmerk_code = 'OPSLAGPERC'
AND k.mld_kenmerk_verwijder IS NULL
AND k.mld_typeopdr_key = o.mld_typeopdr_key
AND o.mld_opdr_key = p_opdr_key;
@@ -447,6 +449,7 @@ AS
FROM mld_kenmerk k, mld_srtkenmerk sk, mld_opdr o
WHERE k.mld_srtkenmerk_key = sk.mld_srtkenmerk_key
AND sk.mld_srtkenmerk_code = 'OPSLAGPERC'
AND k.mld_kenmerk_verwijder IS NULL
AND k.mld_typeopdr_key = o.mld_typeopdr_key
AND o.mld_opdr_key = p_opdr_key;
@@ -456,6 +459,7 @@ AS
FROM mld_kenmerk k, mld_srtkenmerk sk, mld_opdr o
WHERE k.mld_srtkenmerk_key = sk.mld_srtkenmerk_key
AND sk.mld_srtkenmerk_code = 'VERKOOPPRIJS'
AND k.mld_kenmerk_verwijder IS NULL
AND k.mld_typeopdr_key = o.mld_typeopdr_key
AND o.mld_opdr_key = p_opdr_key;
@@ -605,10 +609,11 @@ AS
WHERE fg.alg_gebouw_key = g.alg_gebouw_key AND fg.fin_factuur_key = p_factuur_key;
v_errorhint := 'Bepaal kenmerk_key van FUNCCODEGK.';
SELECT fin_kenmerk_key
SELECT k.fin_kenmerk_key
INTO v_funccodegk_kenmerk_key
FROM fin_kenmerk
WHERE fin_kenmerk_code = 'FUNCCODEGK';
FROM fin_kenmerk k
WHERE k.fin_kenmerk_code = 'FUNCCODEGK'
AND k.fin_kenmerk_verwijder IS NULL;
v_funccodegk := FLX.getflex ('FIN', v_funccodegk_kenmerk_key, p_factuur_key);
dbms_output.put_line ('v_funccodegk:' || v_funccodegk);
@@ -676,6 +681,7 @@ AS
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 k.prs_kenmerk_verwijder IS NULL
AND o.mld_typeopdr_key = ot.mld_typeopdr_key
AND ( UPPER(ot.mld_typeopdr_omschrijving) like 'MANDAAT%' -- Mandaatopdracht
OR UPPER(ot.mld_typeopdr_omschrijving) like 'REVERSED%') -- ReversedBilling
@@ -1351,6 +1357,7 @@ AS
AND std.mld_ins_discipline_key = d.ins_discipline_key
AND d.ins_srtdiscipline_key = sd.ins_srtdiscipline_key
AND k.prs_kenmerk_key = kl.prs_kenmerk_key
AND k.prs_kenmerk_verwijder IS NULL
AND kl.prs_link_key = b.prs_bedrijf_key
AND b.prs_bedrijf_key = o.mld_uitvoerende_keys
AND b.prs_bedrijf_email IS NOT NULL
@@ -1930,7 +1937,8 @@ AS
WHERE ko.mld_opdr_key = o.mld_opdr_key
AND ko.mld_kenmerk_key = k.mld_kenmerk_key
AND k.mld_srtkenmerk_key = sk.mld_srtkenmerk_key
AND sk.mld_srtkenmerk_code = 'TS_REVERSEDBILLING')
AND sk.mld_srtkenmerk_code = 'TS_REVERSEDBILLING'
AND k.mld_kenmerk_verwijder IS NULL)
AND EXISTS -- Niet gemarkeerd als dispuut!
(SELECT 1
FROM mld_v_aanwezigkenmerkopdr ko, mld_kenmerk k, mld_srtkenmerk sk
@@ -1938,6 +1946,7 @@ AS
AND ko.mld_kenmerk_key = k.mld_kenmerk_key
AND k.mld_srtkenmerk_key = sk.mld_srtkenmerk_key
AND sk.mld_srtkenmerk_code = 'RB_GOEDGEKEURD' -- Dispuut
AND k.mld_kenmerk_verwijder IS NULL
AND ko.mld_kenmerkopdr_waarde = '1') -- Aangevinkt
AND o.cnt_contract_key = c.cnt_contract_key
--AND c.ins_discipline_key = 523 -- Variabele contracten
@@ -2047,7 +2056,8 @@ AS
WHERE ko.mld_opdr_key = o.mld_opdr_key
AND ko.mld_kenmerk_key = k.mld_kenmerk_key
AND k.mld_srtkenmerk_key = sk.mld_srtkenmerk_key
AND sk.mld_srtkenmerk_code = 'TS_REVERSEDBILLING')
AND sk.mld_srtkenmerk_code = 'TS_REVERSEDBILLING'
AND k.mld_kenmerk_verwijder IS NULL)
--AND o.mld_opdr_key = t.fac_tracking_refkey
--AND t.fac_srtnotificatie_key = 76 -- ORDAFR
--AND t.fac_tracking_datum > TO_DATE ('20190101', 'yyyymmdd')
@@ -2060,6 +2070,7 @@ AS
AND ko.mld_kenmerk_key = k.mld_kenmerk_key
AND k.mld_srtkenmerk_key = sk.mld_srtkenmerk_key
AND sk.mld_srtkenmerk_code = 'RB_GOEDGEKEURD' -- Dispuut
AND k.mld_kenmerk_verwijder IS NULL
AND ko.mld_kenmerkopdr_waarde = '1') -- Aangevinkt
AND o.cnt_contract_key = c.cnt_contract_key
-- AND c.ins_discipline_key = 523 -- Variabele contracten
@@ -2132,7 +2143,8 @@ AS
WHERE ko.mld_opdr_key = o.mld_opdr_key
AND ko.mld_kenmerk_key = k.mld_kenmerk_key
AND k.mld_srtkenmerk_key = sk.mld_srtkenmerk_key
AND sk.mld_srtkenmerk_code = 'TS_REVERSEDBILLING')
AND sk.mld_srtkenmerk_code = 'TS_REVERSEDBILLING'
AND k.mld_kenmerk_verwijder IS NULL)
AND NOT EXISTS -- Gemarkeerd als dispuut!
(SELECT 1
FROM mld_v_aanwezigkenmerkopdr ko, mld_kenmerk k, mld_srtkenmerk sk
@@ -2140,6 +2152,7 @@ AS
AND ko.mld_kenmerk_key = k.mld_kenmerk_key
AND k.mld_srtkenmerk_key = sk.mld_srtkenmerk_key
AND sk.mld_srtkenmerk_code = 'RB_GOEDGEKEURD' -- Dispuut
AND k.mld_kenmerk_verwijder IS NULL
AND ko.mld_kenmerkopdr_waarde = '1') -- Aangevinkt
AND o.cnt_contract_key = c.cnt_contract_key
-- AND c.ins_discipline_key = 523 -- Variabele contracten
@@ -2648,7 +2661,7 @@ AS
c.cnt_contract_key,
c.cnt_contract_nummer_intern,
c.cnt_contract_omschrijving,
COALESCE (nr.mld_kenmerkopdr_waarde, c.cnt_contract_nummer) cnt_contract_nummer,
COALESCE (nr.mld_kenmerkopdr_waarde, c.cnt_contract_nummer, '-') cnt_contract_nummer,
DECODE (pcm.prs_perslid_geslacht, 0, 'Mevr. ', 1, 'Dhr. ', '')
cm_aanhef,
DECODE (
@@ -2695,6 +2708,7 @@ AS
WHERE ko.mld_opdr_key = o.mld_opdr_key
AND ko.mld_kenmerk_key = k.mld_kenmerk_key
AND k.mld_srtkenmerk_key = sk.mld_srtkenmerk_key
AND k.mld_kenmerk_verwijder IS NULL
AND sk.mld_srtkenmerk_code = 'TS_REVERSEDBILLING')
AND c.cnt_prs_bedrijf_key = b.prs_bedrijf_key
AND c.cnt_contract_mantel_key = mc.cnt_contract_key(+)
@@ -3236,10 +3250,10 @@ AS
AND l.alg_district_key = d.alg_district_key(+)
AND m.mld_alg_onroerendgoed_keys = og.alg_onroerendgoed_keys(+);
/*
-- KFSG#65747: Rapportage tbv. leverancier-contactpersonen!
CREATE OR REPLACE VIEW kfsg_v_rap_frozen_mld_lev
CREATE OR REPLACE VIEW vbxx_v_rap_frozen_mld_lev
(
fclt_3d_user_key, -- Kunnen beperken per leverancier-contactpersonen!
maand,
@@ -3293,7 +3307,7 @@ AS
v.contractnr,
v.inkoopordernr,
d.alg_district_omschrijving
FROM kfsg_v_frozen_fact v,
FROM vbxx_v_frozen_fact v,
mld_opdr o,
mld_statusopdr os,
mld_typeopdr ot,
@@ -3322,7 +3336,7 @@ AS
AND v.extra_key = cp.prs_bedrijf_key
AND cp.prs_perslid_key IS NOT NULL -- Account in Facilitor!
;
*/
CREATE OR REPLACE PROCEDURE vbxx_select_fact (p_applname IN VARCHAR2,
p_applrun IN VARCHAR2)
AS
@@ -3657,6 +3671,7 @@ BEGIN
FROM mld_kenmerk k, mld_srtkenmerk sk, mld_typeopdr ot
WHERE k.mld_srtkenmerk_key = sk.mld_srtkenmerk_key
AND sk.mld_srtkenmerk_code = 'TS_REVERSEDBILLING'
AND k.mld_kenmerk_verwijder IS NULL
AND k.mld_typeopdr_key = ot.mld_typeopdr_key
AND UPPER(ot.mld_typeopdr_omschrijving) LIKE 'REVERSED%';
@@ -3742,7 +3757,7 @@ EXCEPTION
END;
/
/*
CREATE OR REPLACE VIEW vbxx_v_noti_te_factureren
(
code,
@@ -3757,30 +3772,30 @@ CREATE OR REPLACE VIEW vbxx_v_noti_te_factureren
AS
WITH cp
AS (SELECT cp1.prs_bedrijf_key, cp1.prs_contactpersoon_email, p1.prs_perslid_email
FROM prs_v_aanwezigkenmerklink kl1, prs_contactpersoon cp1, prs_v_aanwezigperslid p1
WHERE kl1.prs_kenmerk_key = 1020 -- Contactpersoon factuurnotificatie!
FROM prs_v_aanwezigkenmerklink kl1, prs_kenmerk k, prs_contactpersoon cp1, prs_v_aanwezigperslid p1
WHERE kl1.prs_kenmerk_key = k.prs_kenmerk_key
AND k.prs_kenmerk_code = 'FACTUURNOTI' -- Contactpersoon factuurnotificatie!
AND k.prs_kenmerk_verwijder IS NULL
AND kl1.prs_link_key = cp1.prs_contactpersoon_key
AND cp1.prs_contactpersoon_verwijder IS NULL
AND cp1.prs_perslid_key = p1.prs_perslid_key(+))
SELECT DISTINCT sn.fac_srtnotificatie_code,
NULL,
--63681, -- Maartje Vreijling
--cp.prs_perslid_key, -- Leverancier-contactpersonen (met noti-vinkje)
NULL,
REPLACE (REPLACE (sn.fac_srtnotificatie_oms, '##LEV##', v.prs_bedrijf_naam), '##MND##', v.maand),
r.fac_usrrap_key,
v.extra_key,
COALESCE (cp.prs_contactpersoon_email, cp.prs_perslid_email),
NULL
FROM kfsg_v_frozen_fact v,
FROM vbxx_v_frozen_fact v,
cp cp,
fac_usrrap r,
fac_srtnotificatie sn
WHERE TO_CHAR (SYSDATE, 'dd') = '11' -- Op de ochtend na 10e van de maand!
WHERE TO_CHAR (SYSDATE, 'dd') = '04' -- Op de ochtend na 4e van de maand!
AND v.maand = TO_CHAR (TRUNC (SYSDATE, 'mm') - 1, 'yyyy-mm')
AND v.extra_key = cp.prs_bedrijf_key
AND UPPER (r.fac_usrrap_view_name) = 'KFSG_V_FROZEN_FACT'
AND sn.fac_srtnotificatie_code = 'CUST01'
AND UPPER (r.fac_usrrap_view_name) = 'VBXX_V_FROZEN_FACT'
AND sn.fac_srtnotificatie_code = 'CUST90'
UNION ALL
SELECT DISTINCT sn.fac_srtnotificatie_code,
NULL,
@@ -3791,18 +3806,20 @@ AS
NULL, -- Geen extra_key, dus de hele rapportage!
p.prs_perslid_email,
NULL
FROM kfsg_v_frozen_fact v,
FROM vbxx_v_frozen_fact v,
fac_gebruikersgroep gg,
prs_v_aanwezigperslid p,
fac_groep g,
fac_usrrap r,
fac_srtnotificatie sn
WHERE TO_CHAR (SYSDATE, 'dd') = '11' -- Op de ochtend na 10e van de maand!
WHERE TO_CHAR (SYSDATE, 'dd') = '04' -- Op de ochtend na 4e van de maand!
AND v.maand = TO_CHAR (TRUNC (SYSDATE, 'mm') - 1, 'yyyy-mm')
AND gg.fac_groep_key = 281 -- Schiphol Finance/Control
AND gg.fac_groep_key = g.fac_groep_key
AND g.fac_groep_externid = 'FACTUURNOTI'
AND gg.prs_perslid_key = p.prs_perslid_key
AND UPPER (r.fac_usrrap_view_name) = 'KFSG_V_FROZEN_FACT'
AND sn.fac_srtnotificatie_code = 'CUST02';
*/
AND UPPER (r.fac_usrrap_view_name) = 'VBXX_V_FROZEN_FACT'
AND sn.fac_srtnotificatie_code = 'CUST91';
--
-- INKOOPFACTUREN RICHTING EXACT
@@ -3840,6 +3857,7 @@ AS
FROM prs_kenmerklink kl, prs_kenmerk k
WHERE kl.prs_kenmerk_key = k.prs_kenmerk_key
AND k.prs_kenmerk_code = 'ONDERDEELVEBEGO'
AND k.prs_kenmerk_verwijder IS NULL
AND kl.prs_link_key =
COALESCE (b_c.prs_bedrijf_key, COALESCE (b_o.prs_bedrijf_key, b_b.prs_bedrijf_key))),
'1', 63,
@@ -3867,25 +3885,29 @@ AS
FROM cnt_kenmerkcontract kc, cnt_kenmerk ck
WHERE kc.cnt_contract_key = c.cnt_contract_key
AND kc.cnt_kenmerk_key = ck.cnt_kenmerk_key
AND ck.cnt_kenmerk_code = 'EXACT_CODE')
AND ck.cnt_kenmerk_code = 'EXACT_CODE'
AND ck.cnt_kenmerk_verwijder IS NULL)
exact_code_contract,
(SELECT alg_onrgoedkenmerk_waarde
FROM alg_onrgoedkenmerk aogk, alg_kenmerk gk
WHERE alg_onrgoed_key = g.alg_gebouw_key
AND aogk.alg_kenmerk_key = gk.alg_kenmerk_key
AND gk.alg_kenmerk_code = 'EXACT_CODE')
AND gk.alg_kenmerk_code = 'EXACT_CODE'
AND gk.alg_kenmerk_verwijder IS NULL)
exact_code_gebouw,
(SELECT fac.safe_to_number (alg_onrgoedkenmerk_waarde)
FROM alg_onrgoedkenmerk aogk, alg_kenmerk k
WHERE aogk.alg_kenmerk_key = k.alg_kenmerk_key
AND aogk.alg_onrgoed_key = COALESCE(ml.alg_district_key, cl.alg_district_key)
AND k.alg_kenmerk_code = 'AFWDAGBOEKNR')
AND k.alg_kenmerk_code = 'AFWDAGBOEKNR'
AND k.alg_kenmerk_verwijder IS NULL)
afw_dagboek,
(SELECT alg_onrgoedkenmerk_waarde
FROM alg_onrgoedkenmerk aogk, alg_kenmerk k
WHERE aogk.alg_kenmerk_key = k.alg_kenmerk_key
AND aogk.alg_onrgoed_key = COALESCE(ml.alg_district_key, cl.alg_district_key)
AND k.alg_kenmerk_code = 'AFWKSTDRCODE')
AND k.alg_kenmerk_code = 'AFWKSTDRCODE'
AND k.alg_kenmerk_verwijder IS NULL)
afw_kstdrcode,
o.mld_opdr_key,
c.cnt_contract_key,
@@ -3947,6 +3969,7 @@ AS
AND ko.mld_kenmerk_key = k.mld_kenmerk_key
AND k.mld_srtkenmerk_key = sk.mld_srtkenmerk_key
AND sk.mld_srtkenmerk_code = 'TYPEFACTUUR'
AND k.mld_kenmerk_verwijder IS NULL
AND FAC.safe_to_number (ko.mld_kenmerkopdr_waarde) = ud.fac_usrdata_key),
'B'),
(SELECT fac_usrdata_code
@@ -3956,6 +3979,7 @@ AS
WHERE c.cnt_contract_key = kc.cnt_contract_key
AND kc.cnt_kenmerk_key = k.cnt_kenmerk_key
AND k.cnt_kenmerk_code = 'TYPEFACTUUR'
AND k.cnt_kenmerk_verwijder IS NULL
AND FAC.safe_to_number (kc.cnt_kenmerkcontract_waarde) = ud.fac_usrdata_key))
typefactuur
FROM fin_factuur f,
@@ -4207,13 +4231,15 @@ BEGIN
SELECT fin_kenmerk_key
INTO v_bkstknr_kenmerk_key
FROM fin_kenmerk k
WHERE k.fin_kenmerk_code = 'BOEKSTUKNUMMER';
WHERE k.fin_kenmerk_code = 'BOEKSTUKNUMMER'
AND k.fin_kenmerk_verwijder IS NULL;
-- wat is de key van het kenmerk bijlage?
SELECT fin_kenmerk_key
INTO v_bijlage_kenmerk_key
FROM fin_kenmerk k
WHERE k.fin_kenmerk_code = 'FACTUURBESTAND';
WHERE k.fin_kenmerk_code = 'FACTUURBESTAND'
AND k.fin_kenmerk_verwijder IS NULL;
IF p_regio_key IS NOT NULL
THEN
@@ -4506,6 +4532,7 @@ CREATE OR REPLACE VIEW vbxx_v_kosten_doorbelasting
AS
SELECT sd.ins_srtdiscipline_prefix || m.mld_melding_key
meldingnummer,
m.mld_melding_externnr,
m.mld_melding_key,
l.alg_locatie_omschrijving
meldinglocatie,
@@ -4562,14 +4589,27 @@ AS
opslag,
DECODE (nb.mld_kenmerkopdr_waarde, 1, 0, COALESCE(ok.bedrag, o.mld_opdr_kosten) * ((100 + VBXX.get_opslag_perc (o.mld_opdr_key)) / 100))
kostenplusopslag,
TO_CHAR (ADD_MONTHS (SYSDATE,
COALESCE ((SELECT FAC.safe_to_number (alg_onrgoedkenmerk_waarde)
FROM alg_onrgoedkenmerk aogk, alg_kenmerk k
WHERE aogk.alg_kenmerk_key = k.alg_kenmerk_key
AND k.alg_kenmerk_code = 'BOEKMNDOFFSET'
AND alg_onrgoed_key = l.alg_district_key),
0)),
'yyyymm')
btw.fin_btwtabelwaarde_oms,
btw.fin_btwtabelwaarde_perc,
fr.fin_factuurregel_btw,
fr.FIN_FACTUURREGEL_TOTAAL,
COALESCE ( (SELECT mld_kenmerkopdr_waarde
FROM mld_kenmerkopdr ko, mld_kenmerk k, mld_srtkenmerk sk
WHERE ko.mld_opdr_key = o.mld_opdr_key
AND ko.mld_kenmerk_key = k.mld_kenmerk_key
AND k.mld_srtkenmerk_key = sk.mld_srtkenmerk_key
AND k.mld_kenmerk_verwijder IS NULL
AND sk.mld_srtkenmerk_code = 'BOEKMAAND'),
TO_CHAR (
ADD_MONTHS (SYSDATE,
COALESCE ((SELECT FAC.safe_to_number (alg_onrgoedkenmerk_waarde)
FROM alg_onrgoedkenmerk aogk, alg_kenmerk k
WHERE aogk.alg_kenmerk_key = k.alg_kenmerk_key
AND k.alg_kenmerk_code = 'BOEKMNDOFFSET'
AND k.alg_kenmerk_verwijder IS NULL
AND alg_onrgoed_key = l.alg_district_key),
0)),
'yyyymm'))
boekmaand,
aog.alg_gebouw_naam
meldinggebouw,
@@ -4579,7 +4619,8 @@ AS
WHERE ko.mld_opdr_key = o.mld_opdr_key
AND ko.mld_kenmerk_key = k.mld_kenmerk_key
AND k.mld_srtkenmerk_key = sk.mld_srtkenmerk_key
AND sk.mld_srtkenmerk_code = 'FINAKKOORD'),
AND sk.mld_srtkenmerk_code = 'FINAKKOORD'
AND k.mld_kenmerk_verwijder IS NULL),
1, 'Ja',
'Nee')
pro_forma_goedgekeurd,
@@ -4595,7 +4636,9 @@ AS
afw_opdracht_nen_omschrijving,
kso.prs_kostensoort_refcode
afw_opdracht_nen_code,
kin.mld_kenmerkopdr_waarde klantinkoopnr
kin.mld_kenmerkopdr_waarde klantinkoopnr,
k.prs_kostenplaats_nr,
k.prs_kostenplaats_omschrijving
FROM prs_v_perslid_fullnames_all pf,
prs_kostensoort ksm,
mld_statuses ms,
@@ -4611,6 +4654,12 @@ AS
ins_tab_discipline d,
ins_srtdiscipline sd,
alg_v_allonrgoed_gegevens aog,
prs_kostenplaats k,
(SELECT fin_factuur_key, mld_opdr_key FROM fin_factuur
WHERE fin_factuur_verwijder IS NULL
AND fin_factuur_statuses_key = 7) f,
fin_factuurregel fr,
fin_btwtabelwaarde btw,
(SELECT fac_usrdata_code, fac_usrdata_omschr, mld_opdr_key
FROM mld_kenmerkopdr ko,
mld_kenmerk k,
@@ -4619,6 +4668,7 @@ AS
WHERE ko.mld_kenmerk_key = k.mld_kenmerk_key
AND k.mld_srtkenmerk_key = sk.mld_srtkenmerk_key
AND sk.mld_srtkenmerk_code = 'TYPEFACTUUR'
AND k.mld_kenmerk_verwijder IS NULL
AND FAC.safe_to_number (ko.mld_kenmerkopdr_waarde) = fac_usrdata_key) tf,
( SELECT f.mld_opdr_key, SUM (fin_factuur_totaal) bedrag
FROM fin_factuur f
@@ -4633,17 +4683,20 @@ AS
WHERE ko.mld_opdr_key = o.mld_opdr_key
AND ko.mld_kenmerk_key = k.mld_kenmerk_key
AND k.mld_srtkenmerk_key = sk.mld_srtkenmerk_key
AND sk.mld_srtkenmerk_code = 'TS_REVERSEDBILLING') ok,
AND sk.mld_srtkenmerk_code = 'TS_REVERSEDBILLING'
AND k.mld_kenmerk_verwijder IS NULL) ok,
(SELECT mld_opdr_key, mld_kenmerkopdr_waarde
FROM mld_kenmerkopdr ko, mld_kenmerk k, mld_srtkenmerk sk
WHERE ko.mld_kenmerk_key = k.mld_kenmerk_key
AND k.mld_srtkenmerk_key = sk.mld_srtkenmerk_key
AND sk.mld_srtkenmerk_code = 'NIETDOORBELASTEN') nb,
AND sk.mld_srtkenmerk_code = 'NIETDOORBELASTEN'
AND k.mld_kenmerk_verwijder IS NULL) nb,
(SELECT mld_opdr_key, mld_kenmerkopdr_waarde
FROM mld_kenmerkopdr ko, mld_kenmerk k, mld_srtkenmerk sk
WHERE ko.mld_kenmerk_key = k.mld_kenmerk_key
AND k.mld_srtkenmerk_key = sk.mld_srtkenmerk_key
AND sk.mld_srtkenmerk_code = 'KLANTINKOOPNR') kin
AND sk.mld_srtkenmerk_code = 'KLANTINKOOPNR'
AND k.mld_kenmerk_verwijder IS NULL) kin
WHERE m.mld_stdmelding_key = std.mld_stdmelding_key
AND std.mld_ins_discipline_key = d.ins_discipline_key
AND d.ins_srtdiscipline_key = sd.ins_srtdiscipline_key
@@ -4662,7 +4715,11 @@ AS
AND tf.fac_usrdata_code <> 'A'
AND o.mld_opdr_key = ok.mld_opdr_key
AND o.mld_opdr_key = nb.mld_opdr_key(+)
AND o.mld_opdr_key = kin.mld_opdr_key(+);
AND o.mld_opdr_key = kin.mld_opdr_key(+)
AND COALESCE(o.prs_kostenplaats_key, m.prs_kostenplaats_key) = k.prs_kostenplaats_key(+)
AND o.mld_opdr_key = f.mld_opdr_key(+)
AND f.fin_factuur_key = fr.fin_factuur_key(+)
AND fr.fin_btwtabelwaarde_key = btw.fin_btwtabelwaarde_key(+);
CREATE OR REPLACE VIEW vbxx_v_kosten_doorb_frozen
AS
@@ -4829,6 +4886,7 @@ BEGIN
FROM alg_onrgoedkenmerk aogk, alg_kenmerk k
WHERE aogk.alg_kenmerk_key = k.alg_kenmerk_key -- boekmaand offset
AND k.alg_kenmerk_code = 'BOEKMNDOFFSET'
AND k.alg_kenmerk_verwijder IS NULL
AND alg_onrgoed_key = d.alg_district_key),
0)),
'yyyymm')
@@ -4836,10 +4894,11 @@ BEGIN
FROM alg_district d
WHERE alg_district_key = p_district_key;
SELECT alg_kenmerk_key
SELECT k.alg_kenmerk_key
INTO v_datum_pro_forma_kenmerk_key
FROM alg_kenmerk
WHERE alg_kenmerk_code = 'DATUMPROFORMA';
FROM alg_kenmerk k
WHERE k.alg_kenmerk_code = 'DATUMPROFORMA'
AND k.alg_kenmerk_verwijder IS NULL;
ALG.upsertkenmerk (v_datum_pro_forma_kenmerk_key, p_district_key ,to_char(SYSDATE, 'dd-mm-yyyy hh24:mi:ss')); -- Readonly datum pro forma
@@ -4851,6 +4910,7 @@ BEGIN
FROM mld_kenmerk k, mld_srtkenmerk sk
WHERE k.mld_srtkenmerk_key = sk.mld_srtkenmerk_key
AND sk.mld_srtkenmerk_code = 'FINAKKOORD'
AND k.mld_kenmerk_verwijder IS NULL
AND k.mld_typeopdr_key = rec.opdrachttype_key;
-- zet de opdracht op 'Gereed voor facturatie'
@@ -4906,6 +4966,7 @@ BEGIN
FROM alg_onrgoedkenmerk aogk, alg_kenmerk k
WHERE aogk.alg_kenmerk_key = k.alg_kenmerk_key
AND k.alg_kenmerk_code = 'BOEKMNDOFFSET' -- boekmaand offset
AND k.alg_kenmerk_verwijder IS NULL
AND alg_onrgoed_key = d.alg_district_key),
0)),
'yyyymm')
@@ -4967,7 +5028,8 @@ BEGIN
FROM mld_kenmerk k, mld_srtkenmerk sk
WHERE k.mld_typeopdr_key = rec.opdrachttype_key
AND k.mld_srtkenmerk_key = sk.mld_srtkenmerk_key
AND sk.mld_srtkenmerk_code = 'BOEKMAAND';
AND sk.mld_srtkenmerk_code = 'BOEKMAAND'
AND k.mld_kenmerk_verwijder IS NULL;
FLX.setflex('OPD', v_boekmaand_kenmerk_key, rec.mld_opdr_key, v_boekmaand);
END;
@@ -4976,12 +5038,14 @@ BEGIN
SELECT alg_kenmerk_key
INTO v_exp_proforma_kenmerk_key
FROM alg_kenmerk k
WHERE k.alg_kenmerk_code = 'EXPROFORMA';
WHERE k.alg_kenmerk_code = 'EXPROFORMA'
AND k.alg_kenmerk_verwijder IS NULL;
ALG.upsertkenmerk (v_exp_proforma_kenmerk_key, p_district_key ,to_char(SYSDATE, 'dd-mm-yyyy hh24:mi:ss')); -- Readonly export datum pro forma
SELECT alg_kenmerk_key
INTO v_boekmaand_kenmerk_key
FROM alg_kenmerk k
WHERE k.alg_kenmerk_code = 'BOEKMAAND';
WHERE k.alg_kenmerk_code = 'BOEKMAAND'
AND k.alg_kenmerk_verwijder IS NULL;
ALG.upsertkenmerk (v_boekmaand_kenmerk_key, p_district_key ,v_boekmaand); -- Readonly boekmaand laatste export veld.
END;
/
@@ -5152,10 +5216,11 @@ IS
fin_factuur_opmerking = v_factuur_opmerking
WHERE fin_factuur_key = p_factuur_key;
SELECT fin_kenmerk_key
SELECT k.fin_kenmerk_key
INTO v_kenmerk_key_foutcode
FROM fin_kenmerk
WHERE fin_kenmerk_code = 'FOUTCODE';
FROM fin_kenmerk k
WHERE k.fin_kenmerk_code = 'FOUTCODE'
AND k.fin_kenmerk_verwijder IS NULL;
v_foutcode := COALESCE(FAC.SAFE_TO_NUMBER(FLX.getflex ('FIN', v_kenmerk_key_foutcode, p_factuur_key)),0);
v_verschil := BITAND(v_foutcode, p_foutcode);
@@ -5599,36 +5664,42 @@ AS
FROM fin_kenmerkfactuur kf, fin_kenmerk k
WHERE kf.fin_kenmerk_key = k.fin_kenmerk_key
AND k.fin_kenmerk_code = 'FOUTCODE'
AND k.fin_kenmerk_verwijder IS NULL
AND BITAND (FAC.SAFE_TO_NUMBER (fin_kenmerkfactuur_waarde), 1) <> 0
UNION ALL
SELECT kf.fin_factuur_key, 'ontbrekende orderreferentie' foutmelding
FROM fin_kenmerkfactuur kf, fin_kenmerk k
WHERE kf.fin_kenmerk_key = k.fin_kenmerk_key
AND k.fin_kenmerk_code = 'FOUTCODE'
AND k.fin_kenmerk_verwijder IS NULL
AND BITAND (FAC.SAFE_TO_NUMBER (fin_kenmerkfactuur_waarde), 2) <> 0
UNION ALL
SELECT kf.fin_factuur_key, 'fout in bedrijfsherkenning' foutmelding
FROM fin_kenmerkfactuur kf, fin_kenmerk k
WHERE kf.fin_kenmerk_key = k.fin_kenmerk_key
AND k.fin_kenmerk_code = 'FOUTCODE'
AND k.fin_kenmerk_verwijder IS NULL
AND BITAND (FAC.SAFE_TO_NUMBER (fin_kenmerkfactuur_waarde), 4) <> 0
UNION ALL
SELECT kf.fin_factuur_key, 'overige fout uit import' foutmelding
FROM fin_kenmerkfactuur kf, fin_kenmerk k
WHERE kf.fin_kenmerk_key = k.fin_kenmerk_key
AND k.fin_kenmerk_code = 'FOUTCODE'
AND k.fin_kenmerk_verwijder IS NULL
AND BITAND (FAC.SAFE_TO_NUMBER (fin_kenmerkfactuur_waarde), 8) <> 0
UNION ALL
SELECT kf.fin_factuur_key, 'dubbele factuur' foutmelding
FROM fin_kenmerkfactuur kf, fin_kenmerk k
WHERE kf.fin_kenmerk_key = k.fin_kenmerk_key
AND k.fin_kenmerk_code = 'FOUTCODE'
AND k.fin_kenmerk_verwijder IS NULL
AND BITAND (FAC.SAFE_TO_NUMBER (fin_kenmerkfactuur_waarde), 16) <> 0
UNION ALL
SELECT kf.fin_factuur_key, 'verzamelfactuur' foutmelding
FROM fin_kenmerkfactuur kf, fin_kenmerk k
WHERE kf.fin_kenmerk_key = k.fin_kenmerk_key
AND k.fin_kenmerk_code = 'FOUTCODE'
AND k.fin_kenmerk_verwijder IS NULL
AND BITAND (FAC.SAFE_TO_NUMBER (fin_kenmerkfactuur_waarde), 32) <> 0) bi,
(SELECT fo.fin_factuur_key, mld_uitvoerende_keys prs_bedrijf_key
FROM mld_opdr o, fin_factuur fo
@@ -5656,10 +5727,12 @@ AS
FROM fin_kenmerkfactuur kf, fin_kenmerk k
WHERE kf.fin_kenmerk_key = k.fin_kenmerk_key
AND k.fin_kenmerk_code = 'FOUTCODE'
AND k.fin_kenmerk_verwijder IS NULL
AND fin_kenmerkfactuur_waarde <> '0') kff,
(SELECT fin_factuur_key, fin_kenmerkfactuur_waarde
FROM fin_kenmerkfactuur kf, fin_kenmerk k
WHERE kf.fin_kenmerk_key = k.fin_kenmerk_key
AND k.fin_kenmerk_verwijder IS NULL
AND k.fin_kenmerk_code = 'MAREON_BRON') kfb
WHERE f.fin_factuur_key = kff.fin_factuur_key(+)
AND f.fin_factuur_key = kfb.fin_factuur_key(+)