Erro Na Remessa Sicoob

[Sergio Carvalho Jr]

Bom dia!

Estou enviando o arquivo de remessa c400, mas o sistema da Sicoob esta recusando devido a posição do Conta e Digito.

Olhei no fonte, no ACBrBancoob, linha 315 e verifiquei que:

Cedente.Conta =  '0000001234'

Cedente.Contadigito = '8'

Até aqui, tudo ok. Mas quando executa

padR( OnlyNumber(Cedente.Conta) + Cedente.ContaDigito, 9, '0') 

ele retorna: '000000123' e não '000012348'

A versão que estou utilizando do ACBr é: 4847

Obrigado pela ajuda.

[André Ferreira de Moraes]

O Manual diz que o campo Conta deve conter o tamanho de 8 dígitos e vc está preenchendo com 10.

[Sergio Carvalho Jr]

Obrigado pela resposta. Mas eu só informo a conta com o número 1234. Aqueles 0 a esquerda é a formatação que o componente esta adicionando na linha que informei. Acredito que é ai que esta ocorrendo o problema.

Aguardo o retorno.

[Sergio Carvalho Jr]

Bom dia!

Estou enviando os prints para que vocês possam entender melhor o que esta acontecendo.

 

 

 

 

 

 

 

[Régys Silveira]

Sergio, veja na primeira figura, você está passando com 10 dígitos, veja que o valor vem do teu campo no banco de dados, como o André disse anteriormente, precisa ser 8 dígitos.

[Sergio Carvalho Jr]

Obrigado pela resposta.

Na linha 105 eu estou passando o valor 1234, os 0000 na frente é a formatação do componente.

Eu até passei o valor fixo para que vocês possam entender melhor o que esta acontecendo, olhe a primeira imagem, na linha 105.

[Régys Silveira]

O que estou achando estranho é que um colega homologou SICOB a menos de duas semanas, e não houve problemas, vou dar uma olhada melhor e já lhe dou resposta.

[Régys Silveira]

Você esta totalmente atualizado? Verifique também se não existem conflitos nos fontes que você tem do ACBr (arquivos com pontos vermelhos nos ícones).

[Sergio Carvalho Jr]

A versão que estou utilizando é a 4860. 

[Régys Silveira]

Verificou se não tem nada em vermelho?

[Sergio Carvalho Jr]

Nesse arquivo: C:\DelphiXe2\ACBR\Pacotes\Delphi\ACBr_BoletoFC_Fortes.dpk 

[Régys Silveira]

Tente primeiro excluir os arquivos em vermelho, após isso atualize novamente o ACBr, ele vai criar os arquivo novamente, feito isso reinstale o ACBr.

Verifique se depois disso ainda continua acontecendo o problema.

[Sergio Carvalho Jr]

Reinstalei o ACbr mas continua apresentando o mesmo problema.

Acredito que seja na hora de montar a string da remessa, na linha 310.

Se você verificar lá, nessa rotina:

 

padR( OnlyNumber(Cedente.Conta)                         +  // Conta Corrente

                  Cedente.ContaDigito, 9, '0')

 

ele esta com o Cedente.Conta com os 0000 na frente, e na hora de concatenar ele corta os últimos valores.

 

Fico no aguardo, pois só falta esse detalhe para finalizar a homologação. 

[Régys Silveira]

Acho que encontrei o problema, poderia me informar qual o tamanho da conta correto da conta, para que eu possa acertar?

[Régys Silveira]

Enviei uma possível correção, por favor, atualize e tente novamente.

[Sergio Carvalho Jr]

São 8 digitos para a conta e 1 para o digito.

Vou testar aqui, e posto o resultado.

[Sergio Carvalho Jr]

Agora esta ok! Gerou o arquivo corrente de remessa.

Estou realizando o pagamento para verificar se foi tudo ok.

Obrigado pela ajuda.

[Régys Silveira]

Marque o post como resolvido por favor.