SET TERM ^ ;

CREATE trigger ttbapi_integracao_b02i for tbapi_integracao
active before insert position 9
AS
DECLARE VARIABLE HISTORICO VARCHAR(500);
BEGIN
    HISTORICO = '';

    IF(NEW.ID > 0) THEN
    BEGIN
        HISTORICO = HISTORICO||' REGISTRO INCLUÍDO';
    END

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

SET TERM ; ^

SET TERM ^ ;

CREATE OR ALTER trigger ttbapi_integracao_b01u for tbapi_integracao
active before update position 9
AS
declare variable HISTORICO VARCHAR(500);
begin
    HISTORICO = '';

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

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

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

    IF(NEW.ACCESS_TOKEN <> OLD.ACCESS_TOKEN) THEN
    BEGIN
        HISTORICO = HISTORICO||' ACCESS TOKEN: '||OLD.ACCESS_TOKEN||' -> '||NEW.ACCESS_TOKEN;
    END

    IF(NEW.REFRESH_TOKEN <> OLD.REFRESH_TOKEN) THEN
    BEGIN
        HISTORICO = HISTORICO||' REFRESH TOKEN: '||OLD.REFRESH_TOKEN||' -> '||NEW.REFRESH_TOKEN;
    END

    IF(NEW.PARAMETRO1 <> OLD.PARAMETRO1) THEN
    BEGIN
        HISTORICO = HISTORICO||' NOME APP: '||OLD.PARAMETRO1||' -> '||NEW.PARAMETRO1;
    END

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

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

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

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

    IF(NEW.CLIENTE_TIPO_ID <> OLD.CLIENTE_TIPO_ID) THEN
    BEGIN
        HISTORICO = HISTORICO||' TIPO CLIENTE: '||OLD.CLIENTE_TIPO_ID||' -> '||NEW.CLIENTE_TIPO_ID;
    END

    IF(NEW.CLIENTE_SUB_TIPO_ID <> OLD.CLIENTE_SUB_TIPO_ID) THEN
    BEGIN
        HISTORICO = HISTORICO||' TIPO PEDIDO: '||OLD.CLIENTE_SUB_TIPO_ID||' -> '||NEW.CLIENTE_SUB_TIPO_ID;
    END

    IF(NEW.TABELA_PRECO_DE <> OLD.TABELA_PRECO_DE) THEN
    BEGIN
        HISTORICO = HISTORICO||' TAB. PRECO DE: '||OLD.TABELA_PRECO_DE||' -> '||NEW.TABELA_PRECO_DE;
    END

    IF(NEW.TABELA_PRECO_PARA <> OLD.TABELA_PRECO_PARA) THEN
    BEGIN
        HISTORICO = HISTORICO||' TAB. PRECO PARA: '||OLD.TABELA_PRECO_PARA||' -> '||NEW.TABELA_PRECO_PARA;
    END

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

SET TERM ; ^



