Ir para conteúdo
  • Cadastre-se

Daniel Simoes

Fundadores
  • Total de ítens

    27.502
  • Registro em

  • Última visita

  • Days Won

    766

Tudo que Daniel Simoes postou

  1. MessageBox está descartada... ele é API do Windows, e o ACBrECF é multiplataforma... para evitar mensagens do Delphi em Ingles você deve traduzir a Unit Conts.pas do Delphi, e deixar uma cópia dela no seu projeto (fazendo o Delphi sobrepor a Unit padrão) Procure na internet, você já achará essa unit traduzida... Não compreendi o problema com as linhas: AValue := Poem_Zeros(AValue, 12); if (copy(AValue, 1, 1) = '0') and (copy(AValue, 2, 1) = '0') - Qual o erro ? O que ocorre ?
  2. Não notei nada errado nessa rotina... Em todo caso, o problema (se for nos fontes do ACBrECF) não é nesse ponto... deveria ser em: TACBrECFDaruma.GetEstado... Debug um pouco mais, ou passe instruções detalhadas de como reproduzir o problema usando o Demo ECFTeste... Se quiser, tb envie o Log gerado pelo ACBrECF... ele pode ter informações sobre o erro...
  3. Não existe emulador com essas características... em todo caso entre em contato com o Fabricante...
  4. Não... isso retorna um ponteiro para o Objeto existente, e não instancia um novo objeto...
  5. Você não deve destruir esses objetos... deixe que o próprio ACBrECF faça isso... não há vazamento de memórias no ACBrECF...
  6. Não creio que seja no componente... observe que o Demo ECFTeste não dispara essa exception... outro fato é que não há report semelhante a esse por conta de outros usuários... O Destroy da Classe Bematech está correto... ela não está destruindo o componente e sim uma Classe interna, essa chamada irá chamar: TACBrECFClass.Destroy;
  7. Você não informou a exata mensagem de erro... Por favor também anexe o LOG gerado pelo ACBrECF...
  8. Notei que esta classe reescreve desnecessariamente vários métodos, como por exemplo o "ImprimirComprovantes"... (isso já estava assim) Assim que tiver um tempo vou dar uma revisada nela... Onde posso achar material de teste do TEF direção ?
  9. Não tenho a menor ideia... Os LOGs indicam que você respondeu '0' para a chamada do evento... Se deseja testar o componente... isole o problema... tente reproduzir o erro usando o Demo TEFDDemo... e se conseguir, informe a sequencia de passos... só assim conseguirei analisar...
  10. Que eu saiba não... Experimentem no Demo, TEFDDemo... Se conseguir reproduzir o erro, envie o passo a passo...
  11. Não misture as coisas... Cada caso é um caso... Você não anexou LOG nem nada... o que torna impossível dar qualquer palpite sobre o seu caso... Sugiro que abra um novo post, e forneça as informações já solicitadas (Log do ACBrECF e ACBrTEFD)... caso contrário será impossível tentar ajudá-lo...
  12. Por favor não copie o LOG no conteúdo da msg.. zip os arquivos e anexe no post... Pelo que notei, você está retornando erro para o ACBrTEFD na chamada do evento: OnComandaECFAbreVinculado, mesmo com o ECF abrindo o CCD corretamente... Analise seus fontes... o parâmetro "RetornoECF", passado por referência precisa ser igual a '1' no caso de sucesso... Veja exemplo do TEFDDemo: procedure TForm1.ACBrTEFD1ComandaECFAbreVinculado(COO, IndiceECF : String; Valor : Double; var RetornoECF : Integer); begin try Memo1.Lines.Add( 'ACBrTEFD1ComandaECFAbreVinculado, COO:'+COO+ ' IndiceECF: '+IndiceECF+' Valor: '+FormatFloat('0.00',Valor) ) ; ACBrECF1.AbreCupomVinculado( COO, IndiceECF, Valor ); RetornoECF := 1 ; except RetornoECF := 0 ; end; end; [/code]
  13. E o LOG do ACBrECF, analisou ? Poste aqui trecho dos logs gerado pelo ACBrECF e ACBrTEFD
  14. Analise o log gerado pelo ACBrECF... o problema estará descrito lá... Provavelmente você está informando errado o índice da Forma de Pagamento para o comando CRT
  15. Aparentemente vc tem conflito em units de instalações diferente do ACBr.. A constante SOH está declarada em ACBrConsts.pas
  16. Conclui a reforma em GetDadosUltimaReducaoZ... deu um trabalhão... mas acho que valeu apena...
  17. Veja o usercontrol: http://sourceforge.net/projects/usercontrol/
  18. Qual marca e modelo de impressora de cheques ?
  19. Tópico movido para o fórum aberto e área específica..
  20. Será que alguma das variáveis usadas no calculo do HASH é NULL ? Talvez você precise usar o coalesce... Também, notei que que você não está usando o prefixo "new." CREATE OR ALTER TRIGGER BIU_DOCUMENTO_HASH FOR DOCUMENTO ACTIVE BEFORE INSERT OR UPDATE POSITION 0 AS begin new.HASH = hash( RDB$GET_CONTEXT('USER_SESSION', 'IB_KEY' )|| new.codloja||new.codterminal||new.codturno||new.coo|| new.denominacao||coalesce(new.contador,0)||new.numgnf|| new.datahora_inicio||coalesce(new.datahora_fim,cast('1-1-1' as timestamp))|| new.codcliente||new.codautorizado||coalesce(new.documento_cli,'')||coalesce(new.nome_cli,'')|| new.subtotal||new.desconto_acrescimo||coalesce(new.total_pago,0)||new.troco|| new.cancelado||new.trunca ) ; end[/code]
  21. Oi Gerson, Todas as mundaças na Classe TACBrTEFDCliDTEF não vão interferir nas demais... a modificação efetuada em: TACBrTEFD, poderiamos fazer um IF, verificando o tipo de Classe.. Se desejar, anexe aqui no post um Zip com os fontes modificados... Faço a analise necessária...
  22. Sim... o próprio ACBrECF faz isso, você pode usar um Memo (simples) ou um componente de exibição de HTML (recomendado) Veja no Demo do ACBrECF, ECFTeste, a aba "Cupom"... analise o evento OnBobinaAdicionaLinhas
  23. Provavelmente seus fontes do ACBr estão desatualizados... Sua DLL tb está desatualizada... mesmo no Trunk do ACBrECF a versão é 6.1.1.1
  24. Estou revisando todas as units com o método: GetDadosUltimaReducaoZ, para que a Classe seja montada... Devo concluir em alguns dias...
  25. Você informa o Índice no comando de Abertura...
×
×
  • 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.