Pesquisar na Comunidade
Showing results for tags 'ecfEscECF'.
Encontrado 5 registros
-
Bom dia, estamos enfrentando um problema com o novo modelo de ECF da bametech mp4200 TH FII II (ecfEscECF) na função gerar CAT52. Alguém conseguiu gerar os arquivos com essa impressora? Usando o exemplo ECFTeste.exe o programa não consegue gerar os arquivos.
-
Bematech MP4200 TH TI - Erro: "Checksum inválido"
um tópico no fórum postou Everton Garcia ACBrSerial
Boa tarde pessoal! Estou tendo problemas com uma Bematech MP4200 TH TI. Em algumas emissões de Relatório Gerencial, dá a seguinte mensagem: "Categoria: 15-Protocolo Motivo: 2-Checksum inválido no comando recebido pelo ECF" Depois de vários relatórios gerenciais emitidos, também consegui reproduzir a mensagem de erro no emulador da MP4200. Alguém já teve este problema? Anexei três trechos do LOG onde constam a mensagem de retorno com a categoria 15. Ambiente: Delphi 2010 Fontes: Trunk2 - Revisão 9457 []´s Everton logBematech.txt -
Gravação De Relatórios Gerenciais Protocolo Ecfescecf Bematech Mp4200
um tópico no fórum postou maycoll ACBrSerial
Olá pessoal, Estou usando um ECF Bematech MP4200 com o protocolo EcfEscEcf para fazer alguns teste. Quando vou realizar a gravação de relatórios gerencias a função não aceita espaços no nome dos relatórios procedure TACBrECFEscECF.ProgramaRelatorioGerencial(var Descricao: String; Posicao: String); var PosRel : Integer; begin if not Assigned( fpRelatoriosGerenciais ) then CarregaRelatoriosGerenciais ; Descricao := AjustaDescricao( Descricao ); //<<---- DESCRIÇÃO SÓ RECEBE LETRAS SEM ESPAÇOS EscECFComando.CMD := 86; if Posicao = '' then PosRel := RelatoriosGerenciais.Count + 1 else PosRel := StrToInt( Posicao ); EscECFComando.AddParamInteger( PosRel ) ; EscECFComando.AddParamString( Descricao ) ; EnviaComando; CarregaRelatoriosGerenciais; end; Analisando mais a fundo a função, vi que "AjustaDescricao( Descricao );" chama a função "OnlyAlpha" que só retorna letras. function TACBrECFEscECF.AjustaDescricao(ADescricao : String) : String ; begin { Ajusta uma descrição de acordo com as regras do protocolo EscECF Máximo de 15, Mínimo de 4 caracteres ASCII de posição 65 a 90 (letras maiúsculas) ou 97 a 122 (letras minúsculas) } Result := OnlyAlpha( LeftStr( TiraAcentos( ADescricao ),15) ); end ; Para resolver o meu problema, eu retirei do result da função "AjustaDescricao" a chamada para "OnlyAlpha". Com isso consegui gravar relatórios gerenciais com espaços. Não sei se isso seria o certo ou se há outra maneira de resolver, pois segundo o comentário na função "AjustaDescricao", a mesma é chamada para atender as normas do protocolo EscEcf. E ainda, esta mesma função e usada em outros métodos dentro da Unit EscEcf. -
Bom dia, Estou tendo um problema com a emissão da redução Z pendente na impressora Epson T800F usando o protocolo ecfEscECF. Quando envio o comando para emissão da redução Z utilizando o ECFTeste é apresentada a seguinte mensagem. Erro retornado pela Impressora: EPSON - TM-T800F Categoria: 16-Erro específico do Fabricante Motivo: 3-Data em intervalo inválido. #1/#26#0#0#1#0#0#23#29#029012015|2|000000038|190402||#155 - + - + - + - + - + - + - + - + - + - + - + - Por favor, alguém pode me dar uma dica? Obrigado
-
boa tarde, Ao tentar emitir a opção da demonstração através do menu Não Fiscal/Não fiscal completo, estou tendo o seguinte erro: raised exception class EACBrECFSemResposta with message 'Erro retornado pela Impressora: BEMATECH - MP-4200 TH FI Erro: 2-1 - Erro em parâmetro do comando Conteúdo de parâmetro inválido no comando.'. Verifiquei a forma de pagamento e totalizadores não fiscais, estão todos registrados. Agradeço a ajuda mais uma vez. acbrlog.txt
