SET TERM ^ ;

CREATE trigger tbcaixabanco_lanc_reg_b05iu for tbcaixabanco_lancamento_reg
active before insert or update position 5
AS
BEGIN

    IF(NEW.VALOR_TOTAL < 0) THEN
    BEGIN
        EXCEPTION "..."'VALOR TOTAL DO LANC'||NEW.CONTROLE||' NAO PODE SER NEGATIVO.';

    END

END
^

SET TERM ; ^

