Mudança De Montagem Do Nosso Número - Banco Sicredi

[AlexandreWerner]

Bom dia,

 

Estava sem atualizar o ACBr desde março/15, e agora percebi que houve uma mudança na forma que é calculado o Digito Verificador do banco Sicredi, e está dando erro no Nosso Número. 

Usando um arquivo XLS que o Sicredi disponibiliza para testes dos boletos, testei a linha digitável e os dados do boleto, com a versão antiga do ACBr funciona normalmente, e agora com a versão atual dá erro na linha digitável e no Nosso Número.

 

Li o arquivo de Log do ACBrBoleto e lá diz que no dia 22/05/2015 ver. 0.0.128a, foi feita uma refatoração do código da montagem do nosso número do ACBrSicredi.pas, tem alguma coisa que mudou na forma que os dados devem ser informados? 

 

Pois na versão antiga funciona normalmente, e agora não. E estou com vários boletos errados nos clientes. 

 

 

 

[AlexandreWerner]

Descobri o que estava me ocasionado esse erro na Linha Digitável.

Eu estava informando o Nosso Número na montagem do Título somente com a sequência do arquivo, sem o ano e o digito dois. Por exemplo: Eu informava assim: 00096012 e deveria ser 15292012. Sendo assim, o calculo do nosso número funcionava normalmente, mas a linha digitável ficava errada, sem o Ano e o 2.  

[LeonardoZanella]

Ola Alexandre,

 

Realmente, tambem estive com o mesmo problema, solucionei alterando uma linha no modulo da cobranca Sicredi... acredito ser a solucao mais viavel sendo que essa questao de colocar o ano e o digito antes e uma particularidade do Sicredi entao acredito que deva ficar dentro do modulo do Sicredi essa implementacao e nao termos que ficar testando em nossos fontes pra ver pra qual banco esta sendo gerado e se for Sicredi reformular o nosso numero...

 

desta forma anexo o "ACBrBancoSicredi.pas" para que os administradores do ACBR avaliem e se possivel disponibilizem a todos.

ACBrBancoSicredi.pas

[AlexandreWerner]

Foi isso que tu alterastes Leonardo Zanella? 
Na linha 124 da function TACBrBancoSicredi.MontarCodigoBarras ?

//padR(ACBrTitulo.NossoNumero,8,'0')      + { Nosso número }
  FormatDateTime('yy',ACBrTitulo.DataDocumento) + ACBrTitulo.CodigoGeracao + RightStr(ACBrTitulo.NossoNumero,5) + { Nosso número montado com iniciais do ano}

Uma coisa que eu gostaria de saber é como o pessoal tem controlado suas versões, estou atualizando toda a semana, mas as vezes acontecem problemas como esse. 

Editado 16 Junho, 2015 por AlexandreWerner

[LeonardoZanella]

Exatamente, essa linha mesmo que foi alterada...

 

esses ajustes que se faz no ACBR o ideal seria que os administradores atualizassem no repositorio, pois caso tivermos que formatar vai voltar a situacao anterior ou seja "errado"

 

entao e importante a colaboracao de todos neste sentido fazendo ajustes e nos ajudando.

[Juliana Tamizou]

Boa noite.

 

Os últimos ajustes comitados estavam de acordo com o último manual disponibilizado pelo banco...quanto as novas alterações que podem ser realizadas, a análise é feita com base nos arquivos anexados no próprio fórum.

 

Att.

[lucasjrnany]

Boa tarde, 

 

Estou com mesmo problema na cobrança Sicredi CNAB400, estava tudo funcionando perfeito fiz atualização do componente, ai Cliente me reclamou que clientes dele não estão conseguindo fazer o pagamento do Boletos. Entrando em contato com banco eles me passaram que calculo da linha digital que banco compara na entrada da remessa está diferente me passaram a linha digitável correta para eu comparar.

74891.11521 09688.909028 03061.111005 1 65050000041466 errada 

74891.11521 09688.909028 03061.110031 9 65050000041466 certo

 

Em vermelho se encontra a divergência.

link do manual referência pelo banco http://www.sicredi.com.br/websitesicredi/upload/files/28460_Manual_Beneficiario_Cobranca_CNAB_400___18062014.pdf.

 

Att.

[Juliana Tamizou]

Boa noite.

Conforme citado nos posts anteriores as rotinas foram validadas conforme manual disponibilizado pelo banco...para que seja possível analisar favor informar os dados passados ao componente para geração do boleto.

Att.

[lucasjrnany]

Boa Noite,

Juliana segue os dados solicitado

Cooperativa : 0902 Posto :03 Cedente : 06111 CC : 06111-5 

CNAB : 400

Nosso Numero  passando componente 9688  Nosso Numero Formatado : 15/209688-9

Emissão : 15/07/2015 Vencimento : 30/07/2015

Protesto : 5 Dias

Valor do Titulo :  414,66

Se precisar mais de algum dados posso te enviar o arquivo de remessa.

Obrigado

Att.

[Juliana Tamizou]

Boa noite.

Preciso que você informe em quais propriedade inseriu as informações referentes ao cedente e a conta.

Att.

[lucasjrnany]

Boa noite.

Preciso que você informe em quais propriedade inseriu as informações referentes ao cedente e a conta.

Att.

Segue os dados.

 ACBrBoletoFCFR.Filtro := fiNenhum;

ACBrBoletoFCFR.LayOut := lPadrao

ACBrBoleto.Banco.TipoCobranca := cobSicred;

ACBrBoleto.Cedente.Modalidade := '1'

acbrboleto.Banco.Numero = 748

Cedente.TipoInscricao := pJuridica;

Cedente.ResponEmissao := tbCliEmite;

CodigoMora        := 'A';

Cedente.Agencia = '0902'

 Cedente.AgenciaDigito = '03';

acbrboleto.Cedente.Conta = '06111'

acbrboleto.Cedente.CodigoCedente = '06111';

LayoutRemessa := c400;

titulo.Carteira = 1;

 

Att ...

 

[Juliana Tamizou]

Boa noite.

Você deve informar o campo Titulo.CodigoGeracao com o código do posto.

Att.

[lucasjrnany]

Boa noite.

Você deve informar o campo Titulo.CodigoGeracao com o código do posto.

Att.

Boa Tarde,

 

Juliana tava olhando o manual na pagina 52, na montagem do campo livre o valor do campo posto são duas posições, o código do posto que estou passando  03, se eu passar  esse valor para componente ele rejeita o valor do zero é isso mesmo não preciso passar  o valor de zero a esquerda, Pintou essa duvida ?

 

Att

[Juliana Tamizou]

Boa noite.

Em que momento o Código de Geração está sendo alterado? 

Att.

[lucasjrnany]

Boa noite.

Em que momento o Código de Geração está sendo alterado? 

Att.

Boa Noite,

 

Juliana estou com protocolo aberto no Sicredi, olhando bem analisando e fazendo as contas manualmente  e seguindo manual do Sicredi, cálculo está correto e também tenho planilha de validação do sicredi que valida a linha digitável do boleto, o acbr está gerando correto a linha digitavel, assim que eles responderem darei o feedback aqui no tópico, obrigado pela atenção.

 

Att.

[Wanderley Trevisan]

Boa tarde pessoal,

Estou com o mesmo problema mesmo informando o posto 03.

Alguma novidade sobre o problema da Sicredi ?

 

Att

[Wanderley Trevisan]

Boa tarde,

Aqui deu tudo certo, depois de atualizar novamente o ACBR apenas informei o Código de Geração = 2 e não deu mais nenhum erro.

Obrigado.

Wanderley Trevisan

 

 

[lucasjrnany]

Bom dia, 

O pessoal do SIcredi me retornou está correto mandei novo boletos para eles validarem. Por algum motivo algum boleto sairão da sequência, mais foi resolvido. Wanderley Trevisan exatamente o código da Geração e 2 mesmo.

Bom Trabalho.

Att.

[edson.hexa]

Bom dia a todos,

postei um topico sobre o assunto a alguns dias, e hoje recebi o ok do banco os boletos e o arquivo remessa foram homologados,

a mudança que fiz foi a seguinte,

na função montacodigodebarras

 

CampoLivre :=   Modalidade                              + { 1-Com registro ou 3-Sem registro. Por enquanto vou deixar 1 mais tenho que tratar menhor essa informação }
                      '1'                                     + { 1-Carteira simples }
                      //padR(ACBrTitulo.NossoNumero,8,'0')      + { Nosso número }  // Comentei aqui
                      padR(FormatDateTime('yy',ACBrTitulo.DataDocumento) + //Adicionei essa linhas
                      ACBrTitulo.CodigoGeracao + RightStr(ACBrTitulo.NossoNumero,5),8,'0') + //Adicionei essa linhas
                      CalcularDigitoVerificador(ACBrTitulo)   + { Dígito verificador do nosso número }
                      padR(OnlyNumber(Cedente.Agencia),4,'0') + { Código agência (cooperativa) }
                      padR(Cedente.AgenciaDigito,2,'0')       + { Dígito da agência (posto da cooperativa) }
                      padR(OnlyNumber(Cedente.CodigoCedente),5,'0')   + { Código cedente }  //  Ver manual página 86 - CNAB240 ou 51 - CNAB400
                      '1'                                     + { Filler - zero. Obs: Será 1 quando o valor do documento for diferente se zero }
                      '0';                                    { Filler - zero }

 

como disse o nosso amigo o ano tem que vir na montagem do nosso numero.

 

Att..

 

Edson Francisco

[lucasjrnany]

Bom dia a todos,

postei um topico sobre o assunto a alguns dias, e hoje recebi o ok do banco os boletos e o arquivo remessa foram homologados,

a mudança que fiz foi a seguinte,

na função montacodigodebarras

 

CampoLivre :=   Modalidade                              + { 1-Com registro ou 3-Sem registro. Por enquanto vou deixar 1 mais tenho que tratar menhor essa informação }
                      '1'                                     + { 1-Carteira simples }
                      //padR(ACBrTitulo.NossoNumero,8,'0')      + { Nosso número }  // Comentei aqui
                      padR(FormatDateTime('yy',ACBrTitulo.DataDocumento) + //Adicionei essa linhas
                      ACBrTitulo.CodigoGeracao + RightStr(ACBrTitulo.NossoNumero,5),8,'0') + //Adicionei essa linhas
                      CalcularDigitoVerificador(ACBrTitulo)   + { Dígito verificador do nosso número }
                      padR(OnlyNumber(Cedente.Agencia),4,'0') + { Código agência (cooperativa) }
                      padR(Cedente.AgenciaDigito,2,'0')       + { Dígito da agência (posto da cooperativa) }
                      padR(OnlyNumber(Cedente.CodigoCedente),5,'0')   + { Código cedente }  //  Ver manual página 86 - CNAB240 ou 51 - CNAB400
                      '1'                                     + { Filler - zero. Obs: Será 1 quando o valor do documento for diferente se zero }
                      '0';                                    { Filler - zero }

 

como disse o nosso amigo o ano tem que vir na montagem do nosso numero.

 

Att..

 

Edson Francisco

Boa tarde, 

Edson existem uma função no ACBR que formata o nosso numero eu uso ele, para banco sicredi eu faço assim eu meu fonte :

FBDContasReceberBLOQUETO_NOSSO_NUMERO.AsString := ACBrBoleto.Banco.MontarCampoNossoNumero(Titulo));

Assim não precisei mexer no fontes do ACBR.

 

Att.

 

[jburda]

Lucas, Estou tendo o mesmo problema! Eu também utilizo  Banco.MontarCampoNossoNumero(Titulo)) para obter o nosso numero e gravar no banco de dados, mas, para obter este valor ele já deve utilizar o titulo e, quando é enviado para o componente, ele vai sem a formatação.

No meu caso, alimento o componente com titulo.nossonumero := '005544', sendo que a linha digitavel fica   

74891.10002 05544.402265 18412.311096 3 65050000069300   (invalido pela planilha de teste)        enquanto o correto deveria ser

 74891.11521 05544.402265 18412.311062 9 65050000069300 (Válido pela Planilha).

Como você está passando o nosso numero no componente para montar a linha digitavel válida ?

A solução que estou utilizando é a mesma do Edson, mas, fico com o encargo de fazer a correção sempre que atualizar os componentes!

[Juliana Tamizou]

Boa noite.

Como pode ser observado nos posts anteriores os boletos estão sendo homologados sem problemas pelo banco.

Para capturar o nosso número, linha digitável ou código de barras calculados pelo componente, basta utilizar os respectivos métodos públicos.

Att.

[lucasjrnany]

Lucas, Estou tendo o mesmo problema! Eu também utilizo  Banco.MontarCampoNossoNumero(Titulo)) para obter o nosso numero e gravar no banco de dados, mas, para obter este valor ele já deve utilizar o titulo e, quando é enviado para o componente, ele vai sem a formatação.

No meu caso, alimento o componente com titulo.nossonumero := '005544', sendo que a linha digitavel fica   

74891.10002 05544.402265 18412.311096 3 65050000069300   (invalido pela planilha de teste)        enquanto o correto deveria ser

 74891.11521 05544.402265 18412.311062 9 65050000069300 (Válido pela Planilha).

Como você está passando o nosso numero no componente para montar a linha digitavel válida ?

A solução que estou utilizando é a mesma do Edson, mas, fico com o encargo de fazer a correção sempre que atualizar os componentes!

Boa jburda,

Faz esse teste por favor depois que você passa o nosso numero para componente executa esta procedure aqui olha se dar certo. ACBrBoleto.Banco.MontarCampoNossoNumero(Titulo);

Qualquer duvida posta ai, hoje homologuei mais 1 clientes Sicredi está tudo perfeito.

Att.

Boa noite.

[jburda]

Juliana, boa Noite !

eu enviei o arquivo de remessa e o banco deu como homologado, mas, realmente existe este problema!

 A linha digitavel de um dos boletos é

74891.10002 05710.202267 18412.311013 8 65060000028600

Este boleto foi enviado no arquivo de remessa

1AAA            AAA                            152057102      20150723 N B0000    00000000000200            0108708180013107150000000028600         KN230715000000000000000760000000000000000000000000000000000000000000002003494752000144ML CONFECCOES LTDA (BIKINIS)            RUA JAU GUEDES DA FONSECA, 369,,COQUEIRO00000000000 8807500000000                                                       000018

O Arquivo de Retorno para confirmação da remessa

1            A001CZ000001                      152057102                                                    022307150870818001                    3107150000000028600         K000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000                          0000000000                                                                  000018

Retorno Pagamento

1            C0000000000                       000057102                                                    06310715          COMPE                     0000000028600                                                              00000000000000000000000000000000002860000000000000000000000000000                          H5        20150810                                                          000004

Conforme pode ser visto, o nosso numero não está correto na linha digitável e, quando este cliente efetuou o pagamento, não baixou na carteira pois o nosso numero que saiu no boleto é diferente do gerado no arquivo de remessa e entrou como cobrança sem registro, ficando o título original em aberto..

Entrei em contato com o setor de homologação e eles confirmaram que o problema está na linha digitável.

[Juliana Tamizou]

Boa noite.

Favor fornecer todos os dados passados ao componente para a geração do arquivo remessa e impressão do boleto para que seja possível analisar.

Att.