Nome da Rede retornando com informações de sub registros do 010-NNN

[Rodrigo Fruhwirth]

Não estava preenchendo corretamento o nome da rede nos casos em
    que no arquivo de resposta retornasse registros tipo 010-xxx 010-005
    que não fosse o 010-000.

 

ACBr_TEFD-change-log.txt

ACBrTEFDClass.pas

[Daniel Simoes]

Rodrigo,

Não compreendi muito bem,qual a estratégia por trás desse código...

       10  :
         if not TryStrToInt(Linha.Informacao.AsString, Z) then
           fpRede                       := Linha.Informacao.AsString;

 

 

[Rodrigo Fruhwirth]

Por exemplo, no arquivo de resposta do TEF retorna assim

010-000: MASTERCARD

010-005: 549329

esse 549329 estava indo no nome da rede.

Se quiser pode testar a operação com o número de cartão. 5493 2905 2036 2146

[Daniel Simoes]

Compreendi o problema...

Então é correto dizer que devemos ler apenas o campo 010-000, e não os demais (Ex: 010-005) ?

Poderíamos escrever um código específico para ler apenas o "010-000"

[Daniel Simoes]

Algo como:

       10  :
         begin
           if Linha.Sequencia = 0 then
             fpRede := Linha.Informacao.AsString;
         end;

 

[Rodrigo Fruhwirth]

Claro, pode ser.

[Rodrigo Fruhwirth]

Daniel, você quer que eu deixe o código da forma como me mencionou e efetue os testes?

[Daniel Simoes]

Desculpe-me pela demora... já enviei para o SVN, baseado na minha sugestão

[Rodrigo Fruhwirth]

OK, Obrigado.