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

61 lines
3.2 KiB
Plaintext

CREATE OR REPLACE TRIGGER EFT_NOM.cg$ADS_DOCUMENT_TIMESTAMPS
AFTER DELETE ON DOCUMENT_TIMESTAMPS
DECLARE
idx BINARY_INTEGER := cg$DOCUMENT_TIMESTAMPS.cg$table.FIRST;
cg$rec cg$DOCUMENT_TIMESTAMPS.cg$row_type;
cg$old_rec cg$DOCUMENT_TIMESTAMPS.cg$row_type;
BEGIN
-- Application_logic Pre-After-Delete-statement <<Start>>
-- Application_logic Pre-After-Delete-statement << End >>
IF NOT (cg$DOCUMENT_TIMESTAMPS.called_from_package) THEN
WHILE idx IS NOT NULL LOOP
cg$rec.UPDATED_BY := cg$DOCUMENT_TIMESTAMPS.cg$table(idx).UPDATED_BY;
cg$DOCUMENT_TIMESTAMPS.cg$tableind(idx).UPDATED_BY := TRUE;
cg$rec.CREATED_BY := cg$DOCUMENT_TIMESTAMPS.cg$table(idx).CREATED_BY;
cg$DOCUMENT_TIMESTAMPS.cg$tableind(idx).CREATED_BY := TRUE;
cg$rec.DOC_IDENTIFIER := cg$DOCUMENT_TIMESTAMPS.cg$table(idx).DOC_IDENTIFIER;
cg$DOCUMENT_TIMESTAMPS.cg$tableind(idx).DOC_IDENTIFIER := TRUE;
cg$rec.DOC_TYPE := cg$DOCUMENT_TIMESTAMPS.cg$table(idx).DOC_TYPE;
cg$DOCUMENT_TIMESTAMPS.cg$tableind(idx).DOC_TYPE := TRUE;
cg$rec.DOC_TIMESTAMP := cg$DOCUMENT_TIMESTAMPS.cg$table(idx).DOC_TIMESTAMP;
cg$DOCUMENT_TIMESTAMPS.cg$tableind(idx).DOC_TIMESTAMP := TRUE;
cg$rec.HASH := cg$DOCUMENT_TIMESTAMPS.cg$table(idx).HASH;
cg$DOCUMENT_TIMESTAMPS.cg$tableind(idx).HASH := TRUE;
cg$rec.HASHED_FILE := cg$DOCUMENT_TIMESTAMPS.cg$table(idx).HASHED_FILE;
cg$DOCUMENT_TIMESTAMPS.cg$tableind(idx).HASHED_FILE := TRUE;
cg$rec.STATUS := cg$DOCUMENT_TIMESTAMPS.cg$table(idx).STATUS;
cg$DOCUMENT_TIMESTAMPS.cg$tableind(idx).STATUS := TRUE;
cg$rec.DOTI_ID := cg$DOCUMENT_TIMESTAMPS.cg$table(idx).DOTI_ID;
cg$DOCUMENT_TIMESTAMPS.cg$tableind(idx).DOTI_ID := TRUE;
cg$rec.RETRY_COUNT := cg$DOCUMENT_TIMESTAMPS.cg$table(idx).RETRY_COUNT;
cg$DOCUMENT_TIMESTAMPS.cg$tableind(idx).RETRY_COUNT := TRUE;
cg$rec.CREATED_ON := cg$DOCUMENT_TIMESTAMPS.cg$table(idx).CREATED_ON;
cg$DOCUMENT_TIMESTAMPS.cg$tableind(idx).CREATED_ON := TRUE;
cg$rec.UPDATED_ON := cg$DOCUMENT_TIMESTAMPS.cg$table(idx).UPDATED_ON;
cg$DOCUMENT_TIMESTAMPS.cg$tableind(idx).UPDATED_ON := TRUE;
cg$rec.TIMESTAMP_RESPONSE := cg$DOCUMENT_TIMESTAMPS.cg$table(idx).TIMESTAMP_RESPONSE;
cg$DOCUMENT_TIMESTAMPS.cg$tableind(idx).TIMESTAMP_RESPONSE := TRUE;
cg$DOCUMENT_TIMESTAMPS.validate_foreign_keys_del(cg$rec);
cg$DOCUMENT_TIMESTAMPS.upd_oper_denorm2( cg$rec,
cg$old_rec,
cg$DOCUMENT_TIMESTAMPS.cg$tableind(idx),
'DEL'
);
cg$DOCUMENT_TIMESTAMPS.cascade_delete(cg$rec);
cg$DOCUMENT_TIMESTAMPS.domain_cascade_delete(cg$rec);
idx := cg$DOCUMENT_TIMESTAMPS.cg$table.NEXT(idx);
END LOOP;
END IF;
-- Application_logic Post-After-Delete-statement <<Start>>
-- Application_logic Post-After-Delete-statement << End >>
END;
/