Ir para conteúdo
  • Cadastre-se

Adelmo Junior

Membros
  • Total de ítens

    36
  • Registro em

  • Última visita

Tudo que Adelmo Junior postou

  1. O ACBrNFeTeste fica parado na abertura e não continua nem mostra nenhuma mensagem de erro, alguém sabe dizer o que pode ser?
  2. Resolvido! Depois que fiz essa alteração está baixando normal como era antes com capicom! Obrigado pela dica!
  3. Nenhum receio, testei todos os schemas e nenhum funcionou Essa é a configuração do certificado, que sempre funcionou dessa forma!
  4. Também, tudo atualizado, baixei os schemas do portal da sefaz , do acbr e nada
  5. Acabei de atualizar e continua o erro
  6. Atualize o schema instalei o delphi 10.4.2 faz 3 meses ou mais Esse é o código
  7. Adelmo Junior

    Erro ao manifestar nfe

    Alguém sabe dizer o motivo desse erro? Antes funcionava perfeitamente!
  8. O Problema foi resolvido com essa configuração no ACBrNFe
  9. O que tem de errado nesse código que é o que sempre uso e usei antes da atualização
  10. Adelmo Junior

    Manifestar NFe

    Bom dia; Depois que atualizei o ACBr, ao manifestar notas para baixar aparece esta mensagem, alguém sabe informar o motivo?
  11. O ACBr já está compativel com o Rad Studio 10.4? Não consegui instalar o ACBr no RadStudio 10.4, depois da instalação quano abro o Rad Studio apresenta uma mensagem: "Runtime error" e fecha totalmente a ide.
  12. Eu nunca vi isso, estava funcionando de boa! De uns dias pra cá o pessoa começou a falar que as notas estavam ficando em contingencia por esse motivo trabalho a anos com isso e nunca demorei tanto a resolver um problema desse e não lembro ter alterado o nada nesse código
  13. 26200937373977000164650010000000731000041000-nfe.xml Mas ai ele não da o valor correto do desconto
  14. Influencia nos tipos de variáveis com currency, extended e double? estava usando currency e extended vinha com casas decimais com 6 dígitos e agora mudei para double e ja mudou aqui, acredito que seja isso
  15. DesctoAcomulado:=0; ValorDescto:= 0.00; percdescto:= 0.00; TotalRealDescto:= 0.00; ValorDesctoProduto:=0; try ValorDesctoProduto:= DataModule1.ClientMestreTOTAL_DESCTO.AsFloat/QtdeTotalItens; Maiorvalor:= DataModule1.ClienteDetalheMaior.AsString; DataModule1.ClienteDetalhe.DisableControls; DataModule1.ClienteDetalhe.First; while not DataModule1.ClienteDetalhe.eof do begin if DataModule1.ClienteDetalheCANCELADO.AsString ='N' then begin // percdescto := DataModule1.ClientMestrePERC_DESCTO.AsFloat; // ValorDescto := (percdescto * Datamodule1.ClienteDetalheVALOR_TOTAL.AsFloat)/100; try DataModule1.ClienteDetalhe.Edit; DataModule1.ClienteDetalheDESCTO.AsFloat:= percdescto; if DataModule1.ClienteDetalheVALOR_TOTAL.AsFloat < ValorDesctoProduto then DesctoAcomulado:= DesctoAcomulado + ValorDesctoProduto else DataModule1.ClienteDetalheVALOR_DESCTO.AsFloat:= ValorDesctoProduto; DataModule1.ClienteDetalhe.Post; DataModule1.ClienteDetalhe.ApplyUpdates(-1); TotalRealDescto:= TotalRealDescto +ValorDescto; except end; end; DataModule1.ClienteDetalhe.Next; end; vDifDescto := DataModule1.ClientMestreTOTAL_DESCTO.AsFloat - fsvDesc; if vDifDescto < 0 then vDifDescto := vDifDescto * -1; Maiorvalor:= DataModule1.ClienteDetalheMaior.AsString; DataModule1.ClienteDetalhe.Locate('VALOR_TOTAL',Maiorvalor,[loPartialKey]); DataModule1.ClienteDetalhe.Edit; DataModule1.ClienteDetalheVALOR_DESCTO.AsFloat :=DesctoAcomulado + DataModule1.ClienteDetalheVALOR_DESCTO.AsFloat; DataModule1.ClienteDetalhe.Post; DataModule1.ClienteDetalhe.ApplyUpdates(-1); finally DataModule1.ClienteDetalhe.EnableControls; end; Já fiz de tudo não funciona, ão sei o que é exatamente
  16. A questão agora é como pegar esses resíduos! tem uma luz ai pra me dar mais uma forcinha, agradeço
  17. Não tinha esse problema, depois de uns dias pra cá muitas notas estão ficando em contingência por esse motivo
  18. Acredito que seja no arredondamento, mas não sei como resolver; Tenho outro exemplo aqui: tenho uma venda de R$ 56,94 aplico o desconto em (R$) de R$ 6,94 então tenho R$ 50,00, faço o rateio que se não me engano em porcentagem é 12,188 arredondando fica 12,20 e o valor do item sem o desconto é R$ 9,49 passando a ser R$ 8,33. Então o desconto de cada item é de R$ 1,16 que multiplicado por 6 que seria o total de itens na nota fica o total de desconto R$ 6,96 Lembrando que o desconto que apliquei foi de R$ 6,94 na venda e depois faço o rateio! Como resolver isso? Eu carrego do banco para alimentar o componente
  19. Justamente faço o rateio no é que é alterado esse valor
  20. Bom dia! Estou com problema em aplicar desconto na nota, o desconto é de R$ 8,78 em uma nota no valor de R$ 208,78 na impressão o desconto é arredondado para R$ 8,80 o valor a pagar fica R$ 199,98 e mostra o troco de R$ 0,02 Onde está o erro?
×
×
  • 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.