CREATE trigger tbgrupo_blok_b01i for tbgrupo_blok
active before insert position 1
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('TBGRUPO_BLOK',NEW.id, HISTORICO);
    END
end;

CREATE trigger tbgrupo_blok_b01u for tbgrupo_blok
active before update position 0
AS
DECLARE VARIABLE HISTORICO VARCHAR(500);
BEGIN

    HISTORICO = '';

    IF ( OLD.DESCRICAO <> NEW.DESCRICAO) THEN
    BEGIN
        HISTORICO = HISTORICO||'Descricao: '|| OLD.descricao||'-> '||NEW.descricao;
    END
    
    IF ( OLD.TIPO_BLOQUEIO <> NEW.TIPO_BLOQUEIO) THEN
    BEGIN
        HISTORICO = HISTORICO||'Tipo: '|| OLD.TIPO_BLOQUEIO||'-> '||NEW.TIPO_BLOQUEIO;
    END
    
    IF (HISTORICO <> '') THEN
    BEGIN
        EXECUTE PROCEDURE SPI_HISTORICO('TBGRUPO_BLOK',NEW.id, HISTORICO);
    END
end;

CREATE trigger tbgrupo_blok_b01d for tbgrupo_blok
active before delete position 0
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('TBGRUPO_BLOK',old.id, HISTORICO);
    END
end;






