41 lines
792 B
Plaintext
41 lines
792 B
Plaintext
/*
|
|
* $Revision$
|
|
* $Id$
|
|
*
|
|
*/
|
|
|
|
CREATE_TRIGGER(aut_t_aut_idp_B_IU)
|
|
BEFORE INSERT OR UPDATE ON aut_idp
|
|
FOR EACH ROW
|
|
BEGIN
|
|
UPDATE_PRIMARY_KEY(aut_idp_key, aut_s_aut_idp_key);
|
|
:new.aut_idp_code := UPPER(:new.aut_idp_code);
|
|
END;
|
|
/
|
|
|
|
CREATE_TRIGGER(aut_t_aut_idp_map_B_I)
|
|
BEFORE INSERT ON aut_idp_map
|
|
FOR EACH ROW
|
|
BEGIN
|
|
UPDATE_PRIMARY_KEY(aut_idp_map_key, aut_s_aut_idp_map_key);
|
|
END;
|
|
/
|
|
|
|
CREATE_TRIGGER(aut_t_aut_client_B_I)
|
|
BEFORE INSERT ON aut_client
|
|
FOR EACH ROW
|
|
BEGIN
|
|
UPDATE_PRIMARY_KEY(aut_client_key, aut_s_aut_client_key);
|
|
END;
|
|
/
|
|
|
|
CREATE_TRIGGER(aut_t_aut_client_perslid_B_I)
|
|
BEFORE INSERT ON aut_client_perslid
|
|
FOR EACH ROW
|
|
BEGIN
|
|
UPDATE_PRIMARY_KEY(aut_client_perslid_key, aut_s_aut_client_perslid_key);
|
|
END;
|
|
/
|
|
|
|
REGISTERRUN('$Id$')
|