Ir para conteúdo
  • Cadastre-se

dev botao

  • Este tópico foi criado há 2777 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

Postado

Olá a todos, estou validando um arquivo remessa do Banco do Brasil, convenio de tamanho 7.

Notei que ao montar o nosso numero:

    if ((ACBrTitulo.Carteira = '16') or (ACBrTitulo.Carteira = '18')) and
        (Length(AConvenio) = 6) and (wTamNossoNum = 17) then
      ANossoNumero := PadLeft(ANossoNumero, 17, '0')
    else if Length(AConvenio) <= 4 then
      ANossoNumero := PadLeft(AConvenio, 4, '0') + PadLeft(ANossoNumero, 7, '0')
    else if (Length(AConvenio) > 4) and (Length(AConvenio) <= 6) then
      ANossoNumero := PadLeft(AConvenio, 6, '0') + PadLeft(ANossoNumero, 5, '0')
    else if (Length(AConvenio) = 7) then
      ANossoNumero := PadLeft(AConvenio, 7, '0') + RightStr(ANossoNumero, 10);

Na ultima linha :

       ANossoNumero := PadLeft(AConvenio, 7, '0') + RightStr(ANossoNumero, 10);

a função RightStr não está fazendo nada.... e lendo o manual temos: 

II - Se numeração a cargo da empresa:

       Preencher da seguinte forma: - Posição 064 a 070 – Número do Convênio -

                                                          Posição 071 a 080 – Número seqüencial a partir de 0000000001, não sendo admitida reutilização ou duplicidade.

Colocando zeros a esquerda, dessa forma nosso numero ficava assim:  00000014267302413  (0000001426730 = convenio) (2413= num sequencial)

Conforme o manual alterar esta linha 195 para: ANossoNumero := PadLeft(AConvenio, 7, '0') + PadLeft(ANossoNumero, 10, '0'); 

O Nosso numero deve ficar 14267300000002413 assim.

Assim seguirá o manual que encontrei no link http://svn.code.sf.net/p/acbr/code/tools/Bancos/BancoBrasil/CBR641Pos7.pdf

Obrigado!

Postado

Boa tarde @Vinicius Rodrigues X, seus fontes do ACBr estão atualizado? Testei com o demo do Boleto, utilizando os valores do convenio e o numero sequencial conforme você havia ciado e o nosso numero saiu conforme mencionado:

Em 12/04/2017 at 10:39, Vinicius Rodrigues X disse:

O Nosso numero deve ficar 14267300000002413 assim.

 

Consultor SAC ACBr Graziele Rocha Serafim
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

 

Postado

Atualizei os fontes e esse trecho de código ainda é o mesmo, se você debugar a função FormataNossoNumero, e cair no ultimo if verá que o RightStr não adiciona '0' zeros a esquerda o tamanho nosso numero é 17, carteira 17, convenio 7 digitos.

  • Este tópico foi criado há 2777 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar Agora
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.