Banco Do Brasil, Convênio Com 7 Dígitos

[geazi]

Prezados, bom dia.

Nos convênios com 7 digitos, o BB exige que o nosso número seja no formato de 17 caracteres, quando a carteira for "17" mas

O ACBr está calculando com 10 digitos.

Eu fiz a correção nos meus fontes. Mas toda vez que atualizo, como hoje pela manhã, o problema retorna.

 

Como proceder ? Seguem as mudanças em negrito, no método CalcularTamMaximoNossoNumero:

 

   if (Length(trim(NossoNumero)) > 10) and (wTamConvenio = 6) and

      ((wCarteira = '16') or (wCarteira = '18')) then

      Result:= 17

   else if (wTamConvenio <= 4) then

      Result := 7

   else if (wTamConvenio > 4) and (wTamConvenio <= 6) then

      Result := 5

   else if ((wTamConvenio = 7) and (wCarteira = '17')) then

      Result := 17

   else if (wTamConvenio = 7) then

      Result := 10;

 

Um abraço a todos.

 

[FRANCISCO908]

Antes de Calcular o Nosso Numero... Informe a Carteira...

Carteira           := SoNumeros(DTModule.QrEmpresaBoletoCarteira.Text); //18-19

NossoNumero := DTModule.QrEmpresaBoletoNossoNumero.Text; //0000001979

// Veja se lhe ajuda...

[geazi]

Oi, Francisco.

Não ajuda. Pois sem a mudança não monta o nosso número corretamente.

[Juliana Tamizou]

Bom dia.

 

Favor anexar a unit alterada.

 

Att.

[felipeiw]

estou com o mesmo problema, o bb me enviou a seguinte observacao: 

o arquivo enviado está configurado para convênio de 6 dígitos.Seu convênio de cobrança é de 7 dígitos.

 

 

Porem pessoal, nao entendi como devo fazer no componente para passar essa informacao, por favor poderiam me ajudar obrigado

[Jacinto Junior]

Prezados, bom dia.

Nos convênios com 7 digitos, o BB exige que o nosso número seja no formato de 17 caracteres, quando a carteira for "17" mas

O ACBr está calculando com 10 digitos.

Eu fiz a correção nos meus fontes. Mas toda vez que atualizo, como hoje pela manhã, o problema retorna.

 

Como proceder ? Seguem as mudanças em negrito, no método CalcularTamMaximoNossoNumero:

 

   if (Length(trim(NossoNumero)) > 10) and (wTamConvenio = 6) and

      ((wCarteira = '16') or (wCarteira = '18')) then

      Result:= 17

   else if (wTamConvenio <= 4) then

      Result := 7

   else if (wTamConvenio > 4) and (wTamConvenio <= 6) then

      Result := 5

   else if ((wTamConvenio = 7) and (wCarteira = '17')) then

      Result := 17

   else if (wTamConvenio = 7) then

      Result := 10;

 

Um abraço a todos.

 

Boa tarde meu caro.

 

Em que trecho do manual consta essa informação? Pois de acordo com a nota 06 do manual CBR641 (CNAB400) para as carteiras 12, 15 e 17 o nosso número contém 10 posições.

 

PS: Por favor desconsidere meu post, me equivoquei ao observar somente o número sequencial e acabei desconsiderando o número no convênio. Desculpe.

Editado 29 Maio, 2015 por Jacinto Junior

[felipeiw]

pessoal como indico ao componente que p convenio é de 7 digitos ?

 

obrigado

[Jacinto Junior]

pessoal como indico ao componente que p convenio é de 7 digitos ?

 

obrigado

 

Basta informar o número do convêncio no atributo "ACBrBoleto.Cedente.Convenio".

[felipeiw]

obrigado jacinto, porem estou passando valor pra essa propriedade, porem estou passando da seguinte maneira

 

Cedente.Convenio := '40418';

 

tenho que preencher com zero a esquerda e completar 7 digitos ?

 

abs e mt obrigado

[Jacinto Junior]

obrigado jacinto, porem estou passando valor pra essa propriedade, porem estou passando da seguinte maneira

 

Cedente.Convenio := '40418';

 

tenho que preencher com zero a esquerda e completar 7 digitos ?

 

abs e mt obrigado

 

Meu caro, seria interessante apurar essa informação com o banco. Acredito que esse não seja o código do seu convênio.

Editado 8 Junho, 2015 por Jacinto Junior