ALTER TABLE TBMODELO_OBSERVACAO
    ADD OBSERVACAO_COMERCIAL BLOB SUB_TYPE 0 SEGMENT SIZE 80;

SET TERM ^ ;

CREATE OR ALTER trigger ttbcatalogo_produto_b01d for tbcatalogo_produto
active before delete position 0
AS
DECLARE VARIABLE HISTORICO VARCHAR(500);
DECLARE VARIABLE VINCULO INTEGER;
BEGIN

    HISTORICO = '';
    VINCULO = COALESCE((SELECT FIRST 1 A.ID FROM TBCATALOGO_PRODUTO_VINCULO A INNER JOIN TBPDV_CONFERENCIA B ON B.ID = A.PDV_CONFERENCIA_ID AND B.CODIGO_PED = A.CODIGO_PED WHERE A.CATALOGO_ID = OLD.ID), 0);

    IF (VINCULO > 0) THEN
    BEGIN
        EXCEPTION "..." 'CATALOGO DE PRODUTOS VINCULADO A UM PRE-PEDIDO. OPERACAO NAO AUTORIZADA!';
    END


    IF (OLD.ID > 0) THEN
    BEGIN
        HISTORICO = HISTORICO||'REGISTRO EXCLUIDO';
    END

    IF (HISTORICO <> '') THEN
    BEGIN
        EXECUTE PROCEDURE SPI_HISTORICO('TBCATALOGO_PRODUTO', OLD.ID, HISTORICO);
    END
END
^

SET TERM ; ^

