Merge branch '4_7_x' of https://github.com/xtuple/xtuple into i24559_xtlocks
[xtuple] / foundation-database / public / trigger_functions / usrpriv.sql
1 CREATE OR REPLACE FUNCTION _usrprivTrigger() RETURNS TRIGGER AS $$
2 -- Copyright (c) 1999-2014 by OpenMFG LLC, d/b/a xTuple. 
3 -- See www.xtuple.com/CPAL for the full text of the software license.
4 DECLARE
5   _check BOOLEAN;
6   _returnVal INTEGER;
7 BEGIN
8   -- This looks like a candidate for a foreign key but isn't.
9   -- fkeys don't work if the foreign key value resides in a child of the 
10   -- table and not the table itself.
11   IF ((TG_OP = 'UPDATE' OR TG_OP = 'INSERT') AND
12       (NOT EXISTS(SELECT priv_id
13                   FROM priv
14                   WHERE (priv_id=NEW.usrpriv_priv_id)))) THEN
15     RAISE EXCEPTION 'Privilege id % does not exist or is part of a disabled package.',
16                 NEW.usrpriv_priv_id;
17     RETURN OLD;
18
19   ELSIF (TG_OP = 'DELETE') THEN
20     RETURN OLD;
21   END IF;
22
23   RETURN NEW;
24 END;
25 $$ LANGUAGE 'plpgsql';
26
27 SELECT dropIfExists('trigger', 'usrprivTrigger');
28 CREATE TRIGGER usrprivTrigger BEFORE INSERT OR UPDATE ON usrpriv FOR EACH ROW EXECUTE PROCEDURE _usrprivTrigger();