AcbrECF - Arredondamento

[Daniel Simoes]

Você está confundindo Arredonda com ArredondaItemMFD... A primeira é programada na intervenção fiscal, e existe apenas em ECFs anteriores ao advento da MFD (matriciais), a segunda existem apenas na nova geração de MFDs... Ou seja, alguns modelos de MFD apenas Truncam, sempre...

O que está ocorrendo, é que a classe da Bematech quando interrogada se o ECF "Arredonda" não está considerando se o ECF é ou não compatível com o ArredondaMFD... isso precisará ser revisto nos fontes

[lucasborin]

Mesmo caso já foi reportado antigamente pelo "Joir Soares":

http://www.forumweb.com.br/foruns/topic ... o-nas-ecf/

Função desenvolvida por ele para efetuar este arredondamento:

function ABNTround(valor:extended;decimals:smallint):Extended;

var vm:extended;

        p,f,p2,f2:extended;

Begin

   (* Nova função de arredondamento *)

   vm:=Power(10,Decimals);

   p:=int(valor);

   { A conversão para string e depois para float evita

        erros indesejáveis. Que apareceria na comparação f2=0.5 }

   f:=StrToFloat(FloatToStr(Frac(valor)*vm));

   p2:=int(f);

   f2:=Frac(f);

   if f2>0.5 then

          p2:=p2+1

   else

          if f2=0.5 then

          if frac(p2/2)>0 then p2:=p2+1;


   p2:=p2/vm;

   result:=p+p2;

end;

Caso precisem de uma função de arredondamento ABNT, esta funcionou perfeitamente!

Apenas fica faltando a parte de rever o "arredondamento" da impressora bematech.

[Daniel Simoes]

Não é uma questão de mudar a função para arredondar... a questão é que o MemoBobina pensa que o ECF está truncando.. por isso ele exibe o calculo para truncamento...

Se aceitar a sua modificação, ele quebraria a compatibilidade com os ECFs que apenas truncam...

[lucasborin]

Daniel, tudo bom?

Você tem alguma novidade sobre este caso?

[Daniel Simoes]

Estou analisando neste momento... ontem enviei uma correção semelhante para a classe da SwedaSTX...

O problema da Bematech é que atualmente não saberemos se o ArredondaItemMFD funcionará a não ser quando tentarmos vender um Item e o comando falhar... Vou tentar alguma informação com o suporte da Bematech para saber se há como identificar quais modelos de ECF suportam esse comando

[lucasborin]

Sabe me informar se este caso também está ocorrendo para as demais marcas (elgin, epson...)?

Pois nossa homologação será dentro de 30~60 dias e precisava saber se este relato apenas ocorre na bematech ou nas demais também.

[Daniel Simoes]

Ainda não sei lhe dizer...mas vou rever todas as classes

[Daniel Simoes]

Apliquei uma possível correção no SVN...

Por favor atualize pelo SVN e teste

Leia uma descrição das modificações em ACBrSerial-Change-Log.txt

[lucasborin]

Apliquei uma possível correção no SVN...

Por favor atualize pelo SVN e teste

Leia uma descrição das modificações em ACBrSerial-Change-Log.txt

Perfeito Daniel Simoes, tudo certo agora!

Muito obrigado, parabéns pelo projeto!

Abraço,

Lucas Borin

[lucasborin]

Daniel,

Apenas consegui efetuar o teste em uma impressora que efetua o arredondamento.

Por acaso você tentou efetuar o teste em alguma impressora que efetua o truncamento?

Abraço

[Daniel Simoes]

Sim, o emulador da Bematech apenas trunca (é uma MP2100)

[lucasborin]

Perfeito, tópico encerrado.

Obrigado novamente

[lucasborin]

Não sei se é coerente esta sugestão, mas vejam:

- Caso o arredondamento seja FIXO na impressora, ao ativar o componente, a propriedade "ArredondaItemMFD" é ajustada conforme o que está na impressora (True/False).

- Caso não seja compatível com arredondamento, automaticamente é setado para False.

Pois hoje estou me baseando na propriedade "ArredondaItemMFD" para saber se devo efetuar o arredondamento.

[Daniel Simoes]

O correto é você proceder conforme descrito no Change-Log.TXT,

[*] Modificada funcionamento da propriedade "Arredonda", para que a mesma leve

em consideração as propriedades (MFD e ArredondaItemMFD) além de verificar

se o ECF possue o flag de Arredondamento Interno ajustado.

É importante frisar que o valor das propriedades "ArredondaItemMFD" e

portanto agora de "Arredonda" só é confiável após a primiera Venda de Item

(por: DSA)

ou seja, usar a propriedade "Arredonda", e apenas após a primeira venda de item

[lucasborin]

...usar a propriedade "Arredonda" e apenas após a primeira venda de item.

Fiquei um pouco confuso, mas e se o primeiro item depender de um arredondamento, vou ter problemas?

Vou testar e posto novamente sobre este caso em breve.

--

criado um novo tópico com o novo assunto.

[Daniel Simoes]

Por favor crie tópicos novos para assuntos diferentes...

Em relação ao arredondamento, você pode setar o ArredondaItemMFD para True, isso fará com que Arredonda retorne True... porém, após a venda do 1o Item, se o mesmo não suportar Arredondamento ou ArredondaItemMFD, o Arredonda e ArredondaItemMFD serão False

[lucasborin]

Daniel, tudo certo com o caso do arredondamento e truncamento em relação ao cupom fiscal, meu aplicativo e ao espelho do cupom!

Mas como nem tudo são rosas, achei mais um caso relacionado com isto, veja só:

Entrei em contato com o Suporte da Toledo e me informaram que as balanças seguem uma legislação que obriga a arredondar os valores. Conversei com uma empresa aqui da minha cidade que lacra ECF e me informaram que por padrão estão programando os ECF para truncamento (os possíveis).

Caso um cliente tente usar o código gerado por uma balança em um cupom fiscal, terei uma divergência no valor total do produto e no valor total da etiqueta.

Vocês tem alguma sugestão do que fazer neste caso?

[Daniel Simoes]

Para os ECFs que suportam ArredondaItemMFD, basta informa-lo antes da venda do item...

Para os que apenas truncam, o (POG) ArredondaPorQtd pode ser uma saída..

[lucasborin]

Conversei com o pessoal da Polimig e me indicaram aplicar a diferença do arredondamento e truncamento como acréscimo/desconto no item.

Ficou tudo certo.

Muito obrigado pela ajuda!

[netsolutions]

Oi, Galera vi que conseguiram resolver o problema do arredondamento de varias Maneiras diferentes...

tenho um problema aqui, e não consegui resolver ainda..

 

faço a venda de um item, onde a quandidade é 3,333 o valor unitario é 10,00 e o valor total deveria ser 33,33

 

porém no emulador da Bematech sai

qtd 3,331 o unitario  9,999 e o total 33,30

 

Alguma idéia do que pode estar errado??

[Daniel Simoes]

Só mesmo analisando o LOG... para ver o que realmente foi enviado para o ECF na QTD e Valor

 

Já tentou usar ACBrECF.ArredondaPorQtd = True ?

[RodrigoRiquena]

Esta correto

Editado 27 Agosto, 2013 por RodrigoRiquena

[Jefferson Damian]

Olá,

estou com problema de arredondamento com uma impressora Epson TM 81, pelo ecf teste ela retorna arredonda = não mas pelo sistema de intervenção da Epson diz que esta configurada para arredondar.
O problema que se mando um item para ela e principalmente ao usar desconto ou acréscimo por %
ela trunca o resultado desse calculo.

alguma idéia do que fazer?

[Cleber Ferreira]

olha o seu campo IAT, está como A ou T?

 

Te pergunto pois faz diferença. Semana passada tive problemas com isso e tenho impressão que essa configuração da ECF não vale muito, mas sim o que vc passa no momento de vender o item.

[Jefferson Damian]

Vou verificar no cliente pra ter plena certeza, mas o comando para enviar o item para a impressora

não recebe informações desse campo.

 

DM.ECF.VendeItem(Codigo,
      Descricao,
      AliquotaICMS,
      Qtd,
      ValorUnitario,
      ValorDescontoAcrescimo,
      Unidade,
      TipoDescontoAcrescimo,
      DescAcres);

Assim que eu conferir respondo com mais certeza.

Desde já.
Obrigado pela resposta.