PROMPT Creating Trigger Logic for Table 'APPLICATION_PARAMETERS' PROMPT Creating Before Insert Statement Trigger on 'APPLICATION_PARAMETERS' CREATE OR REPLACE TRIGGER cg$BIS_APPLICATION_PARAMETERS BEFORE INSERT ON APPLICATION_PARAMETERS BEGIN -- Application_logic Pre-Before-Insert-statement <> -- Application_logic Pre-Before-Insert-statement << End >> cg$APPLICATION_PARAMETERS.cg$table.DELETE; cg$APPLICATION_PARAMETERS.cg$tableind.DELETE; cg$APPLICATION_PARAMETERS.idx := 1; -- Application_logic Post-Before-Insert-statement <> -- Application_logic Post-Before-Insert-statement << End >> END; / PROMPT Creating Before Insert Row Trigger on 'APPLICATION_PARAMETERS' CREATE OR REPLACE TRIGGER cg$BIR_APPLICATION_PARAMETERS BEFORE INSERT ON APPLICATION_PARAMETERS FOR EACH ROW DECLARE cg$rec cg$APPLICATION_PARAMETERS.cg$row_type; cg$ind cg$APPLICATION_PARAMETERS.cg$ind_type; BEGIN -- Application_logic Pre-Before-Insert-row <> -- Application_logic Pre-Before-Insert-row << End >> -- Load cg$rec/cg$ind values from new cg$rec.APPA_ID := :new.APPA_ID; cg$ind.APPA_ID := TRUE; cg$rec.PARAMETER := :new.PARAMETER; cg$ind.PARAMETER := TRUE; cg$rec.VALUE := :new.VALUE; cg$ind.VALUE := TRUE; cg$rec.DESCRIPTION := :new.DESCRIPTION; cg$ind.DESCRIPTION := TRUE; if not (cg$APPLICATION_PARAMETERS.called_from_package) then cg$APPLICATION_PARAMETERS.validate_arc(cg$rec); cg$APPLICATION_PARAMETERS.validate_domain(cg$rec); cg$APPLICATION_PARAMETERS.ins(cg$rec, cg$ind, FALSE); cg$APPLICATION_PARAMETERS.called_from_package := FALSE; end if; cg$APPLICATION_PARAMETERS.cg$table(cg$APPLICATION_PARAMETERS.idx).APPA_ID := cg$rec.APPA_ID; cg$APPLICATION_PARAMETERS.cg$tableind(cg$APPLICATION_PARAMETERS.idx).APPA_ID := cg$ind.APPA_ID; cg$APPLICATION_PARAMETERS.cg$table(cg$APPLICATION_PARAMETERS.idx).PARAMETER := cg$rec.PARAMETER; cg$APPLICATION_PARAMETERS.cg$tableind(cg$APPLICATION_PARAMETERS.idx).PARAMETER := cg$ind.PARAMETER; cg$APPLICATION_PARAMETERS.cg$table(cg$APPLICATION_PARAMETERS.idx).VALUE := cg$rec.VALUE; cg$APPLICATION_PARAMETERS.cg$tableind(cg$APPLICATION_PARAMETERS.idx).VALUE := cg$ind.VALUE; cg$APPLICATION_PARAMETERS.cg$table(cg$APPLICATION_PARAMETERS.idx).DESCRIPTION := cg$rec.DESCRIPTION; cg$APPLICATION_PARAMETERS.cg$tableind(cg$APPLICATION_PARAMETERS.idx).DESCRIPTION := cg$ind.DESCRIPTION; cg$APPLICATION_PARAMETERS.idx := cg$APPLICATION_PARAMETERS.idx + 1; :new.APPA_ID := cg$rec.APPA_ID; :new.PARAMETER := cg$rec.PARAMETER; :new.VALUE := cg$rec.VALUE; :new.DESCRIPTION := cg$rec.DESCRIPTION; -- Application_logic Post-Before-Insert-row <> -- Application_logic Post-Before-Insert-row << End >> END; / -- No application logic defined for Trigger cg$AIR_APPLICATION_PARAMETERS, so drop it. -- To avoid an error if there isn't one, create or replace it, and then drop it CREATE OR REPLACE TRIGGER cg$AIR_APPLICATION_PARAMETERS AFTER INSERT ON APPLICATION_PARAMETERS FOR EACH ROW BEGIN null; END; / drop trigger cg$AIR_APPLICATION_PARAMETERS / PROMPT Creating After Insert Statement Trigger on 'APPLICATION_PARAMETERS' CREATE OR REPLACE TRIGGER cg$AIS_APPLICATION_PARAMETERS AFTER INSERT ON APPLICATION_PARAMETERS DECLARE idx BINARY_INTEGER := cg$APPLICATION_PARAMETERS.cg$table.FIRST; cg$rec cg$APPLICATION_PARAMETERS.cg$row_type; cg$old_rec cg$APPLICATION_PARAMETERS.cg$row_type; fk_check INTEGER; BEGIN -- Application_logic Pre-After-Insert-statement <> -- Application_logic Pre-After-Insert-statement << End >> IF NOT (cg$APPLICATION_PARAMETERS.called_from_package) THEN WHILE idx IS NOT NULL LOOP cg$rec.APPA_ID := cg$APPLICATION_PARAMETERS.cg$table(idx).APPA_ID; cg$rec.PARAMETER := cg$APPLICATION_PARAMETERS.cg$table(idx).PARAMETER; cg$rec.VALUE := cg$APPLICATION_PARAMETERS.cg$table(idx).VALUE; cg$rec.DESCRIPTION := cg$APPLICATION_PARAMETERS.cg$table(idx).DESCRIPTION; cg$APPLICATION_PARAMETERS.validate_foreign_keys_ins(cg$rec); cg$APPLICATION_PARAMETERS.upd_oper_denorm2( cg$rec, cg$old_rec, cg$APPLICATION_PARAMETERS.cg$tableind(idx), 'INS' ); idx := cg$APPLICATION_PARAMETERS.cg$table.NEXT(idx); END LOOP; END IF; -- Application_logic Post-After-Insert-statement <> -- Application_logic Post-After-Insert-statement << End >> END; / PROMPT Creating Before Update Statement Trigger on 'APPLICATION_PARAMETERS' CREATE OR REPLACE TRIGGER cg$BUS_APPLICATION_PARAMETERS BEFORE UPDATE ON APPLICATION_PARAMETERS BEGIN -- Application_logic Pre-Before-Update-statement <> -- Application_logic Pre-Before-Update-statement << End >> cg$APPLICATION_PARAMETERS.cg$table.DELETE; cg$APPLICATION_PARAMETERS.cg$tableind.DELETE; cg$APPLICATION_PARAMETERS.idx := 1; -- Application_logic Post-Before-Update-statement <> -- Application_logic Post-Before-Update-statement << End >> END; / PROMPT Creating Before Update Row Trigger on 'APPLICATION_PARAMETERS' CREATE OR REPLACE TRIGGER cg$BUR_APPLICATION_PARAMETERS BEFORE UPDATE ON APPLICATION_PARAMETERS FOR EACH ROW DECLARE cg$rec cg$APPLICATION_PARAMETERS.cg$row_type; cg$ind cg$APPLICATION_PARAMETERS.cg$ind_type; cg$old_rec cg$APPLICATION_PARAMETERS.cg$row_type; BEGIN -- Application_logic Pre-Before-Update-row <> -- Application_logic Pre-Before-Update-row << End >> -- Load cg$rec/cg$ind values from new cg$rec.APPA_ID := :new.APPA_ID; cg$ind.APPA_ID := (:new.APPA_ID IS NULL AND :old.APPA_ID IS NOT NULL ) OR (:new.APPA_ID IS NOT NULL AND :old.APPA_ID IS NULL) OR NOT(:new.APPA_ID = :old.APPA_ID) ; cg$APPLICATION_PARAMETERS.cg$table(cg$APPLICATION_PARAMETERS.idx).APPA_ID := :old.APPA_ID; cg$rec.PARAMETER := :new.PARAMETER; cg$ind.PARAMETER := (:new.PARAMETER IS NULL AND :old.PARAMETER IS NOT NULL ) OR (:new.PARAMETER IS NOT NULL AND :old.PARAMETER IS NULL) OR NOT(:new.PARAMETER = :old.PARAMETER) ; cg$APPLICATION_PARAMETERS.cg$table(cg$APPLICATION_PARAMETERS.idx).PARAMETER := :old.PARAMETER; cg$rec.VALUE := :new.VALUE; cg$ind.VALUE := (:new.VALUE IS NULL AND :old.VALUE IS NOT NULL ) OR (:new.VALUE IS NOT NULL AND :old.VALUE IS NULL) OR NOT(:new.VALUE = :old.VALUE) ; cg$APPLICATION_PARAMETERS.cg$table(cg$APPLICATION_PARAMETERS.idx).VALUE := :old.VALUE; cg$rec.DESCRIPTION := :new.DESCRIPTION; cg$ind.DESCRIPTION := (:new.DESCRIPTION IS NULL AND :old.DESCRIPTION IS NOT NULL ) OR (:new.DESCRIPTION IS NOT NULL AND :old.DESCRIPTION IS NULL) OR NOT(:new.DESCRIPTION = :old.DESCRIPTION) ; cg$APPLICATION_PARAMETERS.cg$table(cg$APPLICATION_PARAMETERS.idx).DESCRIPTION := :old.DESCRIPTION; cg$APPLICATION_PARAMETERS.idx := cg$APPLICATION_PARAMETERS.idx + 1; if not (cg$APPLICATION_PARAMETERS.called_from_package) then cg$APPLICATION_PARAMETERS.validate_arc(cg$rec); cg$APPLICATION_PARAMETERS.validate_domain(cg$rec, cg$ind); cg$APPLICATION_PARAMETERS.validate_domain_cascade_update(cg$old_rec); cg$APPLICATION_PARAMETERS.upd(cg$rec, cg$ind, FALSE); cg$APPLICATION_PARAMETERS.called_from_package := FALSE; end if; :new.PARAMETER := cg$rec.PARAMETER; :new.VALUE := cg$rec.VALUE; :new.DESCRIPTION := cg$rec.DESCRIPTION; -- Application_logic Post-Before-Update-row <> -- Application_logic Post-Before-Update-row << End >> END; / -- No application logic defined for Trigger cg$AUR_APPLICATION_PARAMETERS, so drop it. -- To avoid an error if there isn't one, create or replace it, and then drop it CREATE OR REPLACE TRIGGER cg$AUR_APPLICATION_PARAMETERS AFTER UPDATE ON APPLICATION_PARAMETERS FOR EACH ROW BEGIN null; END; / drop trigger cg$AUR_APPLICATION_PARAMETERS / PROMPT Creating After Update Statement Trigger on 'APPLICATION_PARAMETERS' CREATE OR REPLACE TRIGGER cg$AUS_APPLICATION_PARAMETERS AFTER UPDATE ON APPLICATION_PARAMETERS DECLARE idx BINARY_INTEGER := cg$APPLICATION_PARAMETERS.cg$table.FIRST; cg$old_rec cg$APPLICATION_PARAMETERS.cg$row_type; cg$rec cg$APPLICATION_PARAMETERS.cg$row_type; cg$ind cg$APPLICATION_PARAMETERS.cg$ind_type; BEGIN -- Application_logic Pre-After-Update-statement <> -- Application_logic Pre-After-Update-statement << End >> WHILE idx IS NOT NULL LOOP cg$old_rec.APPA_ID := cg$APPLICATION_PARAMETERS.cg$table(idx).APPA_ID; cg$old_rec.PARAMETER := cg$APPLICATION_PARAMETERS.cg$table(idx).PARAMETER; cg$old_rec.VALUE := cg$APPLICATION_PARAMETERS.cg$table(idx).VALUE; cg$old_rec.DESCRIPTION := cg$APPLICATION_PARAMETERS.cg$table(idx).DESCRIPTION; IF NOT (cg$APPLICATION_PARAMETERS.called_from_package) THEN idx := cg$APPLICATION_PARAMETERS.cg$table.NEXT(idx); cg$rec.APPA_ID := cg$APPLICATION_PARAMETERS.cg$table(idx).APPA_ID; cg$ind.APPA_ID := updating('APPA_ID'); cg$rec.PARAMETER := cg$APPLICATION_PARAMETERS.cg$table(idx).PARAMETER; cg$ind.PARAMETER := updating('PARAMETER'); cg$rec.VALUE := cg$APPLICATION_PARAMETERS.cg$table(idx).VALUE; cg$ind.VALUE := updating('VALUE'); cg$rec.DESCRIPTION := cg$APPLICATION_PARAMETERS.cg$table(idx).DESCRIPTION; cg$ind.DESCRIPTION := updating('DESCRIPTION'); cg$APPLICATION_PARAMETERS.validate_foreign_keys_upd(cg$rec, cg$old_rec, cg$ind); cg$APPLICATION_PARAMETERS.upd_denorm2( cg$rec, cg$APPLICATION_PARAMETERS.cg$tableind(idx) ); cg$APPLICATION_PARAMETERS.upd_oper_denorm2( cg$rec, cg$old_rec, cg$APPLICATION_PARAMETERS.cg$tableind(idx) ); cg$APPLICATION_PARAMETERS.cascade_update(cg$rec, cg$old_rec); cg$APPLICATION_PARAMETERS.domain_cascade_update(cg$rec, cg$ind, cg$old_rec); cg$APPLICATION_PARAMETERS.called_from_package := FALSE; END IF; idx := cg$APPLICATION_PARAMETERS.cg$table.NEXT(idx); END LOOP; cg$APPLICATION_PARAMETERS.cg$table.DELETE; -- Application_logic Post-After-Update-statement <> -- Application_logic Post-After-Update-statement << End >> END; / PROMPT Creating Before Delete Statement Trigger on 'APPLICATION_PARAMETERS' CREATE OR REPLACE TRIGGER cg$BDS_APPLICATION_PARAMETERS BEFORE DELETE ON APPLICATION_PARAMETERS BEGIN -- Application_logic Pre-Before-Delete-statement <> -- Application_logic Pre-Before-Delete-statement << End >> cg$APPLICATION_PARAMETERS.cg$table.DELETE; cg$APPLICATION_PARAMETERS.cg$tableind.DELETE; cg$APPLICATION_PARAMETERS.idx := 1; -- Application_logic Post-Before-Delete-statement <> -- Application_logic Post-Before-Delete-statement << End >> END; / PROMPT Creating Before Delete Row Trigger on 'APPLICATION_PARAMETERS' CREATE OR REPLACE TRIGGER cg$BDR_APPLICATION_PARAMETERS BEFORE DELETE ON APPLICATION_PARAMETERS FOR EACH ROW DECLARE cg$pk cg$APPLICATION_PARAMETERS.cg$pk_type; cg$rec cg$APPLICATION_PARAMETERS.cg$row_type; cg$ind cg$APPLICATION_PARAMETERS.cg$ind_type; BEGIN -- Application_logic Pre-Before-Delete-row <> -- Application_logic Pre-Before-Delete-row << End >> -- Load cg$rec/cg$ind values from new cg$pk.APPA_ID := :old.APPA_ID; cg$rec.APPA_ID := :old.APPA_ID; cg$APPLICATION_PARAMETERS.cg$table(cg$APPLICATION_PARAMETERS.idx).APPA_ID := :old.APPA_ID; cg$rec.PARAMETER := :old.PARAMETER; cg$APPLICATION_PARAMETERS.cg$table(cg$APPLICATION_PARAMETERS.idx).PARAMETER := :old.PARAMETER; cg$APPLICATION_PARAMETERS.idx := cg$APPLICATION_PARAMETERS.idx + 1; if not (cg$APPLICATION_PARAMETERS.called_from_package) then cg$APPLICATION_PARAMETERS.validate_domain_cascade_delete(cg$rec); cg$APPLICATION_PARAMETERS.del(cg$pk, FALSE); cg$APPLICATION_PARAMETERS.called_from_package := FALSE; end if; -- Application_logic Post-Before-Delete-row <> -- Application_logic Post-Before-Delete-row << End >> END; / -- No application logic defined for Trigger cg$ADR_APPLICATION_PARAMETERS, so drop it. -- To avoid an error if there isn't one, create or replace it, and then drop it CREATE OR REPLACE TRIGGER cg$ADR_APPLICATION_PARAMETERS AFTER DELETE ON APPLICATION_PARAMETERS FOR EACH ROW BEGIN null; END; / drop trigger cg$ADR_APPLICATION_PARAMETERS / PROMPT Creating After Delete Statement Trigger on 'APPLICATION_PARAMETERS' CREATE OR REPLACE TRIGGER cg$ADS_APPLICATION_PARAMETERS AFTER DELETE ON APPLICATION_PARAMETERS DECLARE idx BINARY_INTEGER := cg$APPLICATION_PARAMETERS.cg$table.FIRST; cg$rec cg$APPLICATION_PARAMETERS.cg$row_type; cg$old_rec cg$APPLICATION_PARAMETERS.cg$row_type; BEGIN -- Application_logic Pre-After-Delete-statement <> -- Application_logic Pre-After-Delete-statement << End >> IF NOT (cg$APPLICATION_PARAMETERS.called_from_package) THEN WHILE idx IS NOT NULL LOOP cg$rec.APPA_ID := cg$APPLICATION_PARAMETERS.cg$table(idx).APPA_ID; cg$APPLICATION_PARAMETERS.cg$tableind(idx).APPA_ID := TRUE; cg$rec.PARAMETER := cg$APPLICATION_PARAMETERS.cg$table(idx).PARAMETER; cg$APPLICATION_PARAMETERS.cg$tableind(idx).PARAMETER := TRUE; cg$rec.VALUE := cg$APPLICATION_PARAMETERS.cg$table(idx).VALUE; cg$APPLICATION_PARAMETERS.cg$tableind(idx).VALUE := TRUE; cg$rec.DESCRIPTION := cg$APPLICATION_PARAMETERS.cg$table(idx).DESCRIPTION; cg$APPLICATION_PARAMETERS.cg$tableind(idx).DESCRIPTION := TRUE; cg$APPLICATION_PARAMETERS.validate_foreign_keys_del(cg$rec); cg$APPLICATION_PARAMETERS.upd_oper_denorm2( cg$rec, cg$old_rec, cg$APPLICATION_PARAMETERS.cg$tableind(idx), 'DEL' ); cg$APPLICATION_PARAMETERS.cascade_delete(cg$rec); cg$APPLICATION_PARAMETERS.domain_cascade_delete(cg$rec); idx := cg$APPLICATION_PARAMETERS.cg$table.NEXT(idx); END LOOP; END IF; -- Application_logic Post-After-Delete-statement <> -- Application_logic Post-After-Delete-statement << End >> END; /