Ir para conteúdo
  • Cadastre-se

dev botao

Impressão de boleto com valor zerado por setValorDocumento funcionando mal


  • Este tópico foi criado há 1814 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

Pós atualização dos arquivos ACBR-boleto os boletos gerados passaram a sair com valor documento zerado.

Verifiquei o log dos arquivos e encontrei a alteração que me trouce problemas, segue:

 

procedure TACBrTitulo.setValorDocumento(const AValue: Currency);
begin
  // O arredondamento é com objetivo de remover as diferenças em arredondamentos posteriores,
  //    que causa uma diferença entre o valor do documento e a linha digitável.

  fValorDocumento := RoundTo(Double(AValue), -2);
end;
  // Veja:

Porem não sei por qual motivo Double(25,55) me retorna zero, e também não entendo a necessidade desta "Conversão" para Double se "AValue" e "fValorDocumento" são Currency;

 

Podo somente o meu Delphi está se comportando desta forma, se alguém puder me orientar, pois parece ser uma coisa boba, mas não gosto de mexer diretamente nos códigos do ACBR.

Obrigado desde já. 

 

Link para o comentário
Compartilhar em outros sites

  • Administradores

Bom dia,

Obrigada pela contribuição, adicionada para análise.

Att.

  • Curtir 1
  • Obrigado 1
Consultora SAC ACBr

Juliana Tamizou

Gerente de Projetos ACBr / Diretora de Marketing AFRAC
Ajude o Projeto ACBr crescer - Seja Pro

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.  Discord

Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil


Participe de nosso canal no Discord e fique ainda mais próximo da Comunidade !!

Link para o comentário
Compartilhar em outros sites

1 hora atrás, Jéter Rabelo Ferreira disse:

Bom dia

Resolvi aqui mudando o RoundTo para RoundABNT (ACBrUTIL)

Segue unit modificada.

Atenciosamente,

ACBrBoleto.pas 135 kB · 1 download

Baixei seu arquivo aqui, sua correção não se deve ao RoundABNT e sim a supressão da conversão Double.
Mas de qualquer forma resolve.

 

 

1 hora atrás, Juliana Tamizou disse:

Bom dia,

Obrigada pela contribuição, adicionada para análise.

Att.

Obrigado pela presteza e velocidade Juliana.

 

1 hora atrás, farnetani disse:

Nossa, estou com o mesmo problema!

Edite a o seu Arquivo ...\ACBRNFe2_Trunk2\Fontes\ACBrBoleto\ACBrBoleto.pas na função que foi citada acima.

  • Curtir 3
Link para o comentário
Compartilhar em outros sites

1 hora atrás, Wellington Alamino disse:

Baixei seu arquivo aqui, sua correção não se deve ao RoundABNT e sim a supressão da conversão Double.
Mas de qualquer forma resolve.

 

 

Obrigado pela presteza e velocidade Juliana.

 

Edite a o seu Arquivo ...\ACBRNFe2_Trunk2\Fontes\ACBrBoleto\ACBrBoleto.pas na função que foi citada acima.

Olá, 

Sim, retirar o Double ou utilizar o RoundABNT dá na mesma.

Mas se você verificar a commit efetuado no dia 07/04/2019 as 20:27, que foi quando alteraram isso e ocasionou o problema, colocaram a mensagem no commit de "Correção para Compilação em 64 bits"

Portanto, ao utilizar o RoundABNT, uma função contida no ACBrUtil, a mesma deve estar compatibilizada com x64. Por isso a utilização dela por minha parte.

Atenciosamente.

  • Curtir 3

------------------------------------------------

Jéter Rabelo Ferreira
Campestre/MG

Link para o comentário
Compartilhar em outros sites

36 minutos atrás, Jéter Rabelo Ferreira disse:

Olá, 

Sim, retirar o Double ou utilizar o RoundABNT dá na mesma.

Mas se você verificar a commit efetuado no dia 07/04/2019 as 20:27, que foi quando alteraram isso e ocasionou o problema, colocaram a mensagem no commit de "Correção para Compilação em 64 bits"

Portanto, ao utilizar o RoundABNT, uma função contida no ACBrUtil, a mesma deve estar compatibilizada com x64. Por isso a utilização dela por minha parte.

Atenciosamente.

Entendi, Ciente agora.
 

  • Curtir 1
Link para o comentário
Compartilhar em outros sites

  • Administradores

Bom dia.

A contribuição já foi adicionada para análise.

Att.

Consultora SAC ACBr

Juliana Tamizou

Gerente de Projetos ACBr / Diretora de Marketing AFRAC
Ajude o Projeto ACBr crescer - Seja Pro

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.  Discord

Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil


Participe de nosso canal no Discord e fique ainda mais próximo da Comunidade !!

Link para o comentário
Compartilhar em outros sites

15 horas atrás, Antonio Paulo Mangili disse:

boa noite estou com o mesmo problema. a minha sorte é que atualizei somente um cliente, e tinha um executavel de dia anterior.

alguma novidade sobre essa resolução.

obrigado

Baixe o arquivo disponibilizado pelo Jéter Rabelo, substitua no seu diretório, provisoriamente é isso.
Temos de esperar a analise do novo arquivo para que possa ser testado pela equipe e subido em produção.

 

Att, 

  • Curtir 1
Link para o comentário
Compartilhar em outros sites

  • Membros Pro
20 minutos atrás, Wellington Alamino disse:

Baixe o arquivo disponibilizado pelo Jéter Rabelo, substitua no seu diretório, provisoriamente é isso.
Temos de esperar a analise do novo arquivo para que possa ser testado pela equipe e subido em produção.

 

Att, 

Ok. Obrigado

Link para o comentário
Compartilhar em outros sites

  • Consultores
Em 09/04/2019 at 14:51, Jéter Rabelo Ferreira disse:

Olá, 

Sim, retirar o Double ou utilizar o RoundABNT dá na mesma.

Mas se você verificar a commit efetuado no dia 07/04/2019 as 20:27, que foi quando alteraram isso e ocasionou o problema, colocaram a mensagem no commit de "Correção para Compilação em 64 bits"

Portanto, ao utilizar o RoundABNT, uma função contida no ACBrUtil, a mesma deve estar compatibilizada com x64. Por isso a utilização dela por minha parte.

Atenciosamente.

19 horas atrás, Antonio Paulo Mangili disse:

boa noite estou com o mesmo problema. a minha sorte é que atualizei somente um cliente, e tinha um executavel de dia anterior.

alguma novidade sobre essa resolução.

obrigado

Enviei a alteração na Revisão 16866. Queiram por favor fazer a atualização, testar e reportar qualquer problema.

 

 

  • Curtir 2
  • Obrigado 1

[]'s

Consultor SAC ACBr

Elton
Profissionalize o ACBr na sua empresa, conheça o ACBr Pro.

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Um engenheiro de Controle de Qualidade(QA) entra num bar. Pede uma cerveja. Pede zero cervejas.
Pede 99999999 cervejas. Pede -1 cervejas. Pede um jacaré. Pede asdfdhklçkh.
Link para o comentário
Compartilhar em outros sites

  • Este tópico foi criado há 1814 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar Agora
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.

The popup will be closed in 10 segundos...