ORA-20200: ORA-0000: normal, successful completion when executing PCRD_DF_MANAGEMENT.DF_MANAGE ORA [message #679156] |
Wed, 12 February 2020 01:14  |
 |
shilpanarayan94
Messages: 1 Registered: February 2020
|
Junior Member |
|
|
create or replace TRIGGER powercard.TGR_BI_ACQ_LIST_PRICE_DF_MNG
BEFORE
INSERT
ON powercard.acquirer_list_price
REFERENCING NEW AS NEW OLD AS OLD
FOR EACH ROW
DECLARE
CURSOR cur_user_tab_columns IS
SELECT *
FROM USER_TAB_COLUMNS
WHERE TABLE_NAME = 'ACQUIRER_LIST_PRICE'
AND column_name NOT IN ('USER_CREATE', 'USER_MODIF', 'SENSITIVE_OPERATION_RECORD')
ORDER BY COLUMN_ID;
Return_Status PLS_INTEGER;
v_pos PLS_INTEGER := 1;
v_mega_table PCRD_DF_MANAGEMENT.T_DF_MANAG_TABLE:=PCRD_DF_MANAGEMENT.T_DF_MANAG_TABLE(DF_MANAG_RECORD(
' ', ' ', ' ', ' ', ' ',' ',' ',SYSDATE) );
BEGIN
FOR v_cur_user_tab_columns_rec IN cur_user_tab_columns LOOP
v_mega_table(v_pos).table_name := 'ACQUIRER_LIST_PRICE';
v_mega_table(v_pos).field_name := v_cur_user_tab_columns_rec.column_name;
v_mega_table(v_pos).table_key := :OLD.LIST_PRICE_ID;
v_mega_table(v_pos).sensitive_operation_record := 'I';
v_mega_table(v_pos).user_modif := NVL(:NEW.user_modif,USER);
v_mega_table(v_pos).date_modif := NVL(:NEW.date_modif,SYSDATE);
v_mega_table.EXTEND( 1 , 1);
v_pos := v_pos + 1;
END LOOP;
v_mega_table(1).field_old_value := :OLD.BANK_CODE;
v_mega_table(1).field_new_value := :NEW.BANK_CODE;
v_mega_table(2).field_old_value := :OLD.LIST_PRICE_ID;
v_mega_table(2).field_new_value := :NEW.LIST_PRICE_ID;
v_mega_table(3).field_old_value := :OLD.LIST_PRICE_NAME;
v_mega_table(3).field_new_value := :NEW.LIST_PRICE_NAME;
v_mega_table(4).field_old_value := :OLD.CARD_TYPE;
v_mega_table(4).field_new_value := :NEW.CARD_TYPE;
v_mega_table(5).field_old_value := :OLD.ACQUIRER_BANK;
v_mega_table(5).field_new_value := :NEW.ACQUIRER_BANK;
v_mega_table(6).field_old_value := :OLD.RETAILER_MODEL;
v_mega_table(6).field_new_value := :NEW.RETAILER_MODEL;
v_mega_table(7).field_old_value := :OLD.SITE_GROUP;
v_mega_table(7).field_new_value := :NEW.SITE_GROUP;
v_mega_table( .field_old_value := TO_CHAR(:OLD.EFFECTIVE_START_DATE, 'DD/MM/YYYY');
v_mega_table( .field_new_value := TO_CHAR(:NEW.EFFECTIVE_START_DATE, 'DD/MM/YYYY');
v_mega_table(9).field_old_value := TO_CHAR(:OLD.EFFECTIVE_END_DATE, 'DD/MM/YYYY');
v_mega_table(9).field_new_value := TO_CHAR(:NEW.EFFECTIVE_END_DATE, 'DD/MM/YYYY');
v_mega_table(10).field_old_value := TO_CHAR(:OLD.BUSINESS_DATE, 'DD/MM/YYYY');
v_mega_table(10).field_new_value := TO_CHAR(:NEW.BUSINESS_DATE, 'DD/MM/YYYY');
v_mega_table(11).field_old_value := :OLD.PRIVATE_DATA_1;
v_mega_table(11).field_new_value := :NEW.PRIVATE_DATA_1;
v_mega_table(12).field_old_value := :OLD.PRIVATE_DATA_2;
v_mega_table(12).field_new_value := :NEW.PRIVATE_DATA_2;
v_mega_table(13).field_old_value := TO_CHAR(:OLD.PRIVATE_DATA_3);
v_mega_table(13).field_new_value := TO_CHAR(:NEW.PRIVATE_DATA_3);
v_mega_table(14).field_old_value := TO_CHAR(:OLD.PRIVATE_DATA_4);
v_mega_table(14).field_new_value := TO_CHAR(:NEW.PRIVATE_DATA_4);
v_mega_table(15).field_old_value := TO_CHAR(:OLD.PRIVATE_DATA_5, 'DD/MM/YYYY');
v_mega_table(15).field_new_value := TO_CHAR(:NEW.PRIVATE_DATA_5, 'DD/MM/YYYY');
v_mega_table(16).field_old_value := TO_CHAR(:OLD.PRIVATE_DATA_6, 'DD/MM/YYYY');
v_mega_table(16).field_new_value := TO_CHAR(:NEW.PRIVATE_DATA_6, 'DD/MM/YYYY');
v_mega_table(17).field_old_value := TO_CHAR(:OLD.DATE_CREATE, 'DD/MM/YYYY');
v_mega_table(17).field_new_value := TO_CHAR(:NEW.DATE_CREATE, 'DD/MM/YYYY');
v_mega_table(18).field_old_value := TO_CHAR(:OLD.DATE_MODIF, 'DD/MM/YYYY');
v_mega_table(18).field_new_value := TO_CHAR(:NEW.DATE_MODIF, 'DD/MM/YYYY');
Return_Status := PCRD_DF_MANAGEMENT.DF_MANAGE ( 'ACQUIRER_LIST_PRICE',
v_mega_table );
IF Return_Status <> declaration_cst.OK
THEN
raise_application_error(-20200,PCRD_GENERAL_TOOLS.GET_SQL_ERROR ||' when executing PCRD_DF_MANAGEMENT.DF_MANAGE');
END IF;
END;
|
|
|
|
|
|