Daniel Simoes

Esse programa roda em um Servidor Web ? Se SIM, Verifique se o componente está configurado para exibir o progresso da impressão ou o Preview.. (em um servidor Web isso não seria possível)

Parece ser um problema mecânico... A impressora não está tracionando a Bobina corretamente... Veja se tem algo enroscando o Papel

A msg de erro, parece ser um erro de programação, no WebService deles... mas se o Servidor respondeu, então a comunicação segura foi estabelecida...

https://www.projetoacbr.com.br/forum/search/?q=Intermediador&quick=1

https://www.projetoacbr.com.br/forum/search/?q=Intermediador&quick=1

Vai no Source Forge https://sourceforge.net/p/acbr/code/commit_browser

Sendo A1.. configure para usar libOpenSSL, e informe o Path em ArquivoPFX

O ACBr é OpenSource por um motivo.... Para que todos possam estudar os fontes dele, e implementar melhorias e novas funcionalidades... Fique a vontade para anexar os fontes modificados, com a nova implementação...

Não é isso.... essa URL ele irá buscar, conforme a sua configuração no componente, veja a imagem abaixo...

Eu acho que o caminho é esse... olhe com atenção, os fontes do Demo, e compare com os de sua aplicação, usando o Debug da IDE, para acompanhar passo a passo... Evite testar em clientes... se não funciona na sua banca de desenvolvimento, não irá funcionar no cliente final...

https://projetoacbr.com.br/fontes/

Por favor faça alguns testes com o Demo do ACBrNFe

Creio que ele use um protocolo diferente....

Nunca testamos esse modelo...

Seus fontes estão defasados... não damos suporte em fontes defasados...

Seus fontes estão defasados.. atualize pelo SVN... function GetNotAfter( cert: pX509 ): TDateTime; var Validade: String; notAfter: PASN1_TIME; begin notAfter := X509GetNotAfter(cert); if not Assigned(notAfter) then begin Result := 0; Exit; end; Validade := String(PAnsiChar(notAfter^.data)); SetLength(Validade, notAfter^.length); Validade := OnlyNumber(Validade); if notAfter^.asn1_type = V_ASN1_UTCTIME then // anos com 2 dígitos Validade := LeftStr(IntToStrZero(YearOf(Now),4),2) + Validade; Result := StoD(Validade); Result := IncMinute(Result, TimeZoneBias); end;

Qual é exatamente a mensagem de erro ?

Eu suspeitava que a SEFAZ não iria implementar as mudanças no prazo que ela mesmo sugeriu ...

infelizmente esse servidor da Fazenda vive com problemas...

Fuja do GMail... veja esse vídeo: