NFSe Provedor Goiânia com problema de Envio

[infopointerp]

Teste no Delphi Rio

Delphi XE5 deu certo com capicom. Usei o mesmo fonte se mudar nada no código.

 

[infopointerp]

No delphi rio iria dar certo mas aquela validação diferente para a compilação dele gera o errro. Cheguei a comentar ela e ai abre a janela do windows para selecionar o certificado, que após selecionar o certificado obtenho o mesmo resultado que deu certo no xe5.

[Italo Giurizzato Junior]

Boa tarde,

Seria interessante você anexar a unit que você alterou que faz com que ele peça o certificado e não ocorre o erro.

Assim possamos analisar o problema.

[infopointerp]

Bom dia,

Anexado a unit com a parte comentada.

Você vai conseguir identificar a diferença para tentar fazer as request via openssl funcionar?

ACBrDFeHttpIndy.pas

[Italo Giurizzato Junior]

Bom dia,

Muito obrigado, vou incluir na minha lista de tarefas.

[PrimeSoftware]

Ainda estou com o problema:

Erro desconhecido. Nao foi possivel identificar o erro ocorrido na solicitacao.
Entre em contato com a prefeitura para maiores informacoes.
 

Já tem alguma solução?

Grato!

[Italo Giurizzato Junior]

Bom dia,

Primeiramente desculpe pela demora.

Você não precisava ter comentado as linhas:

    if (UseCertificateHTTP) then
    begin
      if not InternetSetOption(Client, INTERNET_OPTION_CLIENT_CERT_CONTEXT,
        PCCERT_CONTEXT(FpDFeSSL.CertContextWinApi), SizeOf(CERT_CONTEXT)) then
        raise EACBrDFeException.Create('Erro ao ajustar INTERNET_OPTION_CLIENT_CERT_CONTEXT: ' +
                                       IntToStr(GetLastError));
    end;

Bastaria alterar o valor do campo: UseCertificado de 1 para zero no arquivo INI do provedor.

[Geral]
VersaoSoap=1.1
Prefixo2=
Prefixo3=
Prefixo4=
Identificador=Id
QuebradeLinha=\s\n
; 0 = False / 1 = True
UseCertificado=0

 

[infopointerp]

Bom dia,

Project ACBrNFSe_Exemplo.exe raised exception class ESOAPHTTPException with message 'É necessário um certificado para concluir a autenticação do cliente - URL:https://nfse.goiania.go.gov.br/ws/nfse.asmx - SOAPAction:http://nfse.goiania.go.gov.br/ws/GerarNfse'.
 

Comentei apenas para teste porque estava dando o erro :

Project ACBrNFSe_Exemplo.exe raised exception class EACBrDFeException with message 'Erro ao ajustar INTERNET_OPTION_CLIENT_CERT_CONTEXT: 6'.
 

Editado 23 Novembro, 2020 por infopointerp

[Italo Giurizzato Junior]

Uma coisa é executar ou não o bloco de linhas que você comentou.

Outra coisa é o componente estar configurado com o certificado digital do emitente.

Esse provedor exige que a conexão com o webservice seja feita com a autenticação do cliente (emitente) e para isso se faz necessário o certificado digital.

[infopointerp]

Certo. Esse ultimo teste que eu fiz não tem nada alterado, está igual do svn.

Conseguiu ver algo do problema de que Capicom envia e com o WinHTTP da erro?

Vou acompanhar aqui e fazer os testes que precisar e posto aqui os resultados.

[Italo Giurizzato Junior]

Alguns provedores estão mudando a criptografia para TLS 1.2, log sugiro usar o OpenSSL ou WinCryp, visto que o Capicom não permite o uso dessa criptografia.

[infopointerp]

Em 10/11/2020 at 15:31, infopointerp disse:

Teste no Delphi Rio

Delphi XE5 deu certo com capicom. Usei o mesmo fonte se mudar nada no código.

 

 

Como o problema aparenta que o provedor ainda não aceita WinCrypt para TLS 1.2 então o que podemos fazer para quem precisa é usar o Capicom e verificar com o provedor se será atualizado a forma de envio.

[Italo Giurizzato Junior]

Boa tarde,

Fiz o seguinte teste:

1. Instalei o certificado digital.

2. No programa exemplo, informei o numero de serie dele.

3. Em SSLLib informei o valor libWinCrypt.

Tive o seguinte retorno:

Inicio TNFSeGerarNFSe
Método..... : Gerar
Código Erro : L001
Mensagem... : Erro desconhecido. Nao foi possivel identificar o erro ocorrido na solicitacao.
Correção... : Entre em contato com a prefeitura para maiores informacoes.
Provedor... : Goiania
 

Depois configurei para usar o libCapicom e o retorno foi o mesmo.

O XML esta sendo gerado, assinado, validado e enviado.

O Webservice recepciona o XML, processa e devolve a rejeição L001.

Se o webservice conforme a mensagem não conseguiu identificar o erro ocorrido ai o bicho pega.

Precisamos de um XML de envio envelopado para que possamos comparar com o que o componente esta gerando e fazer as devidas correções.

[infopointerp]

Boa tarde,

Vou fazer a geração e depois anexo aqui.

[infopointerp]

Boa tarde,

Anexo os xml de envio e retorno com o SOAP. Esses arquivos foram gerados com o Delphi XE5 usando "SSLLib := TSSLLib.libCapicomDelphiSoap".

Na versão atual do delphi que estou usando 10.3 tentei fazer o teste como capicom que deu certo nesse anterior mas também não deu certo, talvez tenha alguma distinção de versão de versão delphi na hora do processamento.

Nessa versão 10.3 com as outras libs também não deu certo.

Se precisar de mais algo me avise por favor.

 

Att., Haroldo

 

rps-autorizado.zip

[Italo Giurizzato Junior]

Bom dia Haroldo,

Você anexou o arquivo (8024UN-rps.xml) que é o XML do RPS e que esta assinado.

Esse XML foi gerado e assinado com a propriedade a propriedade SSLLib = libCapicomDelphiSoap no Delphi XE5, correto?

Com o libWinCrypt o RPS não é processado com sucesso?

Os fontes do ACBr na situação acima são atuais ou é uma versão antiga?

Precisamos saber se a versão dos fontes utilizados é a mesma que foi usada no Delphi XE5 e no Delphi 10.3 ou não.

Até onde sei a versão do Delphi não é para interferir na assinatura.

[infopointerp]

Bom dia

Com o libWinCrypt o RPS não é processado com sucesso? -> não é processado com sucesso

Os fontes do ACBr na situação acima são atuais ou é uma versão antiga? -> quando iniciei esse post eu atualizei o fonte e testei no xe5 e havia dado certo e usando o mesmo fonte no 10.3 não deu certo mesmo usando capicom.

Os fontes era o mesmo para xe5 e 10.3.

Até onde sei a versão do Delphi não é para interferir na assinatura. -> quando eu havia debugado dentro do fonte do componente eu vi uma distinção de versão do delphi, vou procurar aqui novamente e caso eu ache eu vou postar aqui.

[infopointerp]

Boa tarde,

Usando o exemplo com os mesmos dados anteriormente está retornando o resultado abaixo depois de atualizar os fontes:

[Italo Giurizzato Junior]

Boa tarde,

Vou incluir na minha lista de tarefas para verificar esse erro.

[Italo Giurizzato Junior]

Boa tarde,

Fazendo algumas alterações e testes com o novo componente de emissão de NFS-e consegui resolver o problema da assinatura invalida.

Agora vou fazer algo semelhante no componente atual.

Por favor aguarde mais um pouco.

[Italo Giurizzato Junior]

Bom dia,

Favor atualizar os fontes, apliquei uma alteração no componente que aparentemente não ocorre mais a rejeição de assinatura invalida.

[infopointerp]

Bom dia,

Vou atualizar e testar.

Obrigado

[infopointerp]

 

Resolveu o problema da assinatura e também o do envio. Testei também com openssl e deu certo.

Obrigado

Att., Haroldo

[Italo Giurizzato Junior]

Obrigado por reportar.

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