daniel.simoes

Jeferson, Você é um usuário do SAC... postando suas perguntas na área do SAC, os desenvolvedores envolvidos ficam mais atentos aos seus posts... Por favor evite postar o mesmo tópico em dois lugares destintos...

O ACBrECF não tem esses registradores separados... (eu mesmo nunca precisei disso) Se necessário, você pode usar o RetornaInfoECF( 140 ) e manter o seu tratamento anterior (porém só funcionará para a Daruma )

Apenas para efeito de informação... a "Bobina" em Memo ou HTML, gerada pelo ACBrECF usa essa função quando ela detecta que o ECF arredonda... Ou seja, o valor da Bobina do ACBRECF deve bater com o valor da bobina do ECF

Não compreendi muito bem sua pergunta... o que você chama de "DOC" ? Acho que toda semana respondo a mesma coisa... Veja o TEFDDemo no evento OnDepoisConfirmarTransacoes

Você mandou encerrar o Loop... Veja no seu Log, que você respondeu -1 para Continua

Isso só ocorrerá se você usar o modelo ecfNaofiscal

Verifique se o G.P. lhe devolveu algo, analisando o LOG gerado pelo ACBrTEFD... Tente com o projeto TEFDDemo Verifique se você programou corretamente os eventos OnComandaECF e OnComandaECFImprimeVia

Essa função já existia em ACBrUtil.pas {----------------------------------------------------------------------------- Arredondamento segundo as normas da ABNT NBR 5891/77 (por: DSA) Fontes: http://www.sofazquemsabe.com/2011/01/como-fazer-arredondamento-da-numeracao.html http://partners.bematech.com.br/2011/12/edicao-98-entendendo-o-truncamento-e-arredondamento-no-ecf/ -----------------------------------------------------------------------------} function RoundABNT(const AValue: Double; const Digits: SmallInt):Double; var Pow, PowValue, RestPart : Extended; IntPart, FracPart, LastNumber : Integer; Begin Pow := intpower(10, abs(Digits) ); PowValue := SimpleRoundTo( AValue * Pow, -9) ; // SimpleRoundTo elimina dizimas ; IntPart := trunc( PowValue ); FracPart := trunc( frac( PowValue ) * 100); if (FracPart > 50) then Inc( IntPart ) else if (FracPart = 50) then begin LastNumber := round( frac( IntPart / 10) * 10); if odd(LastNumber) then Inc( IntPart ) else begin RestPart := frac( PowValue * 10 ) ; if RestPart > 0 then Inc( IntPart ); end ; end ; Result := (IntPart / Pow); end;

Seria o ideal nem constar o acbrmonitor.exe... pois você conseguiria atualizá-lo sem precisar de novo laudo... Mas se for constar ele, é melhor que conste todas as DLLs

vale lembrar que você deve usar o Layout da CAT52, e não o AtoCotepe 17/04... Ambos são muito parecidos... porém pela lei o AtoCotepe 17/04 só pode ser gerado por utilitário (ou DLL) do fabricante

Pelo que li no manual da Daruma o parâmetro de altura vai de 50 a 200 n3 - altura da barra. De 50 a 200. https://acbr.svn.sourceforge.net/svnroot/acbr/tools/Daruma/

Sobre o que você está falando ??? Já é o segundo tópico seu, que leio, e é "sem pé nem cabeça"... Acredito que sua real intenção seja apenas fazer "flood"... Estarei a tento, e se necessário excluirei seus tópicos...

Mais uma vez... só conseguirei investigar o problema se você enviar um "passo a passo" usando TEFDDemo... Usar ACBrTEFD.FinalizarCupom é extremamente recomendado... Ele deixará sua aplicação apta a passar nos testes de desligamento de ECF nas diversas fases de fechamento do cupom... Subtotalizando, Imprimindo pagamentos, fechando cupom, abrindo o CCD, etc

E qual é o problema disso ?? Eu algumas versões do Delphi não há TDate ou TTime, apenas o TDateTime

Você precisa usar o método: PafMF_MFD_Cotepe1704 AbreCupom não irá gerar arquivo nenhum... mas deve ser usado com os dados do cliente, se você quer que o cliente seja corretamente identificado nos arquivos gerados por PafMF_MFD_Cotepe1704

Por favor informe um passo a passo usando o TEFDdemo, para que eu possa investigar o problema

Faz sentido... '0' - Não existe '01' - Existe mas não aceita CCD (veja o campo TEF na sua Leitura X) '02' - Existe e aceita CCD

Obrigado pelo alerta... realmente "comi de barriga" quando subi esse commit...

O componente não faz a Pausa... provavelmente é vc quem está fazendo a pausa em: OnComandaECF, opePulaLinhas... Teste com o TEFDDemo, e verifique se a pausa ocorre...

Obrigado por compartilhar conosco a solução... Isso é muito importante para pesquisa de outros usuários com problemas semelhantes

Veja no LOG gerado pelo ACBrECF o verdadeiro motivo do Erro... Tentou rodar o mesmo teste com o TEFDDemo ?

Esse modelo é compatível com o SiTEF... na documentação do SiTEF deve exibir os modelos compatíveis...

Em qual momento você tenta ler acbrtefd.resp.saque ? ( o ideal é o evento OnDepoisConfirmarTransaçoes ) Verifique no LOG se o Saque veio nas respostas do G.P. Tente com o G.P. do discado...

Seria no caso de uma nova venda... com a mercadoria trocada, para você conseguir "pagar" o cupom, com uma Forma de Pagamento que não seja Dinheiro, Cheque, etc... Vc poderia ter uma Forma de pagamento chamado "Vale Credito" por exemplo

Qualquer hardware de impressão funcionaria dessa maneira... Você está usando o Windows para acessar a porta mapeada