Retorno Banco do Brasil (Nosso Numero)

[Dercide Alvarez]

Boa tarde,

É mais um comentário do que um problema.

Estou gerando cobrança do Banco do Brasil, e na hora de gerar o nosso numero o ACBrBoleto, gera assim :

AcbrBoleto.Banco.MontarCampoNossoNumero

24175120000002689 onde 2417512 é o convenio, e o resto o sequencial nosso numero, formando assim o nosso numero.

Mas na hora de leitura, eu pego o nosso numero assim :

AcbrBoleto.ListadeBoletos.Objects.NossoNumero, e ele me retorno 0000002689.

Nesse caso, no meu banco de dados esta gravado o nossonumero completo, ai eu monto o nosso numero com o convenio para poder fazer a busca no banco de dados.

No segmento T do retorno, o nosso numero começa na posição 38 até 54, porém é lido a partir da 45.

Como disse, é mais um comentário para ficarem atentos.

Dercide.

 

[Juliana Tamizou]

Boa tarde.

Realmente a questão de como fica o campo no momento da geração da remessa e quando é lido o retorno pode confundir um pouco, acredito que o ideal seja manter separado e talvez na leitura do arquivo retorno capturar somente a parte equivalente ao sequencial, porém precisamos de uma boa análise, uma vez que pode gerar problemas para quem está utilizando da forma atual.

Att.

[Dercide Alvarez]

Juliana,

É justamente por isso que não alterei nada.

Além disso tem bancos que o nosso numero é gerado com alguns caracteres e no retorno esses caracteres não veem junto, caso do Sicredi.

Para contornar essa situação, criei uma função para fazer o tratamento e a montagem do nosso numero conforme ele foi gerado.

    function FormataNossoNumero( ABanco : Integer; ANossoNumero : string) : string;
    begin
      case ABanco of
          001 {BBrasil}: Result := FConvenio + ANossoNumero;

          ......
          748 {Sicredi}: Result := Copy(ANossoNumero, 1, 2) + '/' +
                                                  Copy(ANossoNumero, 3, 6) + '-' +
                                                  Copy(ANossoNumero, 9, 1);
        else
           Result := ANossoNumero;
      end;
    end;
 

Dercide.