Problema com leitura do arquivo retorno Caixa E. Federal

[luciano_f]

Pessoal eu usava o RLBoleto como migrei todos os meus relatorios para o Fast Report estou migrando também o componente de boleto.

Porém quando faço a leitura do Arquivo de retorno no Layout 240 que está em anexo nessa mensagem não consigo pegar o nosso Numero completo inclusive com o digito verificador

o RLBoleto trazia todo o nosso numero e tinha uma variavel para pegar o digito do nosso numero

como não encontrei forma de pegar o digito verificar do nosso numero pelo ACBR tive que alterar os fontes bem como a forma como é feito a captura do Nosso numero

Porém gostaria de saber o que está certo e o que está errado o RLBoleto ou o AcbrBoleto

o problema está na linha 548

NossoNumero := copy( Copy(Linha,48,9),Length( Copy(Linha,48,9) )-TamanhoMaximoNossoNum ,TamanhoMaximoNossoNum);

no RLBoleto é

Copy(Linha,47,10);

Porém como não consigo pegar o digito do nosso numero eu mudei para

Copy(Linha,47,11);

Ainda tive que comentar as seguintes linhas

{ if (not LeCedenteRetorno) and (rCNPJCPF <> OnlyNumber(Cedente.CNPJCPF)) then

raise Exception.Create(ACBrStr('CNPJ\CPF do arquivo inválido'));

if (not LeCedenteRetorno) and ((rAgencia <> OnlyNumber(Cedente.Agencia)) or

(rConta+rDigitoConta <> OnlyNumber(Cedente.CodigoCedente))) then

raise Exception.Create(ACBrStr('Agencia\Conta do arquivo inválido')); }

Pois meu cliente recebe arquivo retorno sem esses dados que geram essa Exception e que no RLBoleto consegue fazer a leitura.

A unit alterado também está em anexo.

Grato a todos.

RETORNOCEF1429.cmp.txt

ACBrCaixaEconomica.pas

[Jéter Rabelo Ferreira]

Olá.

Qual a necessidade de pegar o dígito verificador do nosso número no arquivo retorno?

Atenciosamente

Jéter Rabelo Ferreira

[luciano_f]

Eu registro o nosso numero completo inclusive com o digito verificador no banco de dados e depois preciso dele para fazer baixa automatica

mais o poblema não é só ele como disse está pegando o nosso numero incompleto pois começa da posição 48 e no RLBoleto começa em 47

[Juliana Tamizou]

Bom dia Luciano.

Sobre a posição inicial do nosso número, verifique seu svn e também se você precisa utilizar a classe CaixaEconomica ou CaixaEconomicaSICOB, a posição inicial do nosso número já está na 47.

Quanto ao CPf/CNPJ do cedente no arquivo que você anexou ao fórum é informado, por isso não é necesário remover a validação.]

Att.

[luciano_f]

não é necessario remover a validação mais meu cliente recebe os retornos sem esses dados e dai como proceder ??? e sobre o digito verificador que tive que aumentar de 10 para 11 o retorno ?

Copy(Linha,47,11);

[Juliana Tamizou]

Boa tarde.

Quanto ao CNPJ, seria melhor verificar junto ao banco porque está informação não está vindo, pois segundo o manual fornecido pelo mesmo estes campos são informados.

Quanto ao digito do nosso número, talvez fosse interessante uma propriedade no componente ao algo desse tipo que indique se o Digito do nosso número deve ser lido também. Caso queira efetuar a alteração e postar aqui para análise fique a vontade.

Att.

[luciano_f]

Sim isso seria bom mais acredito que apenas pegando no retorno o digito com a função

Copy(Linha,47,11); já resolve.

pois na hora de gerar eu já consigo pegar o digito verificador com a função MontarCampoNossoNumero

agora se for analisar o RLBoleto ele realmente te um propriedade de retorno especifica só para o digito verificador.

Grato.

[Juliana Tamizou]

Bom dia.

O correto seria efetuar alguma alteração no sentido que propus, pois o componente já está sendo usado por outros usuários, sendo assim, apenas capturar o digito do nosso número junto com o restante poderia "estragar" para os demais usuários.

Att.

[luciano_f]

Correto vou dar uma olhada se consigo criar uma propriedade para o digito do nosso numero, e com respeito aos exeptions não seria melhor colocar uma messagedlg de aviso para o usuario no lugar de erro, eu liguei para o banco e o mesmo me disse que por se tratar de um cliente antigo que emite boletos a mais de 7 anos o retorno dele é assim mesmo.

[luciano_f]

Hum acabei de receber uma ligação do suporte que estava aguardando e o interessante foi que o suporte me disse que o Digito verificador faz parte do nosso numero assim como em todos os documento que tem tem digito verificador como "Codigo de Barras", CPF etc.

Então eu acredito que não terá problemas com outros usuarios pois o Digito verificador da forma como foi feito no RLBoleto ao ver do suporte não é correto pois ele está inerente ao NossoNumero assim como já foi feito na função "MontarCampoNossoNumero".