admin/Database
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

UWVA#36449 2016.1 RES/BEZ: notificatie bezoekersoproepsysteem.

Browse Source 
svn path=/Database/branches/DB28/; revision=29478
This commit is contained in:
Erik Groener
2016-05-20 14:10:46 +00:00
parent 3ed06d9e01
commit d7bc21a0c4
1 changed files with 15 additions and 13 deletions
Download Patch File Download Diff File Expand all files Collapse all files

28
FAC/FAC_PAC.SRC
View File

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