Daniel Simoes

Creio que seja esse o problema... Chamar esse WebService, não garantirá que o EndPoint de recepção de DFe's está ativo e funcional...

@RobertoKrug, talvez falte "ligar" os Scopes que você precisa... @EliasCesar, tem mais alguma dica ?

Obrigado pela contribuição... @Victor H. Gonzales - Panda, nos ajuda com essa análise?

Não temos esse equipamento para testes... Mas se ela tiver o protocolo da Zerbra, você precisaria usar o componente ACBrETQ, com o modelo ZPL2...

Elas estão exatamente na mesma pasta do .EXE ? esse erro que você reportou, parece típico da versão 3.x, sem a Legacy.dll Na dúvida, por favor apague todas as DLLs do OpenSSL, e copie as do link que indiquei, para a mesma pasta do .EXE

você está usando OpenSSL 3.x ? por favor use a versão 1.1.1.x http://svn.code.sf.net/p/acbr/code/trunk2/DLLs/OpenSSL/1.1.1.10/X86/

A Exceção era prevista no código anterior.. tratava-se de um try/except controlado... O Exception nunca ocorreria em produção, mas em Debug seria necessário marca a IDE para ignorar aquele tipo de exception... Eu refatorei o código, removendo o fluxo por Exception

por favor também atualize os fontes... a versão atual, está logando o quanto falta para o TimeOut

@WINDEL, nesse caso aqui.. parece que o próprio componente disparou o Exception.. Isso ocorre porque o TimeOut definido no componente foi atingido.. acho que você deixou o valor dele muito baixo.. (o default é 10000)

Isso é indicativo que as DLLs estão ok, mas as credenciais que você está usando não... Por favor confirme com o Gerente/Suporte do Banco, quais são as credenciais de acesso para esse cliente Por favor teste acesso com o PostMan.. Pois se mesmo nele, não funcionar, você terá certeza que as credenciais estão erradas

Realmente parece ser algum problema no S.O.... Obrigado pelo retorno...

@WINDEL, obrigado pelas telas... Analisando o seu CallStack, notei que os Exceptions ocorriam dentro de WaitForSYN... na verdade eram Exceptions controlados.. ou seja, bastava ignorar... Entretanto apliquei modificações nos fontes, que devem ficar mais claro, e sem a necessidade do Exception controlado.. Commit [r32492] PS: Também atualizei os Demos, com um botão interessante, para tentar Detectar a presença do PinPad

O ideal seria tentar manter o Windows com todas atualizações, por motivos de segurança...

Por favor verifique se você instalou a versão 64 bits, sobre uma versão anterior de 32 bits, ou vice-versa... Na dúvida, remova a pasta do ACBrMonitor, e instale novamente... (lembre-se de antes copiar as suas configurações em ACBrMonitor.ini)

Bacana... automatiza bastante o processo de instalação

Olá @WINDEL, Desculpe a demora na resposta... Pode por favor, pressionar Break nesse momento do Timeout, e enviar Print da tela no momento em que a IDE parou ? Eu creio que seja um Exception controlado... A rotina do ABECS já preconiza tentar ler o ACK por até 3 vezes, em até 2 segundos.. eu acho que esses exceptions são tratados pelo código abaixo procedure TACBrAbecsPinPad.ExecCommand(DoEvaluateResponse: Boolean); .... // Send Data and Wait for ACK while (AckByte <> ACK) do begin BlockStart := max(BlockStart, 0); SendCommand(BlockStart, BlocksRead); AckByte := WaitForACK; if (AckByte = NAK) then begin Inc(ACKFails); if (ACKFails >= MAX_ACK_TRIES) then DoException(CERR_READING_ACK); end else if (AckByte <> ACK) then DoException(CERR_READING_ACK); end;

ok.. o endereço não tem a tendência de mudar.. então não vejo muito risco, você deixar ele "hardcoded", observe ainda que há endereços diferentes para Produção e Homologação, então se for deixar nos fontes, melhor fazer isso em "runtime"

No Demo do ACBrPIX, na aba de configuração do Itaú.. há várias guias com passo a passo para geração do Certificado... Mas isso deve ser feito apenas uma vez por cliente, e os certificados gerados, devem ficar salvos em um local seguro...

Realmente se as DLLs do OpenSSL estão corretamente instaladas, a única explicação são credenciais erradas ou inválidas...

Humm.. havia algo informado nas propriedades do componente ? Se estiver preenchido, ele realmente usa essa informação, omitindo a pergunta, mas o padrão é essa propriedade ficar vazia...

Implementei no Demo do ACBrAbecsPinpad o seguinte Botão, para detectar o Pinpad procedure TfrMain.btDetectPinPadClick(Sender: TObject); var sl: TStringList; PortFound: String; i: Integer; begin sl := TStringList.Create; try ACBrAbecsPinPad1.Device.AcharPortasSeriais( sl ); i := 0; PortFound := ''; while (i < sl.Count) and (PortFound = '') do begin try ACBrAbecsPinPad1.Disable; ACBrAbecsPinPad1.Port := sl[i]; ACBrAbecsPinPad1.Enable; try ACBrAbecsPinPad1.OPN; ACBrAbecsPinPad1.CLO; PortFound := ACBrAbecsPinPad1.Port; finally ACBrAbecsPinPad1.Disable; end; except end; Inc(i); end; if (PortFound <> '') then ShowMessage('PinPad Found on '+PortFound) else ShowMessage('PinPad not Found'); finally sl.Free; end; end;

Você poderia usar o TACBrAbecsPinPad, para detectar ele... Basta varrer as portas seriais no sistema, tentar abrir elas, e nas que tiver sucesso com a abertura, tentar o comando TACBrAbecsPinPad.OPN

O caso é de 2 meses atrás... e pode ser que o autor do tópico não tenha o desejo de compartilhar o desfecho...