48 lines
1.4 KiB
Plaintext
48 lines
1.4 KiB
Plaintext
CREATE OR REPLACE TRIGGER EFT_NOM.POD_AUDIT_INUS
|
|
|
|
AFTER DELETE
|
|
ON INTERMEDIARY_USERS
|
|
FOR EACH ROW
|
|
DECLARE
|
|
|
|
--
|
|
CURSOR c_syus IS
|
|
SELECT db_username
|
|
FROM system_users
|
|
WHERE syus_id = :old.syus_id;
|
|
--
|
|
CURSOR c_inte IS
|
|
SELECT name
|
|
FROM intermediaries
|
|
WHERE inte_id = :old.inte_id;
|
|
--
|
|
l_db_username system_users.db_username%TYPE;
|
|
l_inte_name intermediaries.name%TYPE;
|
|
--
|
|
BEGIN
|
|
--
|
|
OPEN c_syus;
|
|
FETCH c_syus INTO l_db_username;
|
|
CLOSE c_syus;
|
|
--
|
|
OPEN c_inte;
|
|
FETCH c_inte INTO l_inte_name;
|
|
CLOSE c_inte;
|
|
--
|
|
amfr_journal.log_transaction('DELETE',
|
|
'INTERMEDIARY_USERS',
|
|
name_value_tab(
|
|
name_value_rec('DB USERNAME',l_db_username),
|
|
name_value_rec('INTERMEDIARY',l_inte_name),
|
|
name_value_rec('CREATED_BY',:old.CREATED_BY),
|
|
name_value_rec('CREATED_ON',:old.CREATED_ON),
|
|
name_value_rec('UPDATED_BY',:old.UPDATED_BY),
|
|
name_value_rec('UPDATED_ON',:old.UPDATED_ON)
|
|
),
|
|
amfr_journal.G_name_value_tab
|
|
);
|
|
--
|
|
END;
|
|
/
|
|
|