Menu de navegação

[Thiago Jader Macedo da CruzParticipante]

Galera bom dia!!!

Hoje eu tenho essas duas triggers funcionando ok porem gostaria de tornar estas duas triggers em uma só alguém poderia me ajudar?

REATE or REPLACE TRIGGER TGR_ATUALIZA_STATUS_A
AFTER UPDATE OF tdl_tp_ini , tdl_pac_reg ON TDL
FOR EACH ROW
WHEN ( NEW.tdl_tp_ini IN (‘ACOMP’,’HCTI’))
DECLARE

BEGIN
update PAC
set pac_pront_status = ‘A’
where ((PAC.PAC_REG = :new.tdl_pac_reg )or (PAC.PAC_REG = :old.tdl_pac_reg)) ;
END;

CREATE or REPLACE TRIGGER TGR_ATUALIZA_STATUS_C
AFTER UPDATE OF tdl_tp_ini , tdl_pac_reg ON TDL
FOR EACH ROW
WHEN ( NEW.tdl_tp_ini NOT IN (‘ACOMP’,’HCTI’))
DECLARE

BEGIN
update PAC
set pac_pront_status = ‘C’
where ((PAC.PAC_REG = :new.tdl_pac_reg )or (PAC.PAC_REG = :old.tdl_pac_reg)) ;
END;

[rmanParticipante]

@Thiago Jader Macedo da Cruz

Tente da seguinte forma:


CREATE OR REPLACE TRIGGER TGR_ATUALIZA_STATUS
AFTER UPDATE OF TDL_TP_INI, TDL_PAC_REG ON TDL
FOR EACH ROW
BEGIN
IF NEW.TDL_TP_INI IN ('ACOMP', 'HCTI'))
THEN
UPDATE PAC
SET PAC_PRONT_STATUS = 'A'
WHERE ((PAC.PAC_REG = :NEW.TDL_PAC_REG) OR (PAC.PAC_REG = :OLD.TDL_PAC_REG));
ELSE
UPDATE PAC
SET PAC_PRONT_STATUS = 'C'
WHERE ((PAC.PAC_REG = :NEW.TDL_PAC_REG) OR (PAC.PAC_REG = :OLD.TDL_PAC_REG));
END IF;
END;


[Thiago Jader Macedo da CruzParticipante]

CARA MUITO OBRIGADO FUNCIONOU QUE SÓ UMA BELEZA
VLW MESMO:)

[Autor]

Posts