SET TERM ^ ;

CREATE OR ALTER trigger ttbcentro_negocio_b01u for tbcentro_negocio
active before update position 9
AS
DECLARE VARIABLE HISTORICO VARCHAR(500);
BEGIN

    HISTORICO = '';

    IF (OLD.DESCRICAO <> NEW.DESCRICAO) THEN
    BEGIN
        HISTORICO = HISTORICO||' Desc.'||OLD.DESCRICAO||'->'||NEW.DESCRICAO;
    END

    IF (OLD.QUANTIDADE IS DISTINCT FROM NEW.QUANTIDADE) THEN
    BEGIN
        HISTORICO = HISTORICO||' Qtd.'||COALESCE(OLD.QUANTIDADE, 0)||'->'||COALESCE(NEW.QUANTIDADE, 0);
    END

    IF (OLD.STATUS <> NEW.STATUS) THEN
    BEGIN
        HISTORICO = HISTORICO||' Status:'||OLD.STATUS||'->'||NEW.STATUS;
    END

    IF (OLD.ESTABELECIMENTO_ID <> NEW.ESTABELECIMENTO_ID) THEN
    BEGIN
        HISTORICO = HISTORICO||' Estab:'||OLD.ESTABELECIMENTO_ID||'->'||NEW.ESTABELECIMENTO_ID;
    END

    IF (OLD.CAP_PRODUTIVA_MENSAL_MIN <> NEW.CAP_PRODUTIVA_MENSAL_MIN) THEN
    BEGIN
        HISTORICO = HISTORICO||' CAP. PRODUTIVA MENSAL MIN.:'||OLD.CAP_PRODUTIVA_MENSAL_MIN||'->'||NEW.CAP_PRODUTIVA_MENSAL_MIN;
    END

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

SET TERM ; ^