BSSC#55692 Facturatieproces (alle contract- en meldingfacturatie live)

svn path=/Customer/trunk/; revision=58836
This commit is contained in:
Maarten van der Heide
2023-01-26 12:50:34 +00:00
parent d2ac994fee
commit 5e8053b4da

View File

@@ -1658,7 +1658,6 @@ AS
SELECT '[' || v.refid || '|' || v.prs_debiteur_naam || '|' || v.regel || '] ' aanduiding,
v.*
FROM bssc_v_fact_actual v
WHERE SUBSTR (v.regel, 1, 3) = 'CHV' -- TODO:Per februari ook CMD en dan deze regel weg!
ORDER BY v.prs_bedrijf_key, v.po_nr, v.sortering, v.regel, v.alg_plaatsaanduiding;
-- Verstuur verkoopfactuur naar huurder.
@@ -1703,10 +1702,9 @@ BEGIN
-- count_work_days (d1,d2) bepaalt het #werkdagen van d1 tot d2 (als d1=d2,
-- dan return 0); daarom bepalen tov. laatste dag van vorige maand!
--IF TO_CHAR (SYSDATE, 'dd') = '15' -- TODO:Weer terug naar nacht na 1e werkdag van de maand!
--IF FAC.count_work_days (TRUNC (SYSDATE, 'mm') - 1, SYSDATE - 1) = 1 -- Nacht na 1e werkdag van de maand!
-- AND TO_CHAR (SYSDATE - 1, 'd') BETWEEN '2' AND '6'
-- AND v_holiday = 0
IF TO_CHAR (SYSDATE, 'dd') = '15' -- TODO:Weer terug naar nacht na 1e werkdag van de maand!
IF FAC.count_work_days (TRUNC (SYSDATE, 'mm') - 1, SYSDATE - 1) = 1 -- Nacht na 1e werkdag van de maand!
AND TO_CHAR (SYSDATE - 1, 'd') BETWEEN '2' AND '6'
AND v_holiday = 0
THEN
v_fact_count := 0;
v_amount_sum := 0;
@@ -3774,7 +3772,7 @@ BEGIN
-- LET OP: ADDD-export correctie- <20>n losverkoopfacturen (= boekingsgangen)
-- draait dagelijks na middernacht (begin van dag) en de verkoop wordt ook
-- elke nacht doorgezet (mits vrijgegeven!).
IF 1 = 0
IF 1 = 1
THEN
v_fact_count := 0;
v_amount_sum := 0;
@@ -4227,7 +4225,8 @@ AS
NULL prj_activa, -- Hard op NULL
netsum bedrag, -- Totaalbedrag incl. BTW per factuur!
'debit' debitcredit,
TRIM (DECODE (aant, 1, tfoms, SUBSTR (tfoms, 1, INSTR (tfoms, '/')) || '...') || ' Total') omschrijving,
--TRIM (DECODE (aant, 1, tfoms, SUBSTR (tfoms, 1, INSTR (tfoms, '/')) || '...') || ' Total') omschrijving,
TRIM (DECODE (mld_melding_key, NULL, DECODE (aant, 1, tfoms, ''), tfoms) || ' Total') omschrijving,
NULL btwcode, -- Hard op NULL
mld_melding_key
FROM ( SELECT v.fin_verkoopfactuur_id, v.debiteur_nr, v.factuurdatum, v.maand, v.vervaldatum,
@@ -4243,7 +4242,7 @@ AS
FROM (SELECT fin_verkoopfactuur_id, debiteur_nr, factuurdatum, maand, vervaldatum,
fin_btwtabelwaarde_code,
mndnet,
DECODE (mld_melding_key, NULL, regel_oms, regel) tfoms, -- Voor MLD=regel_oms en voor RES=regel!
DECODE (mld_melding_key, NULL, regel, regel_oms) tfoms, -- Voor MLD=regel_oms en voor RES=regel!
mld_melding_key
FROM bssc_v_addd_frozen
WHERE SUBSTR (po_nr, 1, 3) = 'CHV'
@@ -4277,7 +4276,7 @@ AS
NULL prj_activa, -- Hard op NULL
SUM (v.mndnet) bedrag, -- Totaalbedrag excl. BTW gegroepeerd over andere kolommen!
'credit' debitcredit, -- TODO:Altijd 'credit' (ook negatieve bedragen)???
SUBSTR (v.regel, 1, 40) omschrijving,
SUBSTR (REPLACE (REPLACE (v.regel, CHR (10), ''), CHR (13), ' '), 1, 40) omschrijving,
DECODE (v.fin_btwtabelwaarde_code, 'H', 'VH', 'L', 'VL', 'V', DECODE (kl.prs_kenmerklink_waarde, '-1', 'VBUIEU_VERL', 'VBINEU_VERL'), 'VN') btwcode,
MIN (v.mld_melding_key) mld_melding_key
FROM bssc_v_addd_frozen v,
@@ -4297,7 +4296,7 @@ AS
NULL,
NULL,
'credit',
SUBSTR (v.regel, 1, 40),
SUBSTR (REPLACE (REPLACE (v.regel, CHR (10), ''), CHR (13), ' '), 1, 40),
DECODE (v.fin_btwtabelwaarde_code, 'H', 'VH', 'L', 'VL', 'V', DECODE (kl.prs_kenmerklink_waarde, '-1', 'VBUIEU_VERL', 'VBINEU_VERL'), 'VN')
UNION ALL
SELECT fin_verkoopfactuur_id || debiteur_nr || '????' sortering,
@@ -4546,7 +4545,8 @@ AS
NULL prj_activa, -- Hard op NULL
netsum bedrag, -- Totaalbedrag incl. BTW per factuur!
'debit' debitcredit,
TRIM (DECODE (aant, 1, tfoms, SUBSTR (tfoms, 1, INSTR (tfoms, '/')) || '...') || ' Total') omschrijving,
--TRIM (DECODE (aant, 1, tfoms, SUBSTR (tfoms, 1, INSTR (tfoms, '/')) || '...') || ' Total') omschrijving,
TRIM (DECODE (mld_melding_key, NULL, DECODE (aant, 1, tfoms, ''), tfoms) || ' Total') omschrijving,
NULL btwcode, -- Hard op NULL
mld_melding_key
FROM ( SELECT v.fin_verkoopfactuur_id, v.debiteur_nr, v.factuurdatum, v.maand, v.vervaldatum,
@@ -4562,7 +4562,7 @@ AS
FROM (SELECT fin_verkoopfactuur_id, debiteur_nr, factuurdatum, maand, vervaldatum,
fin_btwtabelwaarde_code,
mndnet,
DECODE (mld_melding_key, NULL, regel_oms, regel) tfoms, -- Voor MLD=regel_oms en voor RES=regel!
DECODE (mld_melding_key, NULL, regel, regel_oms) tfoms, -- Voor MLD=regel_oms en voor RES=regel!
mld_melding_key
FROM bssc_v_addd_frozen
WHERE SUBSTR (po_nr, 1, 3) = 'CMD'
@@ -4596,7 +4596,7 @@ AS
NULL prj_activa, -- Hard op NULL
SUM (v.mndnet) bedrag, -- Totaalbedrag excl. BTW gegroepeerd over andere kolommen!
'credit' debitcredit, -- TODO:Altijd 'credit' (ook negatieve bedragen)???
SUBSTR (v.regel, 1, 40) omschrijving,
SUBSTR (REPLACE (REPLACE (v.regel, CHR (10), ''), CHR (13), ' '), 1, 40) omschrijving,
DECODE (v.fin_btwtabelwaarde_code, 'H', 'VH', 'L', 'VL', 'V', DECODE (kl.prs_kenmerklink_waarde, '-1', 'VBUIEU_VERL', 'VBINEU_VERL'), 'VN') btwcode,
MIN (v.mld_melding_key) mld_melding_key
FROM bssc_v_addd_frozen v,
@@ -4616,7 +4616,7 @@ AS
NULL,
NULL,
'credit',
SUBSTR (v.regel, 1, 40),
SUBSTR (REPLACE (REPLACE (v.regel, CHR (10), ''), CHR (13), ' '), 1, 40),
DECODE (v.fin_btwtabelwaarde_code, 'H', 'VH', 'L', 'VL', 'V', DECODE (kl.prs_kenmerklink_waarde, '-1', 'VBUIEU_VERL', 'VBINEU_VERL'), 'VN')
UNION ALL
SELECT fin_verkoopfactuur_id || debiteur_nr || '????' sortering,