William F. L.

@Daniel Simoes aparentemente está certo agora, testei reimpressões e não acusou transação pendente ao iniciar a aplicação. Obrigado !

Estava digitando a mensagem com o print rsrs, pq agora o Demo está com erro. Vou atualizar aqui e testar.

A Instalação deu certo, porém ao mandar reimprimir agora não acho mais os comprovantes no "ACBrTEF.RespostasTEF.Count", ele vem zerado zerado. for i := 0 to ACBrTEF.RespostasTEF.Count -1 do begin DoImprimeComprovanteSiTef( ACBrTEF.RespostasTEF[i].ImagemComprovante1aVia.Text ); end;

@Daniel Simoes acho que teve alguma mudança que quebrou, mandei limpar tudo e reinstalar também, deu o mesmo erro no ACBrNFe. Pacote "DCLACBr_DFeComum.dpk" compilado com sucesso. Cleaning package cache for ACBr_NFe.bpl Cleaning ok Compiling package D:\ACBr\Pacotes\Delphi\ACBrDFe\ACBrNFe\ACBr_NFe.dpk "C:\Program Files (x86)\Embarcadero\Studio\22.0\bin\dcc32.exe" "D:\ACBr\Pacotes\Delphi\ACBrDFe\ACBrNFe\ACBr_NFe.dpk" Embarcadero Delphi for Win32 compiler version 35.0 Copyright (c) 1983,2022 Embarcadero Technologies, Inc. D:\ACBr\Fontes\ACBrDFe\ACBrNFe\Base\ACBrNFe.XmlWriter.pas(4536) Error: E2029 Declaration expected but '<' found D:\ACBr\Fontes\ACBrDFe\ACBrNFe\Base\ACBrNFe.XmlWriter.pas(4538) Error: E2038 Illegal character in input file: '|' (#$7C) D:\ACBr\Fontes\ACBrDFe\ACBrNFe\Base\ACBrNFe.XmlWriter.pas(4539) Error: E2023 Function needs result type D:\ACBr\Fontes\ACBrDFe\ACBrNFe\Base\ACBrNFe.XmlWriter.pas(4542) Error: E2023 Function needs result type D:\ACBr\Fontes\ACBrDFe\ACBrNFe\Base\ACBrNFe.XmlWriter.pas(4547) Error: E2066 Missing operator or semicolon D:\ACBr\Fontes\ACBrDFe\ACBrNFe\Base\ACBrNFe.XmlWriter.pas(4548) Error: E2003 Undeclared identifier: 'gALCZFMCBS' D:\ACBr\Fontes\ACBrDFe\ACBrNFe\Base\ACBrNFe.XmlWriter.pas(4548) Error: E2029 ')' expected but identifier 'tpALCZFMCBS' found D:\ACBr\Fontes\ACBrDFe\ACBrNFe\Base\ACBrNFe.XmlWriter.pas(4548) Error: E2029 'END' expected but ')' found D:\ACBr\Fontes\ACBrDFe\ACBrNFe\Base\ACBrNFe.XmlWriter.pas(4560) Error: E2023 Function needs result type D:\ACBr\Fontes\ACBrDFe\ACBrNFe\Base\ACBrNFe.XmlWriter.pas(4569) Error: E2066 Missing operator or semicolon D:\ACBr\Fontes\ACBrDFe\ACBrNFe\Base\ACBrNFe.XmlWriter.pas(4575) Error: E2066 Missing operator or semicolon D:\ACBr\Fontes\ACBrDFe\ACBrNFe\Base\ACBrNFe.XmlWriter.pas(4581) Error: E2066 Missing operator or semicolon D:\ACBr\Fontes\ACBrDFe\ACBrNFe\Base\ACBrNFe.XmlWriter.pas(4587) Error: E2066 Missing operator or semicolon D:\ACBr\Fontes\ACBrDFe\ACBrNFe\Base\ACBrNFe.XmlWriter.pas(4590) Error: E2066 Missing operator or semicolon D:\ACBr\Fontes\ACBrDFe\ACBrNFe\Base\ACBrNFe.XmlWriter.pas(4593) Error: E2066 Missing operator or semicolon D:\ACBr\Fontes\ACBrDFe\ACBrNFe\Base\ACBrNFe.XmlWriter.pas(4597) Error: E2023 Function needs result type D:\ACBr\Fontes\ACBrDFe\ACBrNFe\Base\ACBrNFe.XmlWriter.pas(4602) Error: E2066 Missing operator or semicolon D:\ACBr\Fontes\ACBrDFe\ACBrNFe\Base\ACBrNFe.XmlWriter.pas(4603) Error: E2003 Undeclared identifier: 'gMonoPadrao' D:\ACBr\Fontes\ACBrDFe\ACBrNFe\Base\ACBrNFe.XmlWriter.pas(4603) Error: E2035 Not enough actual parameters D:\ACBr\Fontes\ACBrDFe\ACBrNFe\Base\ACBrNFe.XmlWriter.pas(4618) Error: E2023 Function needs result type D:\ACBr\Fontes\ACBrDFe\ACBrNFe\Base\ACBrNFe.XmlWriter.pas(4622) Error: E2066 Missing operator or semicolon D:\ACBr\Fontes\ACBrDFe\ACBrNFe\Base\ACBrNFe.XmlWriter.pas(4623) Error: E2003 Undeclared identifier: 'gMonoReten' D:\ACBr\Fontes\ACBrDFe\ACBrNFe\Base\ACBrNFe.XmlWriter.pas(4623) Error: E2035 Not enough actual parameters D:\ACBr\Fontes\ACBrDFe\ACBrNFe\Base\ACBrNFe.XmlWriter.pas(4623) Error: E2029 'END' expected but ',' found D:\ACBr\Fontes\ACBrDFe\ACBrNFe\Base\ACBrNFe.XmlWriter.pas(4638) Error: E2023 Function needs result type D:\ACBr\Fontes\ACBrDFe\ACBrNFe\Base\ACBrNFe.XmlWriter.pas(4642) Error: E2066 Missing operator or semicolon D:\ACBr\Fontes\ACBrDFe\ACBrNFe\Base\ACBrNFe.XmlWriter.pas(4643) Error: E2003 Undeclared identifier: 'gMonoRet' D:\ACBr\Fontes\ACBrDFe\ACBrNFe\Base\ACBrNFe.XmlWriter.pas(4643) Error: E2029 'END' expected but ',' found D:\ACBr\Fontes\ACBrDFe\ACBrNFe\Base\ACBrNFe.XmlWriter.pas(4658) Error: E2023 Function needs result type D:\ACBr\Fontes\ACBrDFe\ACBrNFe\Base\ACBrNFe.XmlWriter.pas(4662) Error: E2066 Missing operator or semicolon D:\ACBr\Fontes\ACBrDFe\ACBrNFe\Base\ACBrNFe.XmlWriter.pas(4663) Error: E2003 Undeclared identifier: 'gMonoDif' D:\ACBr\Fontes\ACBrDFe\ACBrNFe\Base\ACBrNFe.XmlWriter.pas(4663) Error: E2029 'END' expected but ',' found D:\ACBr\Fontes\ACBrDFe\ACBrNFe\Base\ACBrNFe.XmlWriter.pas(4675) Error: E2023 Function needs result type D:\ACBr\Fontes\ACBrDFe\ACBrNFe\Base\ACBrNFe.XmlWriter.pas(4680) Error: E2066 Missing operator or semicolon D:\ACBr\Fontes\ACBrDFe\ACBrNFe\Base\ACBrNFe.XmlWriter.pas(4681) Error: E2003 Undeclared identifier: 'gTransfCred' D:\ACBr\Fontes\ACBrDFe\ACBrNFe\Base\ACBrNFe.XmlWriter.pas(4681) Error: E2035 Not enough actual parameters D:\ACBr\Fontes\ACBrDFe\ACBrNFe\Base\ACBrNFe.XmlWriter.pas(4687) Error: E2023 Function needs result type D:\ACBr\Fontes\ACBrDFe\ACBrNFe\Base\ACBrNFe.XmlWriter.pas(4692) Error: E2066 Missing operator or semicolon D:\ACBr\Fontes\ACBrDFe\ACBrNFe\Base\ACBrNFe.XmlWriter.pas(4693) Error: E2003 Undeclared identifier: 'gAjusteCompet' D:\ACBr\Fontes\ACBrDFe\ACBrNFe\Base\ACBrNFe.XmlWriter.pas(4693) Error: E2029 ')' expected but identifier 'competApur' found D:\ACBr\Fontes\ACBrDFe\ACBrNFe\Base\ACBrNFe.XmlWriter.pas(4702) Error: E2023 Function needs result type D:\ACBr\Fontes\ACBrDFe\ACBrNFe\Base\ACBrNFe.XmlWriter.pas(4702) Fatal: E2226 Compilation terminated; too many errors Compilation failure Erro ao compilar o pacote "ACBr_NFe.dpk". Abortando... Ocorreram erros na compilação dos pacotes.

Legal, vou atualizar e testar agora. Obrigado.

O fluxo é basicamente esse que você citou mesmo. Ao entrar na aplicação novamente temos que ter uma rotina que verifica se existem transações pendentes e nesse caso em questão ela detecta essa transação pendente (que não existe), pois apenas solicitei uma reimpressão.

Pessoal devo estar cometendo algum erro no meu fluxo. Usando o componente ACBrTEFAPI ao solicitar uma "reimpressão" usando o menu administrativo "Último comprovante" o comprovante é impresso normalmente, mas é criado o arquivo ACBr_000.tef na pasta tef. Porém ao iniciar minha aplicação é verificado se tem transações pendentes e o componente acaba passando por esse arquivo e me devolvendo um falso positivo que tem transação pendente. Minha rotina que verifica se tem transações pendente ao inicializar o componente: function TfrmMensagemSiTEF.PossuiTransacaoPendente: boolean; var i: integer; begin Result := false; for i := 0 to ACBrTEFAPI.RespostasTEF.Count-1 do begin if ACBrTEFAPI.RespostasTEF[i].Confirmar and (not ACBrTEFAPI.RespostasTEF[i].CNFEnviado) then begin Result := true; break; end; end; end;

Aqui tenho integração com SmartPOS e minha api envia apenas o json com todos os dados da Nfc-e após autorizada, no aplicativo aí gero o extrato na unha com as informações do json. Deu um certo trabalho no começo, mas agora roda liso.

Mas como o contador vai saber os "percentuais de ibs e cbs", quando estiver regulamentado a tabela por estado e munícipio, essa porcentagem será com base no destinatário !

Só um complemento, colocamos em produção essa alteração em 2 clientes com o modelo Print ID Touch. Via cabo de rede sem problemas, mas na USB tive q ajustar o arquivo "ACBrUSBID.ini" para:

Eu homologuei com 2 soluções usando m-sitef integrado ao totem SK210: - autopagamento (somente recebe comandas abertas) - autoatendimento (faz pedidos e também recebe) As 2 situações inicialmente existe uma pré-homologação do roteiro e depois homologação remota com a TEF House.

Consegui disparar o beep no modelo "Print iD". Foi ajustado o comando de beep para compatibilizar com os 2 modelos de impressora da Control ID. Será necessário ajustar o arquivo "ACBrUSBID.ini", pois foi alterado o trecho abaixo para identificar o "Protocolo ACBr" com o tipo específico "14-ppControlID": ACBrUSBID.ini ACBrEscControlID.pas

Segue em anexo contribuição para avaliação. Achei alguns tópicos para enviar um "beep" para impressora Control ID de forma manual, implementei seguindo os padrões do componente. Herdei da classe "TACBrEscPosEpson" que já usamos na Control ID e criei uma nova classe "TACBrEscControlID" apenas reescrevendo o método "Create". Modelos: Print ID Touch - OK Print ID - Não Funcionou ACBrEscControlID.pas ACBrPosPrinter.pas

Aqui temos essa cobrando de 2 modos: 1 - como acréscimo no cupom fiscal e com isso o estabelecimento paga imposto sobre esse valor 2 - como item no cupom fiscal, mas usando NCM e CFOP diferenciado * nesse caso nos passaram que existem algumas regras que o estabelecimento precisa seguir segundo a Lei 13.419 de 2017 (lei das gorjetas)

São 2 questões complicadas mesmo, atualizações e limite de requisições. Essa alteração que mandei até tenho usado aqui no dia a dia. Tenho uma outra consulta aqui para dados de empresa, mas essa API é paga e tem limite, porém faço um cache das informações em um banco online com "tempo de vida" dos registros, assim reduzo bem as consultas diretas.

Segue em anexo contribuição para avaliação. Achei interessante porque esse WebService "CEP AwesomeAPI" retorna o código IBGE. ACBrCEP.pas

Aqui temos o seguinte fluxo de envio, não é 100% pois sempre somos surpreendidos com alguma novidade, mas no geral atende muito bem. AUTORIZAÇÃO DA NFC-e -> Ocorrem erros que mapeamos como Timeout: - essa NFC-e é gravada como "PENDENTE" no banco de dados junto com o XML e fica travada - operador recebe um aviso em tela que houve um erro ao enviar a NFC-e - é habilitado envio OFFLINE das NFC-e - o sistema duplica a NFC-e, sobe a numeração e envia como "OFFLINE" - imprime 2 vias do extrato - existe uma flag no sistema "Emitir Online Automaticamente", se houver internet na próxima venda o sistema tenta autorizar direto a NFC-e, senão joga como OFFLINE Á partir disso temos um monitor de NFC-e que fica monitorando NFC-e "OFFLINE" e "PENDENTE" OFFLINE -> o monitor só envia e protocola a autorização no XML PENDENTE -> aqui a coisa complica um pouco: 1 - monitor primeiro consulta se essa chave já existe na SEFAZ se existir ele cancela "por substituição" passando o número da NFC-e que foi gerada em contingência 2 - se a chave ainda não existir na SEFAZ ele automaticamente solicita a inutilização dessa numeração pendente

Você está tendo esse erro em produção ou no seu aparelho de desenvolvimento ? Porque se for em desenvolvimento experimente retirar o cabo USB de debug.

Colega não sei se enquadra no mesmo cenário que o seu, mas aqui homologamos com m-Sitef no SK 210 da Gertec e tinhamos o mesmo erro que o seu mas usando PinPad físico no totem. No nosso caso dava esse erro sempre que tinhamos o cabo USB de deploy plugado no totem, quando retiravamos o cabo a transação ocorria normalmente.

Na verdade eu só enviei a string <beep>, sem texto ou formatações. Mas vou procurar o método.

Bom dia Daniel, testei enviando 4x comandos "</beep>" intervalado com Sleep(100). Funcionou usando "ppEscGPrinter ", porém a impressora solta pequenos fragmentos de impressão para cada comando "</beep>". Existe alguma forma dela só emitir o beep, sem imprimir nada ?

Estou testando com nossa Elgin i8 mesmo, foram feitos 2 testes: 1 - Usando ppEscPosEpson (não emitiu beep) 1 - Usando ppEscGPrinter (emitiu apenas 1x o beep) Segue print do Demo e Log. log.txt

Olá, estamos implementando nossa fila de impressão com ACBrPosPrinter e está indo muito bem, porém surgiu uma situação de usar vários "Beeps" na mesma impressão. Testamos 1x o comando "</beep>" na Elgin i8 e foi tranquilo, porém tem um cliente que usa "10x" o beep no final da impressão. Era configurado isso direto no driver da impressora, mas estamos mudando para ESCPOS e assim não depender mais do driver. Mesmo enviando várias vezes o comando na mesma linha "</beep></beep></beep>" ou enviando um por linha, o beep só é emitido 1x. Testei no Demo do ACBrPosPrinter e só vai 1x mesmo, alguém sabe se tem algum segredo esse beeps ?

try // Rotina de Envio except on e:Exception do begin LRetorno.AddPair('message', e.message); LRetorno.AddPair('status', TJSONNumber.Create(500)); Res.Send<TJSONAncestor>(LRetorno).Status(500); end; end; Sugiro capturar "e.message" aqui vc terá sua mensagem.

Rapaz em vários grupos e até aqui no fórum tem vários relatos do mesmo problema em SP. É problema lá na SEFAZ, aqui também tenho cliente que emite 1 NF-e por mês e ontem deu consumo indevido no envio.