SET TERM ^ ;

CREATE trigger ttbcheque_pdv_item_b03iu for tbcheque_pdv_item
active before insert or update position 3
AS
DECLARE VARIABLE DATA_AUX DATE;

BEGIN   
    IF(NEW.DATA_VENCIMENTO < CURRENT_DATE) THEN
    BEGIN
        EXCEPTION "..."'DATA DE VENCIMENTO DO CHEQUE '||NEW.SEQUENCIA||' DEVE SER MAIOR QUE A DATA ATUAL';
    END
        
    :DATA_AUX = DATEADD(MONTH, 60, CURRENT_DATE);
    IF(NEW.DATA_VENCIMENTO >= :DATA_AUX) THEN
    BEGIN
        EXCEPTION "..."'DATA DE VENCIMENTO DO CHEQUE '||NEW.SEQUENCIA||' INVALIDA';
    END
END
^

SET TERM ; ^

