Certificado não encontrado!

[Márcio Antônio]

Olá pessoal, estou criando um serviço para consultar as notas destinadas ao meu cnpj, mas não estou conseguindo conectar a sefaz, estou fazendo o mesmo código, na minha aplicação funciona normalmente, mas no serviço não... sempre da o mesmo erro, certificado não encontrado. segue abaixo a configuração do componente, para ver se vocês conseguem me ajudar...

     dtmCompra.ACBRNFeTriviaDownload.Configuracoes.Certificados.NumeroSerie := NFeCertificadoInfo.numCertificado;
     dtmCompra.ACBRNFeTriviaDownload.Configuracoes.Certificados.Senha := NFeCertificadoInfo.senhaCertificado;
     dtmCompra.ACBRNFeTriviaDownload.Configuracoes.WebServices.UF     :=  fempresaInfo.PessoaInfo.EnderecoPrinc.id_estado;
     dtmCompra.ACBRNFeTriviaDownload.Configuracoes.Geral.IdCSC := NFeCertificadoInfo.IdCSC;
     dtmCompra.ACBRNFeTriviaDownload.Configuracoes.Geral.CSC   := NFeCertificadoInfo.CSC;
 

  try
    dtmCompra.ACBRNFeTriviaDownload.Configuracoes.WebServices.Visualizar := False;

    dtmCompra.ACBRNFeTriviaDownload.Configuracoes.WebServices.Ambiente := taProducao;
    dtmCompra.ACBRNFeTriviaDownload.NotasFiscais.Clear;

    dtmCompra.ACBRNFeTriviaDownload.Configuracoes.Arquivos.PathSchemas :='';

    dtmCompra.ACBRNFeTriviaDownload.Configuracoes.Arquivos.PathSchemas := ExtractFilePath(Application.ExeName) + 'Schemas\Nfe'; 

  finally

  end;

  dtmCompra.ACBRNFeTriviaDownload.WebServices.StatusServico.Executar;
 

Quando manda executar, ele diz que não localizou o certificado... não sei mais o que fazer...

 

[Renato Rubinho]

Valida com o programa de exemplo e compara o que está fazendo diferente, especialmente nas configurações do certificado.

 

[Márcio Antônio]

Opa, renato, tudo igual... no meu form normal, conecto... faço tudo... mas no meu service, não consigo conectar, exatamente iguais os códigos... até o componente é o mesmo, fica no mesmo datamodule.... não sei mesmo o que pode ser...

[Renato Rubinho]

Você está usando certificado A1 instalado, certo?

Se estiver instalado, vai estar "no usuário logado" e funcionando no seu app, mas no seu serviço está no "usuário do serviço" que não tem o certificado.

Será interessante você carregar o certificado do arquivo ou do banco, nesse link tem demonstrações de como fazer.

Se quiser manter o certificado instalado, veja se logando o seu serviço com este usuário resolve.

 

https://regys.com.br/category/acbr/page/2/#.YYQ-E2DMLIU

 

[Márcio Antônio]

Valeu renato, pelo retorno... irei olhar o link.... obrigado!

[Renato Rubinho]

beleza.

obs: acabei não citando, mas você também pode usar a opção de carregar o certificado do arquivo.

[Márcio Antônio]

Opa renato, bom dia!

Passei esses parâmetros abaixo e não deu certo, deu um erro de : parâmetro inválido

        ACBRNFeTriviaDownload.Configuracoes.Certificados.ArquivoPFX := 'C:\Empresas\Certificado2021.pfx';

        ACBRNFeTriviaDownload.Configuracoes.Certificados.Senha := NFeCertificadoInfo.senhaCertificado;
 

[Márcio Antônio]

Coloquei logo depois o

        ACBRNFeTriviaDownload.SSL.CarregarCertificado;
 

e deu o mesmo erro, parâmetro incorreto.

 

[Juliomar Marchetti]

coloca Descarregar antes de setar

[Márcio Antônio]

Coloquei essa sequência:

        ACBRNFeTriviaDownload.SSL.DescarregarCertificado;

        ACBRNFeTriviaDownload.Configuracoes.Certificados.ArquivoPFX := 'C:\Empresas\Certificado2021.pfx';

        ACBRNFeTriviaDownload.Configuracoes.Certificados.Senha := NFeCertificadoInfo.senhaCertificado;
        ACBRNFeTriviaDownload.SSL.CarregarCertificado;
 

e mesmo assim deu erro na hora de carregar o certificado: parâmetro incorreto

[Juliomar Marchetti]

e antes ainda o que tá sentando no SSLib?

[Juliomar Marchetti]

outra coisa. já pegou o exemplo do svn e testou com ele? e dai pegou e conferiu o código

[Márcio Antônio]

11 minutos atrás, Juliomar Marchetti disse:

e antes ainda o que tá sentando no SSLib?

SSLCryptLib := cryCapicom;

SSLHttpLib := httpWinINet;

SSLLib := libCapicom;

SSLXmlSignLib := xsMsXmlCapicom;

12 minutos atrás, Juliomar Marchetti disse:

outra coisa. já pegou o exemplo do svn e testou com ele? e dai pegou e conferiu o código

Quando eu tento abrir o programa de exemplo, dá o erro em anexo...

[Juliomar Marchetti]

vai na pasta e exclui esse dproj e abre o dpr

[Márcio Antônio]

No exemplo deu o mesmo erro, parâmetro incorreto...

SSLCryptLib := cryCapicom;

SSLHttpLib := httpWinINet;

SSLLib := libCapicom;

SSLXmlSignLib := xsMsXmlCapicom;

[Renato Rubinho]

Fecha o projeto, apaga dcus e o .res, abre o dpr novamente e faz um "build all".

Obs: Clicando em "Continue" não passa apenas para o seu teste? Caso funcione, segue meu ini que funcionou, apenas revise os parâmetros com as suas informações.

ACBrNFe_Exemplo.ini

[Márcio Antônio]

Obrigado pela força, Renato e Juliomar, eram as configurações do SSLCryptLib...

Valeu mesmo!

[Juliomar Marchetti]

Obrigado por reportar.

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