CREATE OR REPLACE TRIGGER "EFT_NOM".cg$BUR_ERROR_LOGS BEFORE UPDATE ON ERROR_LOGS FOR EACH ROW DECLARE cg$rec cg$ERROR_LOGS.cg$row_type; cg$ind cg$ERROR_LOGS.cg$ind_type; cg$old_rec cg$ERROR_LOGS.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.ERLO_ID := :new.ERLO_ID; cg$ind.ERLO_ID := (:new.ERLO_ID IS NULL AND :old.ERLO_ID IS NOT NULL ) OR (:new.ERLO_ID IS NOT NULL AND :old.ERLO_ID IS NULL) OR NOT(:new.ERLO_ID = :old.ERLO_ID) ; cg$ERROR_LOGS.cg$table(cg$ERROR_LOGS.idx).ERLO_ID := :old.ERLO_ID; cg$rec.ERROR_TYPE := :new.ERROR_TYPE; cg$ind.ERROR_TYPE := (:new.ERROR_TYPE IS NULL AND :old.ERROR_TYPE IS NOT NULL ) OR (:new.ERROR_TYPE IS NOT NULL AND :old.ERROR_TYPE IS NULL) OR NOT(:new.ERROR_TYPE = :old.ERROR_TYPE) ; cg$ERROR_LOGS.cg$table(cg$ERROR_LOGS.idx).ERROR_TYPE := :old.ERROR_TYPE; cg$rec.SOURCE := :new.SOURCE; cg$ind.SOURCE := (:new.SOURCE IS NULL AND :old.SOURCE IS NOT NULL ) OR (:new.SOURCE IS NOT NULL AND :old.SOURCE IS NULL) OR NOT(:new.SOURCE = :old.SOURCE) ; cg$ERROR_LOGS.cg$table(cg$ERROR_LOGS.idx).SOURCE := :old.SOURCE; cg$rec.SEVERITY := :new.SEVERITY; cg$ind.SEVERITY := (:new.SEVERITY IS NULL AND :old.SEVERITY IS NOT NULL ) OR (:new.SEVERITY IS NOT NULL AND :old.SEVERITY IS NULL) OR NOT(:new.SEVERITY = :old.SEVERITY) ; cg$ERROR_LOGS.cg$table(cg$ERROR_LOGS.idx).SEVERITY := :old.SEVERITY; cg$rec.ERROR_CODE := :new.ERROR_CODE; cg$ind.ERROR_CODE := (:new.ERROR_CODE IS NULL AND :old.ERROR_CODE IS NOT NULL ) OR (:new.ERROR_CODE IS NOT NULL AND :old.ERROR_CODE IS NULL) OR NOT(:new.ERROR_CODE = :old.ERROR_CODE) ; cg$ERROR_LOGS.cg$table(cg$ERROR_LOGS.idx).ERROR_CODE := :old.ERROR_CODE; cg$rec.ERROR_MESSAGE := :new.ERROR_MESSAGE; cg$ind.ERROR_MESSAGE := (:new.ERROR_MESSAGE IS NULL AND :old.ERROR_MESSAGE IS NOT NULL ) OR (:new.ERROR_MESSAGE IS NOT NULL AND :old.ERROR_MESSAGE IS NULL) OR NOT(:new.ERROR_MESSAGE = :old.ERROR_MESSAGE) ; cg$ERROR_LOGS.cg$table(cg$ERROR_LOGS.idx).ERROR_MESSAGE := :old.ERROR_MESSAGE; cg$rec.ERROR_DATE := :new.ERROR_DATE; cg$ind.ERROR_DATE := (:new.ERROR_DATE IS NULL AND :old.ERROR_DATE IS NOT NULL ) OR (:new.ERROR_DATE IS NOT NULL AND :old.ERROR_DATE IS NULL) OR NOT(:new.ERROR_DATE = :old.ERROR_DATE) ; cg$ERROR_LOGS.cg$table(cg$ERROR_LOGS.idx).ERROR_DATE := :old.ERROR_DATE; cg$rec.ERROR_STATUS := :new.ERROR_STATUS; cg$ind.ERROR_STATUS := (:new.ERROR_STATUS IS NULL AND :old.ERROR_STATUS IS NOT NULL ) OR (:new.ERROR_STATUS IS NOT NULL AND :old.ERROR_STATUS IS NULL) OR NOT(:new.ERROR_STATUS = :old.ERROR_STATUS) ; cg$ERROR_LOGS.cg$table(cg$ERROR_LOGS.idx).ERROR_STATUS := :old.ERROR_STATUS; cg$rec.CREATED_BY := :new.CREATED_BY; cg$ind.CREATED_BY := (:new.CREATED_BY IS NULL AND :old.CREATED_BY IS NOT NULL ) OR (:new.CREATED_BY IS NOT NULL AND :old.CREATED_BY IS NULL) OR NOT(:new.CREATED_BY = :old.CREATED_BY) ; cg$ERROR_LOGS.cg$table(cg$ERROR_LOGS.idx).CREATED_BY := :old.CREATED_BY; cg$rec.UPDATED_ON := :new.UPDATED_ON; cg$ind.UPDATED_ON := (:new.UPDATED_ON IS NULL AND :old.UPDATED_ON IS NOT NULL ) OR (:new.UPDATED_ON IS NOT NULL AND :old.UPDATED_ON IS NULL) OR NOT(:new.UPDATED_ON = :old.UPDATED_ON) ; cg$ERROR_LOGS.cg$table(cg$ERROR_LOGS.idx).UPDATED_ON := :old.UPDATED_ON; cg$rec.CREATED_ON := :new.CREATED_ON; cg$ind.CREATED_ON := (:new.CREATED_ON IS NULL AND :old.CREATED_ON IS NOT NULL ) OR (:new.CREATED_ON IS NOT NULL AND :old.CREATED_ON IS NULL) OR NOT(:new.CREATED_ON = :old.CREATED_ON) ; cg$ERROR_LOGS.cg$table(cg$ERROR_LOGS.idx).CREATED_ON := :old.CREATED_ON; cg$rec.UPDATED_BY := :new.UPDATED_BY; cg$ind.UPDATED_BY := (:new.UPDATED_BY IS NULL AND :old.UPDATED_BY IS NOT NULL ) OR (:new.UPDATED_BY IS NOT NULL AND :old.UPDATED_BY IS NULL) OR NOT(:new.UPDATED_BY = :old.UPDATED_BY) ; cg$ERROR_LOGS.cg$table(cg$ERROR_LOGS.idx).UPDATED_BY := :old.UPDATED_BY; cg$ERROR_LOGS.idx := cg$ERROR_LOGS.idx + 1; if not (cg$ERROR_LOGS.called_from_package) then cg$ERROR_LOGS.validate_arc(cg$rec); cg$ERROR_LOGS.validate_domain(cg$rec, cg$ind); cg$ERROR_LOGS.validate_domain_cascade_update(cg$old_rec); cg$ERROR_LOGS.upd(cg$rec, cg$ind, FALSE); cg$ERROR_LOGS.called_from_package := FALSE; end if; :new.ERROR_TYPE := cg$rec.ERROR_TYPE; :new.SOURCE := cg$rec.SOURCE; :new.SEVERITY := cg$rec.SEVERITY; :new.ERROR_CODE := cg$rec.ERROR_CODE; :new.ERROR_MESSAGE := cg$rec.ERROR_MESSAGE; :new.ERROR_DATE := cg$rec.ERROR_DATE; :new.ERROR_STATUS := cg$rec.ERROR_STATUS; :new.CREATED_BY := cg$rec.CREATED_BY; :new.UPDATED_ON := cg$rec.UPDATED_ON; :new.CREATED_ON := cg$rec.CREATED_ON; :new.UPDATED_BY := cg$rec.UPDATED_BY; -- Application_logic Post-Before-Update-row <> -- Application_logic Post-Before-Update-row << End >> END; /