65 lines
3.5 KiB
Plaintext
65 lines
3.5 KiB
Plaintext
CREATE OR REPLACE TRIGGER EFT_NOM.POI_AUDIT_CUST
|
|
|
|
AFTER INSERT
|
|
ON CUSTOMERS
|
|
FOR EACH ROW
|
|
DECLARE
|
|
|
|
--
|
|
CURSOR c_cuty IS
|
|
SELECT description
|
|
FROM customer_types
|
|
WHERE cuty_id = :new.cuty_id;
|
|
--
|
|
CURSOR c_syus IS
|
|
SELECT first_name||' '||last_name
|
|
FROM system_users
|
|
WHERE syus_id = :new.kam_manager_syus_id;
|
|
--
|
|
l_cuty_desc customer_types.description%TYPE;
|
|
l_kam_manager_new VARCHAR2(255);
|
|
--
|
|
BEGIN
|
|
--
|
|
OPEN c_cuty;
|
|
FETCH c_cuty INTO l_cuty_desc;
|
|
CLOSE c_cuty;
|
|
--
|
|
amfr_journal.log_transaction('INSERT',
|
|
'CUSTOMERS',
|
|
amfr_journal.g_name_value_tab, -- Empty table
|
|
name_value_tab(
|
|
name_value_rec('CUSTOMER IDENTIFIER',:new.cust_id),
|
|
name_value_rec('CUSTOMER CODE',:new.CODE),
|
|
name_value_rec('CUSTOMER NAME',:new.NAME),
|
|
name_value_rec('PERIOD_START',:new.PERIOD_START),
|
|
name_value_rec('PERIOD_END',:new.PERIOD_END),
|
|
name_value_rec('CREATED_BY',:new.CREATED_BY),
|
|
name_value_rec('CREATED_ON',:new.CREATED_ON),
|
|
name_value_rec('CUSTOMER DESCRIPTION',:new.DESCRIPTION),
|
|
name_value_rec('UPDATED_BY',:new.UPDATED_BY),
|
|
name_value_rec('UPDATED_ON',:new.UPDATED_ON),
|
|
name_value_rec('EMAIL ADDRESS',:new.EMAIL_ADDRESS),
|
|
name_value_rec('TELEPHONE',:new.TELEPHONE),
|
|
name_value_rec('FAX',:new.FAX),
|
|
name_value_rec('CUSTOMER TYPE',l_cuty_desc),
|
|
name_value_rec('PRIMARY CONTACT',:new.PRIMARY_CONTACT),
|
|
name_value_rec('KAM MANAGER',l_kam_manager_new),
|
|
name_value_rec('KAM TELEPHONE',:new.KAM_TELEPHONE),
|
|
name_value_rec('CUSTOMER STATUS',:new.STATUS),
|
|
name_value_rec('LETTER SUBJECT',:new.LETTER_SUBJECT),
|
|
name_value_rec('LETTER CONTENT',:new.LETTER_CONTENT),
|
|
name_value_rec('CONFIRMATION HEADER',:new.CONFIRMATION_HEADER),
|
|
name_value_rec('CONFIRMATION ADDRESS',:new.CONFIRMATION_ADDRESS),
|
|
--name_value_rec('SUBMISSION DEADLINE',:new.SUBMISSION_DEADLINE),
|
|
name_value_rec('AUTO GENERATE CONFIRMATION AM',:new.AUTO_GEN_CONF_AM),
|
|
name_value_rec('AUTO GENERATE CONFIRMATION PM',:new.AUTO_GEN_CONF_PM),
|
|
name_value_rec('IND DEADLINE FOR NOM SUBMIS',:new.IND_DEADLINE_FOR_NOM_SUBMIT),
|
|
name_value_rec('PRIMARY CONTACT TELEPHONE NO',:new.PRIMARY_CONTACT_TEL)
|
|
)
|
|
);
|
|
--
|
|
END;
|
|
/
|
|
|