Daniel Simoes

Analisando o seu Log... não notei nele, uma chamada a "OnObtemCampo", que seria o natural, quando ocorre a digitação de um campo ou valor Também não há comandos da PGWebLib com o comando PWDAT_TYPED, no fluxo da Venda... O que me leva a crer, que é alguma programação que está nos seus eventos, que está levantando essa tela ? Consegue expor um pouco mais, a tela que está sendo exibida? se o conteúdo do texto que está na pergunta, não constar no Log, então isso é um forte indicativo, que não é o Fluxo do TEF, que está comandando essa pergunta, mas sim a sua aplicação Notei que a sua aplicação está chamando o cancelamento, logo na sequencia (no mesmo segundo), após a Venda... Provavelmente os diálogos que você acredita ser da Venda, são na verdade dessa transação de cancelamento, que você está chamando na sequencia... 26/03/24 16:38:54:796 - PW_iConfirmation( PWCNF_CNF_AUTO, 451271, 2155, 18643777056631, 742708, STONE ) 26/03/24 16:38:54:895 - PWRET_OK 26/03/24 16:38:54:906 - QuandoFinalizarTransacao 26/03/24 16:38:54:917 - QuandoFinalizarOperacao 26/03/24 16:38:55:144 - CancelarOuEstornarTransacoesDiretorioTrabalho( ) 26/03/24 16:38:55:166 - CancelarTransacao( 18643777056631, 699344, 26/03/2024 16:38:49, 8,90, 2155, STONE ) 26/03/24 16:38:55:179 - ConfirmarTransacoesPendentes 26/03/24 16:38:55:190 - FinalizarTransacoes( tefstsSucessoAutomatico ) 26/03/24 16:38:55:204 - PW_iNewTransac( PWOPER_SALEVOID )

Se os Logs são de produção, você pode ter problemas com LGPD, em expor eles aqui... o canal oficial de suporte para os parceiros de TEF do ACBr é: https://suporte.projetoacbr.com.br/ Você já criou algum ticket nessa plataforma ? O Discord, por ser muito dinâmico, não é um bom canal, para tentar resolver assuntos complexos, e que exijam o estudo de Logs...

Isso depende ds versão ABECS instalada no PinPad... A mais atual, e que trm mais recursos é a 2.12 Somente o fabricante consegue atualizar a versão da ABECS, em seu ambiente seguro.. Tente com o Demo do ACBrAbecsPinPad

Links dos manuais Online ACBrLib: https://acbr.sourceforge.io/ACBrLib/ACBrLib.html ACBrMonitor: https://acbr.sourceforge.io/ACBrMonitor/ACBrMonitor.html

Notei que os Demos, precisariam de ajustes, para enviar a Resposta com '-1' ou '-2', conforme os botões pressionados... Alguém pode por favor subir as Units dos Demos alteradas?

Enviada a contribuição do @joão vitor de fraga venancio... Commit [r33017]

por favor continue no tópico indicado acima..

@Italo Giurizzato Junior e @Diego Foliene Analisando essa questão, notei que o problema ocorre nas Units que ainda usam o antigo PCN... A antiga versão da rotina "ParseTXT" tinha uma característica (bug), de sempre retornar um ANSI, mesmo quando o parâmetro de entrada, era um UTF8... Isso causava problemas, quando precisávamos gravar os XMLs em UTF8, ou carregar ele na LibXML2 Após a correção da ParseTXT, todos os métodos que chamam ela, precisam ser revisados O Delphi espera que os caracteres que ele irá manipular em Tela, estejam em ANSI (no windows) e UTF8 no Android e Linux... Então é necessário, tratar isso, antes de mover para as propriedades dos objetos... Exemplo de ajuste em ACBrCTeWebServices.pas, linha 1113 FCTeRetornoSincrono.Leitor.Arquivo := UTF8ToNativeString(ParseText(AXML)); FCTeRetornoSincrono.LerXml; O Problema não ocorre, nas classes que usam TACBrXmlDocument, como Reader, pois essa classe que faz uso da LibXML2, já espera os dados em UTF8

Desculpe pela demora na resposta... Faz muito tempo, que implementamos o componente MTER, e o Demo dele... Lembro que algumas coisas ocorriam de forma Assincrona.. então Sleeps não são uma boa técnica... Notei no Demo que tem o Evento: procedure TForm1.ACBrMTer1RecebeDados(const IP: AnsiString; const Recebido: AnsiString; var EchoMode: TACBrMTerEchoMode); que acaba chamando o método: procedure AvaliarRespostaTerminal(aIP: String; const aResposta: String); Repare que ele tem estados que só pintam uma msg e saem, e que ele fica aguardando um "Enter", para buscar um Item, caso contrário, apenas adiciona o caractere digitado, no Buffer anterior if (aString[1] <> #13) then begin // Grava Resposta Edit; FieldByName('RESPOSTA').AsString := FieldByName('RESPOSTA').AsString + aString; Post; Exit; end;

@paulorsa, Isso quebra os eventos implementados com a assinatura anterior, correto ?

Uau.. que conteúdo fantástico... Muito obrigado e parabéns pela persistência

Não compreendi.. consegue postar uma imagem, como exemplo ?

@IgorAcertSoft, parece ter havido algum problema com os anexos... consegue por favor repostar ? Tente informar esse parâmetros, antes de iniciar a Transação Administrativa de Instalação if ACBrTEFAPI1.TEF is TACBrTEFAPIClassPayGoWeb then begin with TACBrTEFAPIClassPayGoWeb(ACBrTEFAPI1.TEF) do begin TEFPayGoAPI.ParametrosAdicionais.ValueInfo[PWINFO_POSID] := '99999'; // PDC TEFPayGoAPI.ParametrosAdicionais.ValueInfo[PWINFO_DESTTCPIP] := 'esba-hom01.tpgweb.io:17500' // Homologação TEFPayGoAPI.ParametrosAdicionais.ValueInfo[PWINFO_DESTTCPIP] := 'pl03.pgweb.io:17500' // Produção end; end;