SET TERM ^ ;

CREATE trigger ttbbase_conhecimento_b02i for tbbase_conhecimento
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('TBBASE_CONHECIMENTO',NEW.ID, HISTORICO);
     END
END
^

SET TERM ; ^