SET TERM ^ ;

CREATE trigger ttbcampanha_b02i for tbcampanha
active before insert position 0
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('TBCAMPANHA',NEW.ID, HISTORICO);
     END
END
^

SET TERM ; ^

