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

137 lines
7.1 KiB
Plaintext

CREATE OR REPLACE TRIGGER EFT_NOM.POU_AUDIT_CUST
AFTER UPDATE OF CONFIRMATION_ADDRESS
, LETTER_SUBJECT
, TELEPHONE
, PRIMARY_CONTACT_TEL
, CONFIRMATION_HEADER
, IND_DEADLINE_FOR_NOM_SUBMIT
, PERIOD_START
, KAM_TELEPHONE
, KAM_MANAGER_SYUS_ID
, CODE
, CUST_ID
, EMAIL_ADDRESS
, PRIMARY_CONTACT
, NAME
, AUTO_GEN_CONF_AM
, UPDATED_ON
, UPDATED_BY
, CREATED_ON
, LETTER_CONTENT
, FAX
, STATUS
, CUTY_ID
, PERIOD_END
, AUTO_GEN_CONF_PM
, CREATED_BY
, DESCRIPTION
ON CUSTOMERS
FOR EACH ROW
DECLARE
--
CURSOR c_cuty_old IS
SELECT description
FROM customer_types
WHERE cuty_id = :old.cuty_id;
--
CURSOR c_cuty_new IS
SELECT description
FROM customer_types
WHERE cuty_id = :old.cuty_id;
--
CURSOR c_syus(cp_syus_id IN NUMBER) IS
SELECT first_name||' '||last_name
FROM system_users
WHERE syus_id = cp_syus_id;
--
l_cuty_desc_old customer_types.description%TYPE;
l_cuty_desc_new customer_types.description%TYPE;
l_kam_manager_old VARCHAR2(255);
l_kam_manager_new VARCHAR2(255);
--
BEGIN
--
OPEN c_cuty_old;
FETCH c_cuty_old INTO l_cuty_desc_old;
CLOSE c_cuty_old;
--
OPEN c_cuty_new;
FETCH c_cuty_new INTO l_cuty_desc_new;
CLOSE c_cuty_new;
--
OPEN c_syus(:old.KAM_MANAGER_SYUS_ID);
FETCH c_syus INTO l_kam_manager_old;
CLOSE c_syus;
--
OPEN c_syus(:new.KAM_MANAGER_SYUS_ID);
FETCH c_syus INTO l_kam_manager_new;
CLOSE c_syus;
--
amfr_journal.log_transaction('UPDATE',
'CUSTOMERS',
name_value_tab(
name_value_rec('CUSTOMER IDENTIFIER',:old.cust_id),
name_value_rec('CUSTOMER CODE',:old.CODE),
name_value_rec('CUSTOMER NAME',:old.NAME),
name_value_rec('PERIOD_START',:old.PERIOD_START),
name_value_rec('PERIOD_END',:old.PERIOD_END),
name_value_rec('CREATED_BY',:old.CREATED_BY),
name_value_rec('CREATED_ON',:old.CREATED_ON),
name_value_rec('CUSTOMER DESCRIPTION',:old.DESCRIPTION),
name_value_rec('UPDATED_BY',:old.UPDATED_BY),
name_value_rec('UPDATED_ON',:old.UPDATED_ON),
name_value_rec('EMAIL ADDRESS',:old.EMAIL_ADDRESS),
name_value_rec('TELEPHONE',:old.TELEPHONE),
name_value_rec('FAX',:old.FAX),
name_value_rec('CUSTOMER TYPE',l_cuty_desc_old),
name_value_rec('PRIMARY CONTACT',:old.PRIMARY_CONTACT),
name_value_rec('KAM MANAGER',l_kam_manager_old),
name_value_rec('KAM TELEPHONE',:old.KAM_TELEPHONE),
name_value_rec('CUSTOMER STATUS',:old.STATUS),
name_value_rec('LETTER SUBJECT',:old.LETTER_SUBJECT),
name_value_rec('LETTER CONTENT',:old.LETTER_CONTENT),
name_value_rec('CONFIRMATION HEADER',:old.CONFIRMATION_HEADER),
name_value_rec('CONFIRMATION ADDRESS',:old.CONFIRMATION_ADDRESS),
--name_value_rec('SUBMISSION DEADLINE',:old.SUBMISSION_DEADLINE),
name_value_rec('AUTO GENERATE CONFIRMATION AM',:old.AUTO_GEN_CONF_AM),
name_value_rec('AUTO GENERATE CONFIRMATION PM',:old.AUTO_GEN_CONF_PM),
name_value_rec('IND DEADLINE FOR NOM SUBMIS',:old.IND_DEADLINE_FOR_NOM_SUBMIT),
name_value_rec('PRIMARY CONTACT TELEPHONE NO',:old.PRIMARY_CONTACT_TEL)
),
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_new),
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;
/