/*==============*/ /* Versão: 1.27 */ /*==============================================================*/ /* Trigger: TG_UPDATE_ROMANEIOS */ /*==============================================================*/ SET TERM ^; CREATE TRIGGER TG_UPDATE_ROMANEIOS FOR ROMANEIOS ACTIVE AFTER UPDATE POSITION 0 AS BEGIN IF (NEW.SITUACAO = 'L') THEN BEGIN UPDATE ITENS_ROMANEIOS SET ESTADO_ITEM = 'V' WHERE COD_EMPRESA = NEW.COD_EMPRESA AND TIPO_CONTROL = NEW.TIPO_CONTROL AND NRO_ROMANEIO = NEW.NRO_ROMANEIO AND ESTADO_ITEM = 'C'; END IF (NEW.SITUACAO = 'A') THEN BEGIN UPDATE ITENS_ROMANEIOS SET ESTADO_ITEM = 'C' WHERE COD_EMPRESA = NEW.COD_EMPRESA AND TIPO_CONTROL = NEW.TIPO_CONTROL AND NRO_ROMANEIO = NEW.NRO_ROMANEIO AND ESTADO_ITEM = 'V'; END END^ SET TERM ;^ COMMIT WORK; UPDATE ROMANEIOS SET SITUACAO = 'L' WHERE SITUACAO = 'L'; COMMIT WORK; /*==============*/ /* Versão: 1.31 */ /*==============================================================*/ /* Trigger: TG_EXCLUI_SERV_REALIZADO */ /*==============================================================*/ SET TERM ^; CREATE TRIGGER TG_EXCLUI_SERV_REALIZADO FOR REALIZA_SERVICOS BEFORE DELETE POSITION 0 AS BEGIN DELETE FROM ITENS_REALIZA WHERE COD_RESERV = OLD.COD_RESERV; END SET TERM ;^ COMMIT WORK;