YAXX#89692 Reversed billing factuur naar de 8e van de maand.

svn path=/Customer/; revision=69650
2025-07-03 09:49:08 +00:00
parent 157a60a41a
commit 439fc3a740
1 changed files with 98 additions and 0 deletions
--- a/onces/YASK/YAXX#89692.sql
+++ b/onces/YASK/YAXX#89692.sql
@@ -0,0 +1,98 @@
+--
+-- $Id$
+--
+--
+
+DEFINE thisfile = 'YASK#89692.SQL'
+DEFINE dbuser   = '^YASK'
+
+SET ECHO ON
+SET DEFINE ON
+COLUMN fcltlogfile NEW_VALUE fcltlogfile NOPRINT;
+COLUMN fcltcusterr NEW_VALUE fcltcusterr NOPRINT;
+WHENEVER SQLERROR CONTINUE;
+SELECT adm.getscriptspoolfile('&thisfile') AS fcltlogfile FROM DUAL;
+SPOOL &fcltlogfile
+WHENEVER SQLERROR EXIT;
+SELECT adm.checkscriptcust('&dbuser') AS fcltcusterr FROM DUAL;
+WHENEVER SQLERROR CONTINUE;
+PROMPT &fcltcusterr
+SET DEFINE OFF
+
+------ payload begin ------
+
+-- Notificatiejob moet op de 8e draaien ipv de 5e. Aangezien de vbxx meerdere wijzigingen bevat die nog niet doorgevoerd
+-- mogen worden is er een once voor gemaakt.
+CREATE OR REPLACE VIEW vbxx_v_noti_te_factureren
+(
+   code,
+   sender,
+   receiver,
+   text,
+   key,
+   xkey,
+   xemail,
+   xmobile
+)
+AS
+   WITH cp
+           AS (SELECT cp1.prs_bedrijf_key, cp1.prs_contactpersoon_email, p1.prs_perslid_email
+                 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,
+          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 vbxx_v_frozen_fact v,
+          cp cp,
+          fac_usrrap r,
+          fac_srtnotificatie sn
+    WHERE TO_CHAR (SYSDATE, 'dd') = '08' -- 8e 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) = 'VBXX_V_FROZEN_FACT'
+          AND sn.fac_srtnotificatie_code = 'CUST90'
+   UNION ALL
+   SELECT DISTINCT sn.fac_srtnotificatie_code,
+          NULL,
+          --gg.prs_perslid_key,                      -- Schiphol-contactpersonen
+          NULL,
+          REPLACE (sn.fac_srtnotificatie_oms, '##MND##', v.maand),
+          r.fac_usrrap_key,
+          NULL,                     -- Geen extra_key, dus de hele rapportage!
+          p.prs_perslid_email,
+          NULL
+     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') = '08' -- 8e van de maand!
+          AND v.maand = TO_CHAR (TRUNC (SYSDATE, 'mm') - 1, 'yyyy-mm')
+          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) = 'VBXX_V_FROZEN_FACT'
+          AND sn.fac_srtnotificatie_code = 'CUST91';
+
+------ payload end   ------
+
+SET DEFINE OFF
+BEGIN adm.systrackscriptId ('$Id$', 1); END;
+/
+
+COMMIT;
+SET ECHO OFF
+SPOOL OFF
+SET DEFINE ON
+PROMPT Logfile of this upgrade is: &fcltlogfile