Files
mip/Data/BulkLoad/EFT/Nominations/plsql/poi_audit_inus.trg

48 lines
1.4 KiB
Plaintext

CREATE OR REPLACE TRIGGER EFT_NOM.POI_AUDIT_INUS
AFTER INSERT
ON INTERMEDIARY_USERS
FOR EACH ROW
DECLARE
--
CURSOR c_syus IS
SELECT db_username
FROM system_users
WHERE syus_id = :new.syus_id;
--
CURSOR c_inte IS
SELECT name
FROM intermediaries
WHERE inte_id = :new.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('INSERT',
'INTERMEDIARY_USERS',
amfr_journal.G_name_value_tab,
name_value_tab(
name_value_rec('DB USERNAME',l_db_username),
name_value_rec('INTERMEDIARY',l_inte_name),
name_value_rec('CREATED_BY',:new.CREATED_BY),
name_value_rec('CREATED_ON',:new.CREATED_ON),
name_value_rec('UPDATED_BY',:new.UPDATED_BY),
name_value_rec('UPDATED_ON',:new.UPDATED_ON)
)
);
--
END;
/