É necessário um certificado para concluir a autenticação do cliente'

[econdotta]

Pessoal,

Dia 18 e 19 deste mês consegui emitir NFS-e (Porto Alegre - BHISS) com as configurações que vocês me passaram.
Já no dia 20 (quarta-feira) comecei a receber esta mensagem. Já verifiquei os certificados, estão corretos e validos, mas continuo recebendo esta mensagem.
'Erro: Requisição não enviada. 12044 - É necessário um certificado para concluir a autenticação do cliente'.
Estou carregando as informações desta forma:

   ACBrNFSe1.Configuracoes.Certificados.NumeroSerie       := g_Certificado;
   ACBrNFSe1.Configuracoes.Certificados.VerificarValidade :=True;

   ACBrNFSe1.Configuracoes.Arquivos.AdicionarLiteral := True;
   ACBrNFSe1.Configuracoes.Arquivos.EmissaoPathNFSe  := True;
   ACBrNFSe1.Configuracoes.Arquivos.SepararPorMes    := True;
   ACBrNFSe1.Configuracoes.Arquivos.SepararPorCNPJ   := False;

   //ACBrNFSe1.Configuracoes.Arquivos.PathGer          := edtPathLogs.Text;
   ACBrNFSe1.Configuracoes.Arquivos.PathSchemas      := '.\Schemas';

   ACBrNFSe1.Configuracoes.Geral.Salvar          := True;
   ACBrNFSe1.Configuracoes.Geral.PathIniCidades  := '.\';
   ACBrNFSe1.Configuracoes.Geral.PathIniProvedor := '.\';
   ACBrNFSe1.Configuracoes.Geral.CodigoMunicipio := StrToInt(g_CodMunicipio);
   ACBrNFSe1.Configuracoes.Geral.SenhaWeb        := '';
   ACBrNFSe1.Configuracoes.Geral.UserWeb         := '';

   if g_Logotipo<>'' then
      ACBrNFSe1.DANFSe.PrestLogo                       := g_Logotipo;
   if g_LogoMunicipio<>'' then
      ACBrNFSe1.DANFSe.Logo                            := g_LogoMunicipio;
   ACBrNFSe1.DANFSe.Prefeitura                         := g_Prefeitura;
   ACBrNFSe1.Configuracoes.WebServices.Ambiente        := Iif((g_Producao='S'),taProducao, taHomologacao);
   ACBrNFSe1.Configuracoes.Geral.CodigoMunicipio       := StrToInt(g_CodMunicipio);
   ACBrNFSe1.WebServices.ACBrNFSe.SSL.CarregarCertificado;
   if Not ACBrNFSe1.WebServices.ACBrNFSe.SSL.CertificadoLido then
   begin
      MessageDlg( 'Atenção: Certificado não carregado.',mtWarning,[mbOk],0);
   end;

   ACBrNFSe1.Configuracoes.Geral.Emitente.CNPJ         := g_CGC;
   ACBrNFSe1.Configuracoes.Geral.Emitente.InscMun      := g_InscMunicipio;
   ACBrNFSe1.Configuracoes.Geral.Emitente.RazSocial    := g_Empresa;

   ACBrNFSe1.Configuracoes.Geral.SetConfigMunicipio;
 
Alguém tem alguma dica do que estou esquecendo???

Efetuei o debug (Delphi XE2) e na linha 406 da unit ACBrHTTPReqResp.pas "if HttpSendRequest(pRequest, nil, 0, Pointer(FData), Length(FData)) then" está retornado False, sendo que o conteudo de FData possui o XML do RPS assinado.

InternalErrorCode: 12044
GetWinInetError(InternalErrorCode) : 'É necessário um certificado para concluir a autenticação do cliente'#$D#$A
O Certificado é A1 com validade até 16/04/2016.

Alguma dica???

Obrigado.

[Marcelo Henrique]

Bom dia @econdotta

Comigo estava acontecendo o mesmo problema.

Aqui eu tinha atualizado o ACBr, mas não tinha colocado os arquivos da pasta ArqINI junto com a minha aplicação. Depois que fiz isso, funcionou.

[econdotta]

4 horas atrás, Marcelo Henrique disse:

Bom dia @econdotta

Comigo estava acontecendo o mesmo problema.

Aqui eu tinha atualizado o ACBr, mas não tinha colocado os arquivos da pasta ArqINI junto com a minha aplicação. Depois que fiz isso, funcionou.

Marcelo, tudo resolvido, acho que estava com um arquivo INI desatualizado, quando copiei e rodei o sistema gerou tudo OK. Valeu a dica.