Daniel Simoes

Cancelar o Cupom Fiscal ou a transação TEF ? (são coisas completamente distintas)

Que bom, significa que você está mais apto para a sua próximo homologação... Leia o ACBrTEFD-Change-Log.txt

Não compreendi a pergunta... favor reformular...

Humm.. realmente agora que vi... mudei o código para ler a resposta mas não tratei o retorno lido... Por favor tente a seguinte alteração: function TACBrECFSwedaSTX.LeituraCMC7: AnsiString; var OldTimeOut: Integer; begin Result := EnviaComando('24|1|0|1000'); { Leitura do CMC7 deve retornar mais dados } OldTimeOut := TimeOut; try TimeOut := max(OldTimeOut,5); // Espere mais 5 segundos... GravaLog( ' Aguardando Resposta CMC7'); LeResposta; fpRespostaComando := fsRespostasComando ; // Respostas Acumuladas GravaLog( ' Retorno Completo: '+fpRespostaComando ); { Limpando de "fpRespostaComando" os Status não solicitados } fpRespostaComando := AjustaRetorno( fpRespostaComando ); GravaLog( ' Retorno Tratado: '+fpRespostaComando ); Result := copy(fpRespostaComando,17,34); // Verificar finally TimeOut := OldTimeOut; end; end;[/code]

Qual comando você usa para acionar a Gaveta ? Qual a configuração de "DEvice" em ACBrECF ou ACBrGAV ? Existe uma COM1 ? A impressora está ligada nela ? (pela msg de erro... não)

É algo com a DLL da Bematech e o adaptador USB... tente contato com o suporte deles... Uma dica é tentar diminuir para o mínimo o valor do Buffer da Porta Serial

Vale lembrar que o ACBrMonitor não contempla o ACBrTEFD, isso porque esse componente exige uma ligação direta com a interface da aplicação... Com muito uso de eventos

Acabei de enviar uma possível correção... por favor atualize e teste...

Experimente algo bem simples: ACBrECF1.IgnorarTagsFormatacao := True;

Enviei algumas modificações... Pode ser que agora funcione...

Se não houver um componente ACBrEAD o próprio ACBrECF cria um, mas já notei que isso pode causar alguns problemas... Tenho trabalhado apenas com o Demo em Lazarus... não sei muito bem como está o Demo em Delphi

Sim, já existe... mas não é nada seguro usar ela... Você pode criar um novo par de chaves através do programa Exemplo do ACBrEAD, e usar os eventos do ACBrEAD para atribuir a chave...

Este roteiro é do SiTEF Client... o ACBrTEFD não usa esse método... O ACBrTEFD usa a CliSiTef32.dll

Basta você ligar o componente ACBrEAD com o ACBrECF... prover suas chaves nos eventos do componente ACBrEAD, e o resto é feito "tomáticamente"

Exato, veja a programação desse evento no projeto Demo: "TEFDDemo"

Acho que é possível de implementar nos ECFs mais utilizados... os próprios fabricantes tem uma relação que pode ser usada... O problema é que a tabela do fisco não segue um padrão... Vc encontrará FS600, FS-700, por exemplo... nem sempre é igual a informação lida pelo ACBrECF...

O componente ACBrCNIEE é capaz de efetuar Download do site do fisco (de MG) e criar uma lista de Objetos com todos os modelos Existentes... (Veja o Demo dele) Mas cruzar isso com as informações de Modelo e Versão em String, disponível no ACBrECF é algo bem mais difícil e propenso a erros...

Qual manual ?

Acho que não será problema mudar para String... Vou testar no Lazarus e D7

Vamos tentar um pouco mais... Vamos observar a resposta do TimeOut... O que ocorre se vc enviar o comando como: function TACBrECFSwedaSTX.LeituraCMC7: AnsiString; begin Result := EnviaComando('24|1|0|1000'); end; [/code] Ou seja, com 1 segundo de TimeOut... Por favor copie o trecho do Log gerado pelo ACBrECF...

A Bematech não tem em sua DLL um comando que permita envio e recebimento direto de comandos... já conversei com o "Luize" sobre isso... mas acho que não existe nenhuma previsão de implementação...

Apliquei a seguinte correção nos fontes do SVN

O que ocorre se o usuário não inserir o cheque ? O que o ECF faz (ou envia) enquanto o Cheque não é posicionado ? Quanto tempo devemos considerar de TimeOut entre o 24+ e o próximo envio ? Sinto muito, mas acho que não serei capaz de fazer essa rotina sem um ECF para testes...

Não compreendi a sequencia de comandos necessária... Infelizmente acho que será muito difícil implementar isso sem um ECF para testes...

Tente no ECFTeste, porém sem inserir o cheque antes de comandar a leitura... O fato é que se o ECF responder com '+', a comunicação está encerrada.. ou seja, ele precisa responder '!'