PROBLEMA COM RETORNO CNAB 240 BANCO DO BRASIL

[Giovani Reis]

boa tarde.

estou com problema ao ler o Retorno do Banco do Brasil no Cnab 240.

Utilizo convenio com 6 posições e a carteira é 17, gravo no banco o nosso numero gerado na emissão do titulo a fim de dar baixa no documento por este código. Ao gerar o nosso número pega o convenio e a carteira formatada em 5 posições. Até ai está correto pois convênio 6 e carteira 17 usa a formatação 5.

Na leitura do Retorno é que está o problema, pois preciso concatenar o convenio + a carteira pra comparar com o numero interno. Só que a leitura pega carteira 7 ( pois quando carteira é 17 grava 7 na remessa de acordo com o manual) e formatada com 11 posições em vez de 5.

como faço para pegar o nosso numero correto ao ler o retorno? obrigado.

 

   if (Length(trim(NossoNumero)) > 10) and
      (((wTamConvenio = 6) and ((wCarteira = '16') or (wCarteira = '18'))) or
      ((wTamConvenio = 7) and (wCarteira = '18'))) then
      Result:= 17
   else if (wTamConvenio <= 4) then
      Result := 7
   else if ((wTamConvenio > 4) and (wTamConvenio < 6)) or
           ((wTamConvenio = 6) and ((wCarteira = '12') or (wCarteira = '15') or
            (wCarteira = '17') or (wCarteira = '18'))) then
      Result := 5
   else if (wTamConvenio = 6) then
      Result := 11
   else if (wTamConvenio = 7) then
      Result := 10;

 

IEDCBR36091508201713628.ret

Editado 29 Agosto, 2017 por Giovani Reis

[José M. S. Junior]

Boa tarde, se trata do mesmo problema do tópico abaixo. Corrigido e disponível no SVN.