Files
mip/Data/BulkLoad/EFT/Nominations/plsql/cg$ais_contract_template_rules.trg

41 lines
1.7 KiB
Plaintext

CREATE OR REPLACE TRIGGER EFT_NOM.cg$AIS_CONTRACT_TEMPLATE_RULES
AFTER INSERT ON CONTRACT_TEMPLATE_RULES
DECLARE
idx BINARY_INTEGER := cg$CONTRACT_TEMPLATE_RULES.cg$table.FIRST;
cg$rec cg$CONTRACT_TEMPLATE_RULES.cg$row_type;
cg$old_rec cg$CONTRACT_TEMPLATE_RULES.cg$row_type;
fk_check INTEGER;
BEGIN
-- Application_logic Pre-After-Insert-statement <<Start>>
-- Application_logic Pre-After-Insert-statement << End >>
IF NOT (cg$CONTRACT_TEMPLATE_RULES.called_from_package) THEN
WHILE idx IS NOT NULL LOOP
cg$rec.CREATED_BY := cg$CONTRACT_TEMPLATE_RULES.cg$table(idx).CREATED_BY;
cg$rec.COTR_ID := cg$CONTRACT_TEMPLATE_RULES.cg$table(idx).COTR_ID;
cg$rec.DISPLAY_SEQUENCE := cg$CONTRACT_TEMPLATE_RULES.cg$table(idx).DISPLAY_SEQUENCE;
cg$rec.COTE_ID := cg$CONTRACT_TEMPLATE_RULES.cg$table(idx).COTE_ID;
cg$rec.RULE_ID := cg$CONTRACT_TEMPLATE_RULES.cg$table(idx).RULE_ID;
cg$rec.CREATED_ON := cg$CONTRACT_TEMPLATE_RULES.cg$table(idx).CREATED_ON;
cg$CONTRACT_TEMPLATE_RULES.validate_foreign_keys_ins(cg$rec);
cg$CONTRACT_TEMPLATE_RULES.upd_oper_denorm2( cg$rec,
cg$old_rec,
cg$CONTRACT_TEMPLATE_RULES.cg$tableind(idx),
'INS'
);
idx := cg$CONTRACT_TEMPLATE_RULES.cg$table.NEXT(idx);
END LOOP;
END IF;
-- Application_logic Post-After-Insert-statement <<Start>>
-- Application_logic Post-After-Insert-statement << End >>
END;
/