SET TERM ^ ;

CREATE OR ALTER trigger ttbgrupo_modelo_b02d for tbgrupo_modelo
active before delete position 0
AS
BEGIN   
    IF ( OLD.ID > 0) THEN
    BEGIN
        DELETE FROM TBGRUPO_MODELO_PRODUTO T WHERE GRUPO_ID = OLD.ID;
    END
END
^

SET TERM ; ^

SET TERM ^ ;

CREATE OR ALTER trigger ttbgrupo_modelo_produto_b02i for tbgrupo_modelo_produto
active before insert position 0
AS
DECLARE VARIABLE HISTORICO VARCHAR(500);
DECLARE VARIABLE HISTORICO2 VARCHAR(500);
BEGIN
    HISTORICO  = '';
    HISTORICO2 = '';

    IF(NEW.ID > 0) THEN
    BEGIN
        HISTORICO  = HISTORICO||'PRODUTO:'||NEW.PRODUTO_ID||' ADICIONADO NO GRUPO DE FIO: '||NEW.GRUPO_ID;
        HISTORICO2 = HISTORICO2||'PRODUTO:'||NEW.PRODUTO_ID||' ADICIONADO';
    END

    IF (HISTORICO <> '') THEN
    BEGIN
        EXECUTE PROCEDURE SPI_HISTORICO('TBPRODUTO',NEW.PRODUTO_ID, HISTORICO);
        EXECUTE PROCEDURE SPI_HISTORICO('TBGRUPO_MODELO',NEW.GRUPO_ID, HISTORICO2);
    END 
END
^

SET TERM ; ^

SET TERM ^ ;

CREATE OR ALTER trigger ttbgrupo_modelo_produto_b01d for tbgrupo_modelo_produto
active before delete position 0
AS
DECLARE VARIABLE HISTORICO VARCHAR(500);
DECLARE VARIABLE HISTORICO2 VARCHAR(500);
BEGIN
    HISTORICO  = '';
    HISTORICO2 = '';

    IF(OLD.ID > 0) THEN
    BEGIN
        HISTORICO  = HISTORICO||'PRODUTO:'||OLD.PRODUTO_ID||' EXCLUIDO DO GRUPO DE FIO: '||OLD.GRUPO_ID;
        HISTORICO2 = HISTORICO2||'PRODUTO:'||OLD.PRODUTO_ID||' EXCLUIDO';
    END

    IF (HISTORICO <> '') THEN
    BEGIN
        EXECUTE PROCEDURE SPI_HISTORICO('TBPRODUTO',OLD.PRODUTO_ID, HISTORICO);
        EXECUTE PROCEDURE SPI_HISTORICO('TBGRUPO_MODELO',OLD.GRUPO_ID, HISTORICO2);
    END 
END
^

SET TERM ; ^







