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

LANS#13306 _default insert

Browse Source 
svn path=/Database/trunk/; revision=9897
This commit is contained in:
Peter Feij
2008-09-15 14:03:14 +00:00
parent d1c7b9d40a
commit cf7bfe26ad
1 changed files with 23 additions and 20 deletions
Download Patch File Download Diff File Expand all files Collapse all files

43
PRS/PRS_TRI.SRC
View File

@@ -1,7 +1,7 @@
/* CREA_TRI.SRC maakt de triggers aan voor PRS */
/* $Revision: 69 $
* $Modtime: 16-07-08 16:03 $
/* $Revision: 70 $
* $Modtime: 15-09-08 15:58 $
*/
#include "comsql.h"
@@ -190,25 +190,28 @@ CREATE_TRIGGER(prs_t_prs_perslid_A_IU)
AFTER INSERT OR UPDATE ON prs_perslid
FOR EACH ROW
BEGIN
IF :new.prs_perslid_verwijder IS NOT NULLDATUM
THEN
/*
* Als persoon een login krijgt, dan ook in de default autorisatiegroep als die nog geen rechten had
*/
IF :new.prs_perslid_oslogin IS NOT NULL AND :old.prs_perslid_oslogin IS NULL
THEN
BEGIN
INSERT INTO fac_gebruikersgroep(fac_groep_key,prs_perslid_key)
SELECT fac_groep_key,:new.prs_perslid_key
/*
* Als persoon een login krijgt, dan ook in de default autorisatiegroep als die nog geen rechten had
*/
IF :new.prs_perslid_verwijder IS NULLDATUM AND
:new.prs_perslid_oslogin IS NOT NULL AND :old.prs_perslid_oslogin IS NULL
THEN
BEGIN
INSERT INTO fac_gebruikersgroep
(fac_groep_key, prs_perslid_key)
SELECT fac_groep_key, :NEW.prs_perslid_key
FROM fac_groep
WHERE fac_groep_upper = '_DEFAULT'
AND fac_groep_verwijder IS NULL
AND NOT EXISTS (SELECT 'x' FROM fac_gebruikersgroep WHERE prs_perslid_key=:new.prs_perslid_key);
EXCEPTION
WHEN OTHERS THEN NULL;
END;
END IF;
END IF;
WHERE fac_groep_upper = '_DEFAULT'
AND fac_groep_verwijder IS NULL
AND NOT EXISTS (SELECT 'x'
FROM fac_gebruikersgroep
WHERE prs_perslid_key = :NEW.prs_perslid_key);
EXCEPTION
WHEN OTHERS
THEN
NULL;
END;
END IF;
END;
/