CREATE OR ALTER TRIGGER TTBNFS_PARCELAMENTO00IU FOR TBNFS_PARCELAMENTO
ACTIVE BEFORE INSERT OR UPDATE POSITION 0
AS
DECLARE VARIABLE CLASSIFICACAO_NF VARCHAR(20);
BEGIN

    SELECT FIRST 1
        T.CLASSIFICACAO
    FROM TBNFS T
    WHERE T.CONTROLE = NEW.NFS_CONTROLE
    INTO :CLASSIFICACAO_NF;

    IF(CHAR_LENGTH(:CLASSIFICACAO_NF) > 0)THEN
    BEGIN
        NEW.CLASSIFICACAO = TRIM(:CLASSIFICACAO_NF);
    END

    IF(NEW.DATA_VENCIMENTO_ORIGINAL IS NULL)THEN
    BEGIN
       NEW.DATA_VENCIMENTO_ORIGINAL = NEW.DATA_VENCIMENTO;
    END
END;