Erro ao Gerar remessa e boletos para a Cresol

[jairodacosta]

Olá, estou tentando implementar a Cobrança da Cresol no meu sistema, mas está dando erro ao usar a função 'MontarCampoNossoNumero(Titulo)'

retorna erro 'arithmetic exception, numeric overflow, or string truncation' e o nosso número está gerando com uma letra no dígito

no caso nosso número 2, está gerando 2P e teria q ser 28, conforme imagens anexo, se alguém puder ajudar agradeço, layout c400 !!!

Também não puxa a logo no boleto

[jairodacosta]

O erro do overflow já corrigi, só o nosso número e a logo q não sai !!!

[Juliomar Marchetti]

https://acbr.sourceforge.io/ACBrMonitor/Particularidades.html

[jairodacosta]

isso só acontece no nosso número 2

3, 4 gera normal o dígito !!!

vou verificar o material ali de cima !!!

 

[jairodacosta]

gerei agora o nosso número 16 e também acrescentou a letra P ao invés do dígito !!!

[jairodacosta]

estava vendo unit do banco encontrei esse códio, acho q é isso mesmo !!!

Modulo.CalculoPadrao;
   Modulo.MultiplicadorFinal := 7;
   Modulo.Documento := ACBrTitulo.Carteira + ACBrTitulo.NossoNumero;
   Modulo.Calcular;

   if Modulo.ModuloFinal = 1 then
      Result:= 'P'
   else
      Result:= IntToStr(Modulo.DigitoFinal);

[jairodacosta]

Olá !!! O nosso número é aquele mesmo, gerei e fiz a homologação, aceitou com a letra no final !!!

Tudo certo, por gentileza pode fecha o tópico !!!

[Juliomar Marchetti]

Obrigado por reportar.

Fechando. Para novas dúvidas, criar um novo tópico.