Daniel Simoes

No caso do Demo, está na Unit Principal, método TFormPrincipal.AcharTransacaoTEFPendente

Minha teoria, é que o NSU possa estar diferente (sem zeros a esquerda, por exemplo).. e esse IF, falhe if (ACBrTEFD1.RespostasPendentes[i].Rede = Venda.Pagamentos[IndicePagto].Rede) and (ACBrTEFD1.RespostasPendentes[i].NSU = Venda.Pagamentos[IndicePagto].NSU) and (ACBrTEFD1.RespostasPendentes[i].ValorTotal = Venda.Pagamentos[IndicePagto].ValorPago) then Result := ACBrTEFD1.RespostasPendentes[i];

@valter_kettner, Analisando nos Fontes, ela só ficaria Pendente, se ela não tivesse sido confirmada... procedure TFormPrincipal.AtualizarPagamentosVendaNaInterface; var i, ARow: Integer; AResp: TACBrTEFResp; begin sgPagamentos.RowCount := 1; for i := 0 to Venda.Pagamentos.Count-1 do begin ARow := sgPagamentos.RowCount; sgPagamentos.RowCount := sgPagamentos.RowCount + 1; with Venda.Pagamentos[i] do begin if not Cancelada then begin AResp := AcharTransacaoTEFPendente(i); if Assigned(AResp) then Confirmada := AResp.CNFEnviado; // <------------- AQUI ------------- end; sgPagamentos.Cells[0, ARow] := FormatFloat('000', ARow); sgPagamentos.Cells[1, ARow] := TipoPagamento + ' - ' + DescricaoTipoPagamento(TipoPagamento); sgPagamentos.Cells[2, ARow] := FormatFloatBr(ValorPago); sgPagamentos.Cells[3, ARow] := NSU; sgPagamentos.Cells[4, ARow] := Rede; sgPagamentos.Cells[5, ARow] := ifthen(Cancelada, 'Cancelada', ifthen(Confirmada, 'Confirmada', 'Pendente')); sgPagamentos.Cells[6, ARow] := RedeCNPJ; end; end; AtualizarTotaisVendaNaInterface; end; Mas no seu Log, temos o envio do CNF... Consegue ir com o Debug e verificar se ele entra nesse IF if not Cancelada then begin AResp := AcharTransacaoTEFPendente(i); if Assigned(AResp) then Confirmada := AResp.CNFEnviado; end; - Se AResp retornar Nulo de AcharTransacaoTEFPendente, pode ser o problema...

Analisando os Logs

Poderia por favor detalhar um pouco mais, como configurou a IDE e executou o programa ? Se necessário, anexe Print Screens, basta copiar e colar aqui... @antonio.carlos, pode apoiar aqui ?

Eu realente preciso do Log, gerado pelo ACBrTEFAPI e pela PayGoWeb... O Log nos dirá o que a aplicação enviou para a TEF House Não compreendi plenamente... Você diz que fica pendente, no Portal do Cliente da Vero ?? Se nos Logs estiver claro que a aplicação está enviando a Confirmação, então provavelmente o problema é na Adquirente...

Por favor anexe o Log, dessa transação... Quando você fala "fica pendente"... onde você visualiza essa informação ?

@valter_kettner, Não consegui reproduzir o problema, pode por favor passar um passo a passo, de qual a sequencia para chegar até o problema ? Lembrando que só temos PDCs de homologação para testes... Mas o fato de mudar a adquirente, não muda em nada a lógica da aplicação...

Devem estar sobrecarregados, com a alta demanda por TEF no RS (assim como nós estamos) O único "problema", de usar uma máquina fornecida pela adquirente, é que você "casa" com ela.. e seus clientes só poderão usar Vero, para essa solução... O POS sem interligação com o sistema, não será permitido no RS Na visão do Fisco, se a Internet do POS funciona, porque a do estabelecimento não funcionaria?

Cada adquirente tem sua chave, para reconhecer os cartões e Bandeiras... O PinPad USB, tem o mapa de chave ABECs que são todas as chaves das empresas associadas a ABECS: https://abecs.org.br/ Mas dispositivos sem Fio, não recebem o mapa de chave ABECS pois precisam ser homologados individualmente por cada adquirente Então quando for cotar um SmartPOS, verifique com o Fabricate / Revenda, quais chaves de adquirente ele possui

O problema do SmartPOS é falta de chaves das maioria das Adquirentes

Existe o POS TEF da PayGo.. mas ele também depende de Internet Talvez você precise de um roteador, que permita um Chip 4G, para contingência... Veja esse da TecToy https://github.com/TecToy-Automacao/Equipamentos/blob/main/IOT/Roteador/Datasheet/27-ROTEADOR-DATASHEET.pdf https://github.com/TecToy-Automacao/Equipamentos/tree/main/IOT/Roteador/Manuais

Parece ser um problema na SEFAZ-MG, que está com um Novo Servidor de NFe no ar... Temos vários relatos semelhantes, em nosso Discord: https://discord.gg/acbr, no canal: #sefaz Mantenha o XML com o Protocolo Salvo, talvez seja necessário enviar eles como evidência, para a Sefaz MG

Eu realmente prefiro usar a versão 32 bits... Acho que a versão 64 ainda não está tão madura...

O instalador do ACBr, não é compatível com as versões CE (Community), devido essa limitação desse compilador Você poderia instalar o ACBr manualmente... mas isso é de dificuldade média... Ou usar uma versão Professional/Enterprise do Delphi

Realmente parece ser um Falso positivo, da analise heurística desses antivírus...

@Carlos Wagno Schneider... Você está carregando alguma DLL de SAT que seja de 32 Bits (ou algo parecido) ? Poderia por favor anexar o Log ? Não haverá ganho de performance em usar a versão 64 bits... Você pode continuar usando a versão 32 bits, mesmo em sistemas de 64 bits

Você pode fazer Download do Demo pelo SVN, usando o endereço: http://svn.code.sf.net/p/acbr/code/trunk2/Projetos/ACBrLib/Demos/Node.js/

Obrigado por reportar. Fechando. Para novas dúvidas, criar um novo tópico.

Imagina @fabiotj.. obrigado pelo retorno...

Não compreendi se o arquivo INI atual, do SVN, está errado ou o seu estava desatualizado...

na verdade a página que o ACBr consulta é a onde clica em "Realizar Consulta com Captcha Sonoro"

Instalou o Fortes Report CE ? https://github.com/fortesinformatica/fortesreport-ce

Obrigado por reportar. Fechando. Para novas dúvidas, criar um novo tópico.

O Problema está descrito no Log... veja...