NFSE erro ao enviar

[murilo cosme da silva]

Boa tarde a todos,

 

estou tentado enviar um xml de nfse para o estado de João Pessoa, em anexo o xml gerado pelo acbr no metodo enviar, mais o retorno sempre é erro interno 12157,

se alguém puder dar uma dica ai.

 

  ACBrNFSe1.NotasFiscais.Clear;

  for i := 1 to dm.cdsListaNFSE.RecordCount do
    begin
      CarregaDadosRPS(dm.cdsListaNFSESEQ.AsInteger);
      MontaMovServico(dm.cdsListaNFSESEQ.AsInteger);

      vNumRPS := dm.cdsListaNFSERPS.AsString;
      AlimentaComponente(vNumRPS);

    end;

  ACBrNFSe1.Enviar(vNumRPS);

26-env-lot.xml

[Italo Giurizzato Junior]

Boa tarde Murilo,

É salvo algum XML de retorno ou simplesmente é apresentado a mensagem de erro?

[murilo cosme da silva]

não retorna nada, simplesmente apresenta este retorno de erro

exatamente nesta parte;

procedure TDFeWebService.EnviarDados;
Var
  Tentar, Tratado: Boolean;
begin
  { Sobrescrever apenas se necessário }

  FPRetWS := '';
  FPRetornoWS := '';

  { Verifica se precisa converter o Envelope para UTF8 antes de ser enviado.
     Entretanto o Envelope pode já ter sido convertido antes, como por exemplo,
     para assinatura.
     Se o XML está assinado, não deve modificar o conteúdo }
  if not XmlEstaAssinado(FPEnvelopeSoap) then
    FPEnvelopeSoap := ConverteXMLtoUTF8(FPEnvelopeSoap);

  Tentar := True;
  while Tentar do
  begin
    Tentar := False;
    Tratado := False;

    if (FPConfiguracoes.Certificados.NumeroSerie <> '') then  // Tem Certificado carregado ?
      if FPConfiguracoes.Certificados.VerificarValidade then
         if (FPDFeOwner.SSL.CertDataVenc < Now) then
           raise EACBrDFeException.Create('Data de Validade do Certificado já expirou: '+
                                          FormatDateBr(FPDFeOwner.SSL.CertDataVenc));

    try
      FPRetornoWS := FPDFeOwner.SSL.Enviar(FPEnvelopeSoap, FPURL, FPSoapAction, FPMimeType);
    except
      if Assigned(FPDFeOwner.OnTransmitError) then
        FPDFeOwner.OnTransmitError( FPDFeOwner.SSL.HTTPResultCode,
                                    FPDFeOwner.SSL.InternalErrorCode,
                                    FPURL, FPEnvelopeSoap, FPSoapAction,
                                    Tentar, Tratado) ;

      if not (Tentar or Tratado) then
        raise;
    end;
  end;
end;

 

Gegalmente o erro é este.

[Italo Giurizzato Junior]

Boa noite Murilo,

Como esta as configurações do Internet Explorer?

[murilo cosme da silva]

Bom dia,

marquei todas TLS e SSL.

 

[Italo Giurizzato Junior]

Bom dia Murilo,

Esta errado.

Marque somente as opções: SSL 2.0, SSL 3.0, TLS 1.0 e Verificar se há assinatura em programas baixados.

[murilo cosme da silva]

já marquei as opções SSL2.0, SSL3.0 e TLS1.0.

[Italo Giurizzato Junior]

Boa noite Murilo,

Mas desmarcou as opções TLS 1.1 e TLS 1.2 ?

Desmarcou as opções de revogação de certificados?

[murilo cosme da silva]

sim deixei desta forma, o interessante que para Recife PE, estou conseguindo emitir, só para João Pessoa que fica dando erro 12157.

 

[Italo Giurizzato Junior]

Bom dia Murilo,

Fez testes com o programa exemplo?

Verifique se não esta configurando as propriedades do Proxy se este existir.

[murilo cosme da silva]

estou com o exemplo aberto, e testei em outro pc, mais dando o mesmo retorno 12157, opção proxy no internet explorer está desmarcado.

[Italo Giurizzato Junior]

Murilo,

E no componente?