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

50 lines
1.9 KiB
Plaintext

CREATE OR REPLACE TRIGGER "EFT_NOM".cg$AUS_HOMEPAGE_ELEMENT
AFTER UPDATE ON HOMEPAGE_ELEMENT
DECLARE
idx BINARY_INTEGER := cg$HOMEPAGE_ELEMENT.cg$table.FIRST;
cg$old_rec cg$HOMEPAGE_ELEMENT.cg$row_type;
cg$rec cg$HOMEPAGE_ELEMENT.cg$row_type;
cg$ind cg$HOMEPAGE_ELEMENT.cg$ind_type;
BEGIN
-- Application_logic Pre-After-Update-statement <<Start>>
-- Application_logic Pre-After-Update-statement << End >>
WHILE idx IS NOT NULL LOOP
cg$old_rec.HOEL_ID := cg$HOMEPAGE_ELEMENT.cg$table(idx).HOEL_ID;
cg$old_rec.ELEMENT_NAME := cg$HOMEPAGE_ELEMENT.cg$table(idx).ELEMENT_NAME;
IF NOT (cg$HOMEPAGE_ELEMENT.called_from_package) THEN
idx := cg$HOMEPAGE_ELEMENT.cg$table.NEXT(idx);
cg$rec.HOEL_ID := cg$HOMEPAGE_ELEMENT.cg$table(idx).HOEL_ID;
cg$ind.HOEL_ID := updating('HOEL_ID');
cg$rec.ELEMENT_NAME := cg$HOMEPAGE_ELEMENT.cg$table(idx).ELEMENT_NAME;
cg$ind.ELEMENT_NAME := updating('ELEMENT_NAME');
cg$HOMEPAGE_ELEMENT.validate_foreign_keys_upd(cg$rec, cg$old_rec, cg$ind);
cg$HOMEPAGE_ELEMENT.upd_denorm2( cg$rec,
cg$HOMEPAGE_ELEMENT.cg$tableind(idx)
);
cg$HOMEPAGE_ELEMENT.upd_oper_denorm2( cg$rec,
cg$old_rec,
cg$HOMEPAGE_ELEMENT.cg$tableind(idx)
);
cg$HOMEPAGE_ELEMENT.cascade_update(cg$rec, cg$old_rec);
cg$HOMEPAGE_ELEMENT.domain_cascade_update(cg$rec, cg$ind, cg$old_rec);
cg$HOMEPAGE_ELEMENT.called_from_package := FALSE;
END IF;
idx := cg$HOMEPAGE_ELEMENT.cg$table.NEXT(idx);
END LOOP;
cg$HOMEPAGE_ELEMENT.cg$table.DELETE;
-- Application_logic Post-After-Update-statement <<Start>>
-- Application_logic Post-After-Update-statement << End >>
END;
/