From 8270c0db04d92feed9a4c9921c5b55cdd4b95691 Mon Sep 17 00:00:00 2001
From: Arthur Egberink <arthur.egberink@aareon.nl>
Date: Fri, 14 Jan 2022 14:28:00 +0000
Subject: [PATCH] LPNL#67364 -- Voorzieningen opnemen in het rapport
 verplichtingen.

svn path=/Customer/trunk/; revision=54538
---
 LPNL/LPNL.sql | 47 ++++++++++++++++++++++++++++++++++++++++++++++-
 1 file changed, 46 insertions(+), 1 deletion(-)

diff --git a/LPNL/LPNL.sql b/LPNL/LPNL.sql
index 094d55b71..b57d90ae5 100644
--- a/LPNL/LPNL.sql
+++ b/LPNL/LPNL.sql
@@ -622,6 +622,7 @@ AS
            mld_statusopdr        so,
            fin_factuur_statuses  sf
      WHERE     o.mld_opdr_key = f.mld_opdr_key(+)
+           AND o.mld_statusopdr_key NOT IN (1,2) --             Afgewezen, Niet akkoord
            AND o.mld_melding_key = m.mld_melding_key
            AND COALESCE(mld_opdr_kosten, 0) <> 0
            AND m.mld_stdmelding_key = std.mld_stdmelding_key
@@ -666,6 +667,8 @@ AS
            cnt_discipline        d
      WHERE     c.cnt_contract_key = f.cnt_contract_key(+)
            AND c.ins_discipline_key = d.ins_discipline_key
+           AND d.ins_discipline_key <> 461 -- Voorzieningen
+           AND c.cnt_contract_verwijder IS NULL
            AND c.cnt_contract_key = cp.cnt_contract_key
            AND cp.cnt_alg_plaats_key = l.alg_locatie_key
            AND l.alg_locatie_key = g.alg_locatie_key
@@ -676,12 +679,54 @@ AS
            AND c.cnt_contract_key = cfs.cnt_contract_key
            AND TO_DATE (cnt_factuurschema_boekmaand, 'yyyy-mm') BETWEEN TRUNC (
                                                                             SYSDATE,
-                                                                            'y')
+                                                                            'y')-365
                                                                     AND   TRUNC (
                                                                               SYSDATE,
                                                                               'y')
                                                                         + (2*364)
            AND cfs.cnt_factuurschema_boekmaand = f.fin_factuur_boekmaand(+);
+    UNION ALL  -- Voorzieningen cnt_discipline_key = 461
+    SELECT 'C' || c.cnt_contract_key,
+           alg_locatie_omschrijving,
+           prs_kostenplaats_omschrijving,
+           k.prs_kostenplaats_nr,
+           prs_kostensoort_oms,
+           prs_kostensoort_opmerking,
+           NULL prs_bedrijf_naam,
+           cnt_contract_omschrijving,
+           NULL,
+           -- (Gewogen contract kosten per locatie = voorziening per locatie) - Kosten voor die locatie en de kostensoort van het contract
+           -- gedurende de looptijd van het contract (voorziening)
+           c.cnt_contract_kosten * (COALESCE(cp.cnt_contract_plaats_gewicht, cnt_contract_kosten) / COALESCE(cnt_contract_kosten, 0))
+              - (SELECT COALESCE(SUM(mld_opdr_kosten),0)
+                   FROM mld_opdr o, mld_melding m
+                  WHERE     o.mld_melding_key = m.mld_melding_key
+                        AND o.prs_kostensoort_key = c.prs_kostensoort_key
+                        AND m.mld_alg_locatie_key = l.alg_locatie_key
+                        AND o.mld_statusopdr_key NOT IN (1,2) --             Afgewezen, Niet akkoord
+                        AND o.mld_opdr_datumbegin BETWEEN c.cnt_contract_looptijd_van AND c.cnt_contract_looptijd_tot),
+           NULL fin_factuur_statuses_omschr,
+           NULL fin_factuur_totaal,
+           NULL fin_factuur_datum,
+           NULL fin_factuur_nr,
+           c.cnt_contract_looptijd_van
+      FROM cnt_contract          c,
+           cnt_contract_plaats   cp,
+           prs_kostensoort       ks,
+           prs_kostenplaats      k,
+           alg_locatie           l,
+           alg_gebouw            g,
+           cnt_discipline        d
+     WHERE     c.ins_discipline_key = d.ins_discipline_key
+           AND d.ins_discipline_key = 461
+           AND c.cnt_contract_verwijder IS NULL
+           AND c.cnt_contract_key = cp.cnt_contract_key
+           AND cp.cnt_alg_plaats_key = l.alg_locatie_key
+           AND l.alg_locatie_key = g.alg_locatie_key
+           AND g.prs_kostenplaats_key = k.prs_kostenplaats_key
+           AND c.prs_kostensoort_key = COALESCE(ks.prs_kostensoort_key, d.prs_kostensoort_key)
+           AND cnt_contract_looptijd_van BETWEEN TRUNC (SYSDATE, 'y') - 365
+                                             AND TRUNC (SYSDATE, 'y') + (2*364);
 
 
 -- Dagelijkse taak