RWSN#31113: Notificatie MLDBE2 aanzetten met beperkte scope.

svn path=/Database/trunk/; revision=24203

FAC/FAC_PAC.SRC

@@ -2872,6 +2872,7 @@ CREATE OR REPLACE PACKAGE BODY fac AS
         lnotify                  mld_disc_params.mld_disc_params_notify%TYPE;
         lmnotify                 mld_stdmelding.mld_stdmelding_notify%TYPE;
         lbonotify                mld_disc_params.mld_disc_params_bonotify%TYPE;
+        lbenotify                mld_disc_params.mld_disc_params_benotify%TYPE;
         lworkflowstep_key        mld_melding.mld_workflowstep_key%TYPE;
         lstart_key               mld_melding.mld_melding_start_key%TYPE;
         luitvtype                mld_v_uitvoerende.TYPE%TYPE;
@@ -2937,6 +2938,7 @@ CREATE OR REPLACE PACKAGE BODY fac AS
                        stdm.mld_stdmelding_notify,
                        d.ins_discipline_email,
                        mp.mld_disc_params_bonotify,
+                       mp.mld_disc_params_benotify,
                        m.mld_melding_behandelaar_key,
                        m.mld_workflowstep_key,
                        m.mld_melding_start_key
@@ -2948,6 +2950,7 @@ CREATE OR REPLACE PACKAGE BODY fac AS
                        lmnotify,
                        lsender,
                        lbonotify,
+                       lbenotify,
                        lmldbehandelaar,
                        lworkflowstep_key,
                        lstart_key
@@ -2971,16 +2974,16 @@ CREATE OR REPLACE PACKAGE BODY fac AS
                 -- De normale notificatie gaat naar de melder
                 -- Moeten dus kijken of psrtnotificatiekey naar MLDBEH wijst
                 -- Dan moeten we ook MLDBE2 versturen naar de behandelaar, al was ik het zelf.
-                IF lcode = 'MLDBEH' AND lmldbehandelaar IS NOT NULL
+                IF lbenotify = 1 AND lcode = 'MLDBEH' AND lmldbehandelaar IS NOT NULL
                 THEN
                     lcode2 := 'MLDBE2';
                     lreceiver2 := lmldbehandelaar;
-
+                    
                     SELECT lcl.x('fac_srtnotificatie_oms', fac_srtnotificatie_key, fac_srtnotificatie_oms)
                       INTO loms2
                       FROM fac_srtnotificatie
                      WHERE fac_srtnotificatie_code = lcode2;
-
+                    
                     bericht2 := mld.mldsprintf (loms2, prefkey);
                 END IF;
 

MLD/MLD_TAB.SRC

@@ -59,6 +59,10 @@ CREATE_TABLE(mld_disc_params, 0)
     mld_disc_params_bonotify
         NUMBER(2)       -- valid are 0, 1 (and 2)
         DEFAULT 0,
+    mld_disc_params_benotify
+        NUMBER(1)       -- valid are 0, 1
+        DEFAULT 0
+        NOT NULL,
     mld_disc_params_fenotes
         NUMBER(2)       -- bitwise valid are 0, 1, 2 and 3 (0,1 = (default) niet/wel + 0,2 = vast/keuze)
         DEFAULT 0,

_UP/DB24to25.src

@@ -49,6 +49,17 @@ ALTER TABLE prs_bedrijf MODIFY prs_bedrijf_t_uitvoertijd DEFAULT MLD_T_UITVOERTI
 /////////////////////////////////////////////////////////////////////////////////////////// PNBR#28834
 ALTER TABLE bes_srtdeel ADD bes_srtdeel_maxbestel NUMBER(1) DEFAULT 0 NOT NULL;
 
+/////////////////////////////////////////////////////////////////////////////////////////// RWSN#31113
+ALTER TABLE mld_disc_params ADD mld_disc_params_benotify NUMBER(1) DEFAULT 0 NOT NULL;
+
+-- Voor de klanten die de MLDBE2 notificatie aan hebben staan, de waarde van het veld mld_disc_params_benotify voor alle vakgroepen op 1 zetten.
+UPDATE mld_disc_params
+   SET mld_disc_params_benotify = 1
+ WHERE EXISTS (SELECT sn.fac_srtnotificatie_mode
+                 FROM fac_srtnotificatie sn
+                WHERE sn.fac_srtnotificatie_code = 'MLDBE2'
+                  AND sn.fac_srtnotificatie_mode > 0);
+
 /////////////////////////////////////////////////////////////////////////////////////////// FSN#nnnn
 
 /////////////////////////////////////////////////////////////////////////////////////////// GENERAL