-- TRIGGER DE INSERT 

CREATE TRIGGER TBCONFIGURACAO_MDF_B02I FOR TBCONFIGURACAO_MDF
ACTIVE BEFORE INSERT POSITION 2
AS
DECLARE VARIABLE HISTORICO VARCHAR(500);
BEGIN

    HISTORICO = '';

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

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

-- TRIGGER DE UPDATE

CREATE TRIGGER TBCONFIGURACAO_MDF_B09U FOR TBCONFIGURACAO_MDF
ACTIVE BEFORE UPDATE POSITION 9
AS
DECLARE VARIABLE HISTORICO VARCHAR(8000);

BEGIN
  HISTORICO = '';

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

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

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

    IF(NEW.CERTIFICADO_FILE <> OLD.CERTIFICADO_FILE) THEN
    BEGIN                  
        HISTORICO = HISTORICO||' CERTIFICADO ALTERADO';
    END

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

    IF(NEW."GENERATOR" <> OLD."GENERATOR") THEN
    BEGIN                  
        HISTORICO = HISTORICO||' GEN.'||OLD."GENERATOR"||' -> '||NEW."GENERATOR";
    END

    IF (HISTORICO <> '') THEN
    BEGIN
        --HISTORICO = ''||NEW.SEQUENCIA||' ALTERADO. '||HISTORICO;
        HISTORICO = FN_ELIPSES(HISTORICO, 500);
        EXECUTE PROCEDURE SPI_HISTORICO('TBCONFIGURACAO_MDF', NEW.ID, HISTORICO);
    END

END;


-- TRIGGER DE DELETE

CREATE TRIGGER TBCONFIGURACAO_MDF_B01D FOR TBCONFIGURACAO_MDF
ACTIVE BEFORE DELETE POSITION 1
AS
DECLARE VARIABLE HISTORICO VARCHAR(500);
BEGIN

    HISTORICO = '';

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

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