CREATE TRIGGER TTBPDV_CFE_FORMA_PAGAMENTO_B01D FOR TBPDV_CFE_FORMA_PAGAMENTO
ACTIVE BEFORE DELETE POSITION 1
AS

DECLARE VARIABLE SITUACAO_CFE INTEGER;

BEGIN
    
    SELECT
        T.SITUACAO
    FROM TBPDV_CFE T
    WHERE T.ID = OLD.PDV_CFE_ID
    INTO :SITUACAO_CFE;

    IF(:SITUACAO_CFE <> 1) THEN
    BEGIN
        IF(:SITUACAO_CFE = 2) THEN EXCEPTION "..."'CUPOM FISCAL AUTORIZADO. EXCLUSAO CANCELADA';

        IF(:SITUACAO_CFE = 3) THEN EXCEPTION "..."'CUPOM FISCAL CANCELADO. EXCLUSAO CANCELADA';

    END
END;