CREATE OR REPLACE TRIGGER DTULTATU_TIPOCONSLOJA
BEFORE INSERT OR UPDATE OR DELETE
ON TIPOCONSLOJA FOR EACH ROW

BEGIN
   IF INSERTING THEN
      :NEW.DTULTATU := SYSDATE;
   END IF;
   IF UPDATING THEN
      :NEW.DTULTATU := SYSDATE;
   END IF;
   IF DELETING THEN
      INSERT INTO DELETECACHE (NMTABLECACHE, CDFILICACHE, DSKEYCACHE, DTULTATUCACH)
                       VALUES ('TIPOCONSLOJA', '', 'CDFILIAL='||:OLD.CDFILIAL||';CDLOJA='||:OLD.CDLOJA||';CDTIPOCONS='||:OLD.CDTIPOCONS||';', SYSDATE);
   END IF;
END;
/

UPDATE TIPOCONSLOJA SET DTULTATU = SYSDATE WHERE DTULTATU IS NULL
/

ALTER TABLE TIPOCONSLOJA MODIFY DTULTATU DEFAULT SYSDATE
/

-- VERSAO --
BEGIN ATUVEROBJ('DTULTATU_TIPOCONSLOJA','6.02.000'); END;
/