Unit ACBrBancoBrasil

[Yorrann Fehlberg]

Galera,

não sei se aconteceu com vocês, mas na minha unit na Procedure LerRetorno400(linha 1184) do Banco do Brasil existe uma condição seguinte:

if (Copy(Linha,1,1) <> '7') or (Copy(Linha,1,1) <> '1') then

         Continue;

Mas quando ia ler o arquivo, sempre caia no Continue e nunca lia os registros do arquivo, precisei mudar e ficou assim:

if ((Copy(Linha,1,1) <> '7') and (Copy(Linha,1,1) <> '1')) then

         Continue;

Alguém mais teve este problema?

[Juliana Tamizou]

Boa tarde.

Correção disponível no svn.

Att.