From d7bc21a0c4711e1ec55275fadf275124bd1b9b89 Mon Sep 17 00:00:00 2001
From: Erik Groener <erik.groener@aareon.nl>
Date: Fri, 20 May 2016 14:10:46 +0000
Subject: [PATCH] UWVA#36449 2016.1 RES/BEZ: notificatie
 bezoekersoproepsysteem.

svn path=/Database/branches/DB28/; revision=29478
---
 FAC/FAC_PAC.SRC | 28 +++++++++++++++-------------
 1 file changed, 15 insertions(+), 13 deletions(-)

diff --git a/FAC/FAC_PAC.SRC b/FAC/FAC_PAC.SRC
index 7f1b5058..617a48d2 100644
--- a/FAC/FAC_PAC.SRC
+++ b/FAC/FAC_PAC.SRC
@@ -3444,12 +3444,12 @@ CREATE OR REPLACE PACKAGE BODY fac AS
                 -- De normale notificatie gaat naar de contact (UWVA#19008)
                 -- Moeten dus kijken of psrtnotificatiekey naar BEZDON of BEZOUT wijst
                 -- Dan moeten we ook BEZDO2 of BEZOU2 versturen naar de host.
-                IF lcode = 'BEZDON'
+               IF lcode = 'BEZDON'
                 THEN
                     lcode2 := 'BEZDO2';
+                    res.notifypool(prefkey, lcode2);
                 ELSIF (lcode = 'BEZDO2' OR lcode = 'BEZUNI')
                 THEN
-                    lcode2 := 'BEZDO2';
                     res.notifypool(prefkey, lcode);
                     lcode := 'BEZDO2'; -- Ook undo-checkin behandelen als checkin.
                 ELSIF lcode = 'BEZOUT'
@@ -3646,17 +3646,19 @@ CREATE OR REPLACE PACKAGE BODY fac AS
 
         IF lcode2 IS NOT NULL AND lreceiver2 IS NOT NULL
         THEN
-            fac.putnotificationsrtprio (pperslid_key,
-                                        lreceiver2,
-                                        lcode2,
-                                        lrefkey,
-                                        bericht2,
-                                        NULL,
-                                        lemail,
-                                        lphone,
-                                        lxrefkey,
-                                        2,
-                                        lsender);
+            IF NOT(lcode = 'BEZDON' AND lcode2 = 'BEZDO2') THEN
+                fac.putnotificationsrtprio (pperslid_key,
+                                            lreceiver2,
+                                            lcode2,
+                                            lrefkey,
+                                            bericht2,
+                                            NULL,
+                                            lemail,
+                                            lphone,
+                                            lxrefkey,
+                                            2,
+                                            lsender);
+            END IF;
         END IF;
 
         IF lemail3 IS NOT NULL