Pesquisar na Comunidade

Boa tarde pessoal, estou tendo dificuldades com algumas impressora SwedaSTX, estou enviando o log pra ver se alguém consegue me ajudar, acontece que vou abrir um cupom e no momento de enviar o item, retorna um erro da impressora, eu fecho o sistema, abro novamente e o mesmo item que deu erro funciona e continua funcionando por horas e em algum momento ocorre novamente, esse log eu consegui pegar bem na hora que abriu o caixa, então é pequeno, mas eu não sei fazer a leitura necessária. Se alguém puder me ajudar, fico muito grato! ACBrEcf.log O retorno de erro da impressora está na linha 268 do log.

Pessoal, boa tarde, até mês passado eu comunicava meu sistema diretamente com as dll's das impressoras fiscais, mas estava com dificuldades de atualizar todas elas, então resolvi passar a usar o AcbrECF. Até então não tive muitos problemas, mas tenho me debatido com um: Quando faço uma venda e divido a mesma em dois cartões, no momento de abrir o segundo CCD o ACBR me retorna a seguinte mensagem:

Bom dia, boa tarde, boa noite... e já OBRIGADO a todos !!! + Eu criei um "esqueminha" no word para facilitar e reforçar a maneira de conectar os componentes para o PAF que trabalha com ACBrECF e ECF ser transformado em NFCe... Está no final ... . + Meus componentes já estão conectados corretamente e já estão ajustados para o ambiente de Homologação de MG Minhas dúvidas são : (1) Ao fazer um CUPOM FISCAL utilizando ACBrECF com ACBrNFCe (e outros componentes, conforme abaixo), onde vão ficando os dados dos ITENS gravados, até fechar o cupom, validar e enviar ? Seria no componente ACBrNFe ? (2) Qual a sequência de comandos que falta para poder transformar minha aplicação PAF com ACBrECF utilizando ECF em PAF com ACBrECF utilizando NFCe ? Sei quem, BEM RESUMIDAMENTE, a parte do ACBrECF é : 1 - ACBrECF.AbreCupom( XXXX... , XXX... ); 2 - ACBrECF.VendeItem( XXXX..., .... ); 3 - ACBrECF.SubTotalizaCupom( XXXX..., .... ); 4 - ACBrECF.EfetuaPagamento( XXXX..., .... ); 5 - ACBrECF.FechaCupom( XXXX... ) 6... ? BEM RESUMIDADMENTE, o que viria agora, quais comandos de quais componentes ? Se puderem me passar isto, já vi vários vídeos mais estou confuso... Obrigado!!! (os componentes estão configurados já corretamente... já testei até impressão de LEITURA X e REL GERENCIAL na DARUMA DR800)

Bom dia. Para emissão modelo cupom fiscal da nfc-e não vou usar o AcbrEcf e aproveitar meu código pronto para ECF ??? Tenho que desenvolver um novo codigo para impressão na não-fiscal ???

Oi pessoal, estou tentando usar o emulador sweda com o programa exemplo. Consigo ativar a impressora e executar algumas funções: leitura x, programação de aliquotas, leitura de totais. Mas não condigo emitir cupom. Recebo a mensagem comando não permitido. Alguem tem ideia do que possa ser ? Agradeço muito qualquer ajuda De acordo com o log: Comando enviado: #27.17} Resposta: .-0001ERRO-COMANDO NAO PERMITIDO}

Bom dia, ao efetuar a compilação do demo ECFTeste para firemonkey no delphi berlin está dando erro na unit ACBrDevice ao efetuar acesso a function Printer function TACBrDevice.DeduzirTipoPorta(APorta: String): TACBrDeviceType; var UPorta: String; begin UPorta := UpperCase(APorta); if APorta = '*' then Result := dtRawPrinter // usará a impressora default else if (copy(UPorta, 1, 4) = 'TCP:') then Result := dtTCP else if (copy(UPorta, 1, 4) = 'RAW:') then Result := dtRawPrinter else if (RightStr(UPorta,4) = '.TXT') or (copy(UPorta, 1, 5) = 'FILE:') then Result := dtFile else if (copy(UPorta, 1, 3) = 'COM') or {$IFDEF LINUX}(pos('/dev/', APorta) = 1){$ELSE}(copy(APorta,1,4) = '\\.\'){$ENDIF} then Result := dtSerial else if (pos(UPorta,'USB|DLL') > 0) then Result := dtHook else if (Printer.Printers.IndexOf(APorta) >= 0) then Result := dtRawPrinter else begin if pos(PathDelim, APorta) > 0 then Result := dtFile else Result := dtRawPrinter; end; end; [dcc32 Error] ACBrDevice.pas(1011): E2029 '[' expected but '.' found [dcc32 Warning] ACBrDevice.pas(1011): W1023 Comparing signed and unsigned types - widened both operands [dcc32 Error] ACBrDevice.pas(1223): E2003 Undeclared identifier: 'PrinterIndex' Gostaria de saber se tem alguém passando por isso.. ou se existe algo que possa fazer pra evitar esse erro... Grato...

Oi pessoal, estou tentando desenvolver um programa de emissão de CF usando o componente ACBREcf. O exemplo me ajudou muito mas gostaria de saber se existe um site ou arquivo com alguma documentação sobre este e outros componentes. Anos atras eu me lembro de ter acessado uma pagina mas não estou conseguindo encontra-la. Muito obrigado a quem puder me respponder.

Boa tarde, fiz atualização dos fontes agora estou tendo problema de diferença de 1 centavo ate mesmo no ecfteste, para simular processo mais simples abri o cupom vendi um item com quantidade 1 e valor unitário 999999,99 o mesmo registra no ecf como 999999,98 por causa da função trunkfix em versões anteriores o mesmo não ocorria.

Boa tarde. Estou fazendo testes com ECF em um ambiente onde aplicação e banco de dados são remotos, mas está dando erro ao enviar comandos para impressora. Testes com o ECFTeste do Trunk1 funciona perfeitamente, com o ECFTeste Trunk2 retorna o erro "Erro ao enviar comandos para a impressora Sweda". Fiz testes com impressora Bematech, porém o erro foi o mesmo. Analisando o log, percebi que o comando é enviado para a impressora fiscal, mas não está tendo retorno. -------------------------------------------------------------------------------- ATIVAR - 18/09/17 17:27:54:140 - Modelo: Sweda - Porta: COM1 - TimeOut: 3 Device: BAUD=9600 DATA=8 PARITY=N STOP=1 HANDSHAKE=DTR/DSR MAXBANDWIDTH=0 SENDBYTESCOUNT=0 SENDBYTESINTERVAL=0 -------------------------------------------------------------------------------- -- 18/09 17:27:56:249 -- 18/09 17:27:56:733 TX -> [ESC].271} -- 18/09 17:28:13:655 RX <- -- 18/09 17:28:13:655 ----------------- ERRO ----------------- Erro ao enviar comandos para a Impressora Sweda ---------------------------------------- Outro teste que fiz foi a impressão da LeituraX, o comando é enviado e a leitura é impressa, mas o comando está sendo disparado 10 vezes, e está sendo impressas 10 leituraX. No log só registrou um envio de comando. -- 18/09 16:40:26:583 -- Ativando a porta: COM1 -- 18/09 16:40:28:552 LeituraX -- 18/09 16:40:29:052 TX -> [ESC].13N} -- 18/09 16:40:30:755 RX <- -- 18/09 16:40:30:755 ----------------- ERRO ----------------- Erro ao enviar comandos para a Impressora Sweda ---------------------------------------- No Trunk1 funciona todos os comandos.

Tenho um aplicativo paf e utilizo ACBrECFVirtualNFCe para emitir NFCe. Estou implementando tef e quando executo o comando "ACBrPosPrinter.LerStatusImpressora" para verificar o status da impressora antes de imprimir o TEF, da erro de comunicação. --------------------------- Debugger Exception Notification --------------------------- Project PAFMIDAS.exe raised exception class ESynaSerError with message 'Communication error 9997: Timeout during operation'. --------------------------- Break Continue Help --------------------------- O erro é porquê o componente ACBrECF esta utilizando a impressora na porta COM. Qual a melhor forma para fazer esta verificação da impressora?

Bom dia a todos, pessoal estou utilizando o ACBrECF e ECF Bematech MP - 4000 TH FI na USB porem estou tendo perda de comunicação com ecf, vi no forum vários questionamentos a respeito a pergunta é: alguém conseguiu utilizar sem mais problemas? se sim peço por gentileza me passar os passos a seguir. Observação: Instalei o driver virtual serial ao qual ficou com a velocidade 9600 e também configurei em propriedades como FISCAL e também informei o modelo.

Estou com um problema que esta me incomodando um pouco. um dos nossos clientes tem uma impressora bematech, ele abre o cupom lance os itens, lance o desconto, tudo certinho ai seleciono alguma forma de pagamento e ele da erro como se nao achasse a forma de pagamento na ECF. o problema e que esse erro da esporadicamente, posso passar o dia inteiro sem acontecer, como pode acontecer a qualquer momento. a rotina para informar a forma de pagamento é esse : ACBrECF.EfetuaPagamento(1,30,00,'',false); Por exemplo ai estou passando um pagamento em dinheiro de 30,00. ai tanto faz ele nao dar erro como do nada ele dar erro. alguem ai ja passou por isso ou sabe o que ta rolando de errado?

Bom dia. Estou com uma ECF (Bematech MP 4200) que esporadicamente ele está me retornando está msg de "Acréscimo ou desconto maior que o total do cupom fiscal", ao chamar "ACBrTEFDComandaECFSubtotaliza". Não consegui identificar no log do Componente AcbrECF o que poderia ser o erro. Pelo espelho do cupom não vi nada de incorreto, faço o mesmo cupom em outra impressora com os mesmo dados e finaliza corretamente, se logo após dar este erro eu tentar novamente o mesmo cupom na impressora funciona. Alguém já passou por isso? ou consegui me auxiliar? Segue em anexo Log com parte da ativação do AcbrECF e trecho aonde retorna o erro. Obrigado. Log ECF.txt

Boa tarde! Estou tentando utilizar o ACBrECF para impressora não fiscal. Minha dúvida é tenho que tenho 3 não fiscal, cada terminal com sua configuração. Tipo ECF001, ECF002 e ECF003, Gostaria de saber como configurar isso no ACBrECF001.ini. Pensei em criar três arquivos diferentes, exemplo: ACBrECF001.ini, ACBrECF002.ini e ACBrECF003.ini, é possivel? Se sim como faço para setar o nome de cada um? Agradeço a ajuda.. Eduardo Costa

Bom dia... assim com citado pelo nosso colega no post achei por bem criar um topico novo visto que o post acima citado data de maio de 2014, Pois bem ao executar o comando ACBrECF1.DadosReducaoZ; //momentos antes de iniciar uma redução estou tendo dados divergentes entre as impressoras Bematech MP4000 TH FI (protocolo ecfBematech) e Bematech MP4200 TH FI II (protocolo escECF) na parte dos totalizadores de ICMS, ao executar o determinado comando na MP4000 os dados a mim retornados estão sendo sendo da coluna Base de Cálculo (R$), já na MP4200 os dados retornados estão sendo os da alíquota já aplicada, coluna Imposto (R$) os testes foram feitos pelo próprio exemplo da pasta do AcbrECF. as colunas demarcadas em vermelho são as que estão sendo retornadas para cada protocolo escolhido, à esquerda ECF MP4200 à direita ECF MP4000, assim como pode ser visto no rodapé. Gostaria de saber se existe alguma forma de me ser retornado a Base de Cálculo da ECF MP 4200 (protocolo escECF) pois estes dados são necessários para geração do SPED, registro C420 e para fazer o cálculo matemático para achar a base com o valor da alíquota já aplicada podem ocorrer erros de arredondamento. Obs.: Também já tentei usar o comando ACBrECF1.DadosUltimaReducaoZ após efetuar a redução, mas os dados ficam ainda piores, me retornando datas muito estranhas como 01/01/1899. Desde já grato pela atenção e desculpem o post tão longo, mas o problema em si é um tanto quanto complexo de explicar.

Olá pessoal, Após uma analise desse tópico: Notei uma grande confusão envolvendo os métodos para geração do arquivo Binário da MF e MFD Portanto, promovi modificações com o intuito de tornar a finalidade desses métodos mais clara... Porém, para isso, precisei remover e renomear alguns métodos... e essa modificação poderá causar erros de compilação na sua aplicação... Por favor leia com atenção o "Change-Log" abaixo. Em negrito estão as modificações que podem causar problemas na compilação e como corrigi-las

Boa tarde a todos! Primeiramente gostaria de agradecer a todos pelos excelentes componentes disponibilizados pelo ACBr! Estou aprendendo muito estudando os fontes deles. Eu encontrei um pequeno problema com ACBrECF, na camada FiscNet, ACBrECFFiscNET, A impressora FiscNet, pelo menos a que estou fazendo testes aqui, não aceita mais que 8 linhas na observação, e da erro se passar dessa quantidade de linhas. Mas a Função FechaCupom dessa impressora, não está retornando o erro.. try FiscNETComando.NomeComando := 'EncerraDocumento' ; if (Obs <> '') then FiscNETComando.AddParamString('TextoPromocional',Obs); FiscNETComando.TimeOut := 5 ; FiscNETComando.AddParamString('Operador',Operador) ; EnviaComando ; except on E : Exception do begin if (pos('ErroProtSequenciaComando',E.Message) <> 0) or (pos('ErroCMDForaDeSequencia',E.Message) <> 0) then begin if (Obs <> '') then begin FiscNETComando.NomeComando := 'ImprimeTexto' ; FiscNETComando.AddParamString('TextoLivre',Obs); EnviaComando ; end ; FiscNETComando.NomeComando := 'EncerraDocumento' ; FiscNETComando.TimeOut := 5 ; FiscNETComando.AddParamString('Operador',Operador) ; EnviaComando ; end else //Está faltando o Else para dar o exception begin raise; end; end ; end ; está faltando a parte em negrito acima.. se acontecer algum erro no primeiro try, e o erro não for um dos dois tratado no except, o erro é ocultado e não retorna exceção nenhuma..

toda vez que eu tento gerar algum relatório que o ACBrECF usa a dll da epson, dá este problema "Erro: 1 ao Fechar a Porta com: EPSON_Serial_Fechar_Porta.", estou conseguindo emitir cupom normal e relatórios gerenciais.

Olá! Não consigo fazer a ativação de uma ECF, sempre retorna que a Impressora não está respondendo. Porém, fiz os teste utilizando o ECFTeste e também o proprio testador da Bematech, ambos conseguem a comunicação! Tambem utilizei o teste que vem no exemplo, ele também ativa normalmente, tentei copiar mas não obtive sucesso. Abaixo deixarei o meu código (Uses incluso) e também o log. OBS: Estou utilizando portas virtuais também. Código: [...] uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ComCtrls, OleCtrls, SHDocVw, ACBrBase, ACBrECF, ACBrECFVirtual, ACBrECFVirtualPrinter, ACBrECFVirtualNaoFiscal, ACBrECFVirtualBuffer, XPMan, ACBrAAC, Spin; [...] begin ACBrECF1.Modelo:=TACBrECFModelo(cmbmodelo.ItemIndex); ACBrECF1.Porta:=cmbporta.Items[cmbporta.ItemIndex]; ACBrECF1.TimeOut:=30; ACBrECF1.Ativar; Application.ProcessMessages; if ACBrECF1.Ativo then begin btnativar.Enabled:=false; StatusBar1.Panels[0].Text:='ECF Ativa'; end; end; [..] ---------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- Log: ATIVAR - 26/10/16 16:40:30:316 - Modelo: Bematech - Porta: COM2 - TimeOut: 30 Device: BAUD=9600 DATA=8 PARITY=N STOP=1 HANDSHAKE=RTS/CTS HARDFLOW MAXBANDWIDTH=0 SENDBYTESCOUNT=0 SENDBYTESINTERVAL=0 -------------------------------------------------------------------------------- -- 26/10 16:40:30:316 -- 26/10 16:40:30:316 TX -> [STX][4][NUL][FS][19]/[NUL] -- 26/10 16:40:30:331 16:40:30:331 RX <- ACK = 6 Falha: 0 -- 26/10 16:40:30:456 RX <- [NUL][NUL][NUL][NUL] -- 26/10 16:40:30:472 -- 26/10 16:40:30:472 TX -> [STX][ENQ][NUL][FS]#)h[NUL] -- 26/10 16:40:30:550 16:40:30:550 RX <- ACK = 6 Falha: 0 -- 26/10 16:40:30:691 RX <- [SOH][NUL][NUL][NUL][NUL][NUL][NUL] -- 26/10 16:40:30:691 -- 26/10 16:40:30:691 TX -> [STX][ENQ][NUL][FS]#<{[NUL] -- 26/10 16:40:30:769 16:40:30:769 RX <- ACK = 6 Falha: 0 -- 26/10 16:40:30:910 RX <- BEMATECH MP-2000 TH FI ECF-IF [NUL][NUL][NUL][NUL] -- 26/10 16:40:30:910 -- 26/10 16:40:30:910 TX -> [STX][ENQ][NUL][FS]#[11]J[NUL] -- 26/10 16:40:31:003 16:40:31:003 RX <- ACK = 6 Falha: 0 -- 26/10 16:40:31:144 RX <- [NUL][SOH][NUL][NUL][NUL][NUL] -- 26/10 16:40:31:144 -- 26/10 16:40:31:144 TX -> [STX][ENQ][NUL][FS]#(g[NUL] -- 26/10 16:40:31:222 16:40:31:222 RX <- ACK = 6 Falha: 0 -- 26/10 16:40:31:363 RX <- EMULADOR [NUL][NUL][NUL][NUL] -- 26/10 16:40:31:363 Estado -- 26/10 16:40:31:363 TX -> [STX][ENQ][NUL][FS]#[WAK]P[NUL] -- 26/10 16:40:31:441 16:40:31:441 RX <- ACK = 6 Falha: 0 -- 26/10 16:40:31:581 RX <- [NUL][NUL][NUL][NUL][NUL] -- 26/10 16:40:31:581 -- 26/10 16:40:31:581 TX -> [STX][ENQ][NUL][FS]#A[128][NUL] -- 26/10 16:40:31:660 16:40:31:660 RX <- ACK = 6 Falha: 0 -- 26/10 16:41:04:003 RespostaComando: [NUL][NUL][NUL][NUL] -- 26/10 16:41:04:003 RX <- [NUL][NUL][NUL][NUL] -- 26/10 16:41:04:003 ----------------- ERRO ----------------- Impressora Bematech não está respondendo ---------------------------------------- ---------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- Desde já agradeço a ajuda!

Boa noite pessoal estou com umas dúvidas referente ao conjunto Vamos lá 1º) Estou tratando o envio da NFCe via ACbrECF.fecharCupom com try except, isso e correto? para tratar um erro de envio NFCe, pois o mesmo me dispara no ACBrTEFDExibirMsg que 'Erro na impressão. Deseja tentar novamente ?', se sim como nesse ponto posso mudar a NFCe em Contingência OFFLine, pois se o usuário clicar em sim o mesmo volta ao fluxo normal fecharCupom (obs: veja nas imagens abaixo se está correto o tratamento) 2º) No ACBrVirtualNFCe o mesmo tem o class/método: TACBrECFVirtualNFCeClass.EfetuaPagamentoVirtual o mesmo adicionar automáticamente a forma de pagamento, gostaria de um modo para desabilita/Desativar esse opção, deixando a cargo do sistema manipular isso, pois em algum caso tenho duplicidade do meio de pagamento devido a tentativa de manipular o componente para offline, conforme a imagem abaixo.

Vi algumas discussões sobre o uso do ACBrTEFD em aplicativo paf-ecf que não foi desenvolvido com o componente ACBrECF. Porém, são discussões de 2014. Hoje, já é possivel usar o ACBrTEFD com um aplicativo todo desenvolvido com dll da Bematech? Ou são componentes vinculados entre si?

Olá pessoal, Estou ganhando um erro de Exception com a seguinte mensagem: Unable to create file "" Porém a impressora executou o comando. Alguém poderia me ajudar como resolver? Desde já agradeço a atenção de todos. Estou utilizando a dll ACBrFramework.Net.dll na versão 0.9.7.5 O Windows que utilizo é o 7 64Bits Csharp com visual studio 2013 O comando executado foi acbrECF.AbreNaoFiscal("11111111111", "nomecliente", "enderecocliente"); E o log do comando foi este: -- 24/08 10:58:24:356 -- Ativando a porta: COM2 -- 24/08 10:58:24:357 AbreNaoFiscal( 11111111111,nomecliente,enderecocliente ) -- 24/08 10:58:24:357 TX -> [SOH][220][16][NUL]6[NUL]11111111111|nomecliente|enderecocliente|[7] -- 24/08 10:58:24:429 RX <- [ACK] -- 24/08 10:58:24:430 Status TX -> [ENQ][NUL] -- 24/08 10:58:24:430 RX <- [WAK][NUL][SOH][NUL][NUL][NUL] (1) -- 24/08 10:58:24:481 Status TX -> [ENQ][NUL] -- 24/08 10:58:24:481 RX <- [WAK][NUL][SOH][NUL][NUL][NUL] (2) -- 24/08 10:58:24:532 Status TX -> [ENQ][NUL] -- 24/08 10:58:24:533 RX <- [WAK][NUL][SOH][NUL][NUL][NUL] (3) -- 24/08 10:58:24:583 Status TX -> [ENQ][NUL] -- 24/08 10:58:24:584 RX <- [WAK][NUL][SOH][NUL][NUL][NUL] (4) -- 24/08 10:58:24:634 Status TX -> [ENQ][NUL] -- 24/08 10:58:24:635 RX <- [WAK][NUL][SOH][NUL][NUL][NUL] (5) -- 24/08 10:58:24:686 Status TX -> [ENQ][NUL] -- 24/08 10:58:24:687 RX <- [WAK][NUL][SOH][NUL][NUL][NUL] (6) -- 24/08 10:58:24:738 Status TX -> [ENQ][NUL] -- 24/08 10:58:24:738 RX <- [WAK][NUL][SOH][NUL][NUL][NUL] (7) -- 24/08 10:58:24:789 Status TX -> [ENQ][NUL] -- 24/08 10:58:24:790 RX <- [WAK][NUL][SOH][NUL][NUL][NUL] (8) -- 24/08 10:58:24:840 Status TX -> [ENQ][NUL] -- 24/08 10:58:24:841 RX <- [WAK][NUL][SOH][NUL][NUL][NUL] (9) -- 24/08 10:58:24:891 Status TX -> [ENQ][NUL] -- 24/08 10:58:24:892 Resposta: SEQ:220 CMD:16 EXT:0 CAT:0 RET:[SOH][NUL][NUL][NUL] TBR:44 BRS:"12|24082016105736 |000|BE10EMULADOR00000000|" CHK:170 -- 24/08 10:58:24:992 RX <- [SOH][220][16][NUL][NUL][SOH][NUL][NUL][NUL],[NUL]12|24082016105736 |000|BE10EMULADOR00000000|[170] -- 24/08 10:58:24:992 -- Desativando a porta: COM2 Att, Ricardo Salomão

Bom dia a todos quando tento gerar as funções fiscal da impressora bematech 2100 fiscal pelo acbr monitor plus, eu recebo a seguinte mensagem Erro retornado pela impressora Bematech: Impressora offiline Nunca passei por isso alguem pode me ajudar com esse enrosco? rsrsrs detalhe ela se conecta da status verifica se pode abrir cupom e tudo mais mas nao tira cupom nem relatórios

Pessoal, boa noite, Estou com a última versão do trunk2 do ACBr, tentando compilar os componentes no Delphi XE2, porém, estou com erro de compilação na unit ACBrECF: if not CharInSet(ArredondaTrunca , ['A','T']) then ArredondaTrunca := IfThen(Self.Arredonda,'A','T')[1]; [DCC Error] ACBrECF.pas(2770): E2250 There is no overloaded version of 'IfThen' that can be called with these arguments Realmente, ArredondaTrunca é um Char e não existe versão da função IfThen que devolva Char... Mesmo resolvendo esse problema no braço, todas as referências para a função IfThen apresentam o mesmo erro de compilação...

Ola pessoal! Estou precisando utilizar o componente AcBrECF para baixa somente os registro correspondentes ao SPED diretamente do ECF, assim como é possivel fazer o mesmo com os arquivos CAT-52, não sei se é possivel, alguem poderima me dar uma dica sobre isso?