Ir para conteúdo
  • Cadastre-se

dev botao
Seja bem-vindo
Regras e orientações da nossa comunidade Participe do Discord do ACBr

Erro ntdll.dll

adromarc

Por adromarc
em Dúvidas gerais

 Compartilhar
Ver Solução Respondido por Daniel Simoes,
  • Este tópico foi criado há 734 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

adromarc Apprentice

adromarc

Postado
Postado

Estou tendo esse erro "ntdll.dll" com a utilização do WinCrypt e OpenSsl, usei as mesma configurações do exemplo aqui do fórum e continua aparecendo essa mensagem, só o capicom que está dando certo.

  

    TACBrNFe(AACBrObj).Configuracoes.Geral.SSLLib := TSSLLib(FTipo);
    if FTipo = 1 then   //OpenSSL
    begin
      TACBrNFe(AACBrObj).Configuracoes.Geral.SSLCryptLib := cryOpenSSL;
      TACBrNFe(AACBrObj).Configuracoes.Geral.SSLHttpLib := httpOpenSSL;
      TACBrNFe(AACBrObj).Configuracoes.Geral.SSLXmlSignLib := xsMsXml;
      TACBrNFe(AACBrObj).Configuracoes.webservices.SSLtype := LT_TLSv1_2;
    end
    else if FTipo =  4 then  //winCrypt
    begin
      TACBrNFe(AACBrObj).Configuracoes.Geral.SSLCryptLib := cryWinCrypt;
      TACBrNFe(AACBrObj).Configuracoes.Geral.SSLHttpLib := httpWinHttp;
      TACBrNFe(AACBrObj).Configuracoes.Geral.SSLXmlSignLib := xsLibXml2;
      TACBrNFe(AACBrObj).Configuracoes.webservices.SSLtype := LT_TLSv1_2;
    end
    else if FTipo = 2 then //Capicom
    begin
      TACBrNFe(AACBrObj).Configuracoes.Geral.SSLLib := libcapicomdelphisoap;
      TACBrNFe(AACBrObj).Configuracoes.Geral.SSLCryptLib := cryCapicom;
      TACBrNFe(AACBrObj).Configuracoes.Geral.SSLHttpLib := httpIndy;
      TACBrNFe(AACBrObj).Configuracoes.Geral.SSLXmlSignLib := xsMsXmlCapicom;
      TACBrNFe(AACBrObj).Configuracoes.webservices.SSLtype := LT_TLSv1_2;
    end;

 

Link para o comentário
Compartilhar em outros sites
  • Fundadores
Daniel Simoes Grand Master

Daniel Simoes

Postado
  • Fundadores
Postado

Parece ser um problema no sistema operacional dessa máquina... Talvez você precise reinstalar o mesmo (formatar)

o ACBr não usa essa DLL diretamente.. porém essa DLL é "core" do Windows, e utilizada pela WinCrypt

Consultor SAC ACBr

Daniel Simões de Almeida
O melhor TEF, é com o Projeto ACBr - Clique e Conheça
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Link para o comentário
Compartilhar em outros sites
  • Fundadores
Daniel Simoes Grand Master

Daniel Simoes

Postado
  • Fundadores
Postado

Observe que não há relatos semelhantes a esse, no Fórum ou no Discord...

O problema ocorre com o Demo do ACBr ?

Consultor SAC ACBr

Daniel Simões de Almeida
O melhor TEF, é com o Projeto ACBr - Clique e Conheça
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Link para o comentário
Compartilhar em outros sites
adromarc Apprentice

adromarc

Postado
  • Autor
Postado

Com o demo não testei, no openssl está certo está configuração: 

   TACBrNFe(AACBrObj).Configuracoes.Geral.SSLCryptLib := cryOpenSSL;
   TACBrNFe(AACBrObj).Configuracoes.Geral.SSLHttpLib := httpOpenSSL;
   TACBrNFe(AACBrObj).Configuracoes.Geral.SSLXmlSignLib := xsMsXml;
   TACBrNFe(AACBrObj).Configuracoes.webservices.SSLtype := LT_TLSv1_2;

 

Link para o comentário
Compartilhar em outros sites
  • Fundadores
  • Solution
Daniel Simoes Grand Master

Daniel Simoes

Postado
  • Fundadores
  • Solution
Postado

O OpenSSL não usará as DLLs nativas do Windows... ele mesmo tem tudo que precisa para fazer Criptografia e comunicação segura... Você pode usar ele, nesses casos, mas creio que essa máquina acabará tendo problemas em outras situações

Desconfie de algum malware ou algo parecido nessas máquinas... não é comum acusar erro nessa DLL

Consultor SAC ACBr

Daniel Simões de Almeida
O melhor TEF, é com o Projeto ACBr - Clique e Conheça
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Link para o comentário
Compartilhar em outros sites
  • 2 semanas depois ...
adromarc Apprentice

adromarc

Postado
  • Autor
Postado

Tentei de várias formas até copiei nessa dll "ntdll.dll" para pasta do meu projeto e nada.

Só que esse erro acontece  em todas as máquinas que é instalado.

Inclusive em máquina que acabaram de ser formatada, Indiferente do sistema Operacinal windows 7, 8, e 10.

Foram testadas mais de 10 máquinas e continua o erro.

 

O interessante é que na primeira tentativa ele vai certo e retorna status 100.

Mas o problema é na segunda tentativa que ocorre uma exceção na hora de enviar e não retorna nada,

parasse que não tem um tratamento é muito estranho, já com o capicom dá certo 

  Parallel.Async(procedure
                 var
                   FXML_SEFA: String;
                 begin
                   FXML_SEFA := HKStreamsReadString('{GLOBAL_XML_CONFIG_SEFA}');
                   FSincrono := XPathGetBoolean(FXML_SEFA, '//confignfce/envsincrono="1"');

                   Self.FDomParser.XML := '';

                   with FACBrNFCe do
                   begin
                     if HKStreamsReadInteger('{STATUS_NFCE_' + TpAmbToStr(Configuracoes.WebServices.Ambiente) + '}') = 1 then
                       raise Exception.Create('Existe uma transmissão em andamento. Aguarde a finalização e tente novamente!');

                     if Self.FIntervTempoNFCe > 0 then
                       if SecondsBetween(Now(), HKStreamsReadDateTime('{ACESSO_NFCE_' + TpAmbToStr(Configuracoes.WebServices.Ambiente) + '}')) < Self.FIntervTempoNFCe then
                         raise Exception.Create('O INTERVALO MÍNIMO ENTRE TRANSMISSÕES NÃO FOI ATINGIDO - ÚLTIMO: ' +
                                                FormatDateTime('dd/mm/yyyy hh:nn:ss', HKStreamsReadDateTime('{ACESSO_NFCE_' + TpAmbToStr(Configuracoes.WebServices.Ambiente) + '}')));

                     NotasFiscais.Clear;

                     WebServices.Enviar.Clear;
                     WebServices.Retorno.Clear;
                     WebServices.Recibo.Clear;
                     WebServices.Consulta.Clear;
                     WebServices.Inutilizacao.Clear;
                     WebServices.ConsultaCadastro.Clear;
                     WebServices.EnvEvento.Clear;
                     WebServices.AdministrarCSCNFCe.Clear;
                     WebServices.DistribuicaoDFe.Clear;
                     WebServices.EnvioWebService.Clear;

                     WebServices.Retorno.Recibo := '';
                     WebServices.Retorno.Protocolo := '';

                     NotasFiscais.LoadFromString(AXML);

                     NotasFiscais.GerarNFe;
                     NotasFiscais.Assinar;
                     NotasFiscais.Validar;
                     HKStreamsWriteInteger('{STATUS_NFCE_' + TpAmbToStr(Configuracoes.WebServices.Ambiente) + '}', 1);
                     LogSalvar('"EnviaNFCe" - Linha: 2090');
        
                     if Enviar(1, False, FSincrono) then
                     begin
                       if FSincrono then
                         FDomParser.XML := WebServices.Enviar.RetWS
                       else
                       begin
                         FDomParser.XML := Trim(WebServices.Retorno.RetWS);
                         if FDomParser.XML = '' then
                            FDomParser.XML := Trim(WebServices.Enviar.RetWS);
                       end;

                      { Adicionado Sincrono }
                      if FSincrono then
                        if Consultar then FDomParser.XML := WebServices.Consulta.RetWS;
                     end;
                     LogSalvar('"EnviaNFCe" - Linha: 2110');
                   end;
                 end,

                 Parallel.TaskConfig.OnTerminated(procedure (const Task: IOmniTaskControl)
                                                  var
                                                    Excp: Exception;
                                                    S: String;
                                                  begin
   
                                                    HKStreamsWriteInteger('{STATUS_NFCE_' + TpAmbToStr(FACBrNFCe.Configuracoes.WebServices.Ambiente) + '}', 0);

                                                    if FHandleForm > 0 then
                                                      EnviaMensagem(FHandleForm, '', '', 'AM_LIMPAR_MENSAGEM');

                                                    if Assigned(Task.FatalException) then
                                                    begin
                                                      Excp := Task.DetachException;
                                                      try
                                                        if Assigned(AInstancia) and (AProcAposErro <> '') then
                                                          Self.Invoke(AInstancia, AProcAposErro,
                                                                                  [Excp.Message,
                                                                                   FACBrNFCe.SSL.HTTPResultCode,
                                                                                   FACBrNFCe.SSL.InternalErrorCode]);

                                                        if FHandleForm > 0 then
                                                          EnviaMensagem(FHandleForm, Excp.Message, '')
                                                        else
                                                        begin
                                                          LogSalvar('"EnviaNFCe" - Linha: 2137 - Msg: '+Excp.Message); {AQUI QUE É                                                                              GERADA A EXCEÇÃO}
                                                          AppMessageBox(Excp.Message, ' Sefa - Erro...', MB_OK + MB_ICONERROR);
                                                        end;

                                                      finally
                                                        FreeAndNil(Excp);
                                                      end;
                                                    end

 

Link para o comentário
Compartilhar em outros sites
adromarc Apprentice

adromarc

Postado
  • Autor
Postado

Tentei de várias formas até copiei nessa dll "ntdll.dll" para pasta do meu projeto e nada.

Só que esse erro acontece  em todas as máquinas que é instalado.

Inclusive em máquina que acabaram de ser formatada, Indiferente do sistema Operacinal windows 7, 8, e 10.

Foram testadas mais de 10 máquinas e continua o erro.

 

O interessante é que na primeira tentativa ele vai certo e retorna status 100.

Mas o problema é na segunda tentativa que ocorre uma exceção na hora de enviar e não retorna nada,

parasse que não tem um tratamento é muito estranho, já com o capicom dá certo 

  Parallel.Async(procedure
                 var
                   FXML_SEFA: String;
                 begin
                   FXML_SEFA := HKStreamsReadString('{GLOBAL_XML_CONFIG_SEFA}');
                   FSincrono := XPathGetBoolean(FXML_SEFA, '//confignfce/envsincrono="1"');

                   Self.FDomParser.XML := '';

                   with FACBrNFCe do
                   begin
                     if HKStreamsReadInteger('{STATUS_NFCE_' + TpAmbToStr(Configuracoes.WebServices.Ambiente) + '}') = 1 then
                       raise Exception.Create('Existe uma transmissão em andamento. Aguarde a finalização e tente novamente!');

                     if Self.FIntervTempoNFCe > 0 then
                       if SecondsBetween(Now(), HKStreamsReadDateTime('{ACESSO_NFCE_' + TpAmbToStr(Configuracoes.WebServices.Ambiente) + '}')) < Self.FIntervTempoNFCe then
                         raise Exception.Create('O INTERVALO MÍNIMO ENTRE TRANSMISSÕES NÃO FOI ATINGIDO - ÚLTIMO: ' +
                                                FormatDateTime('dd/mm/yyyy hh:nn:ss', HKStreamsReadDateTime('{ACESSO_NFCE_' + TpAmbToStr(Configuracoes.WebServices.Ambiente) + '}')));

                     NotasFiscais.Clear;

                     WebServices.Enviar.Clear;
                     WebServices.Retorno.Clear;
                     WebServices.Recibo.Clear;
                     WebServices.Consulta.Clear;
                     WebServices.Inutilizacao.Clear;
                     WebServices.ConsultaCadastro.Clear;
                     WebServices.EnvEvento.Clear;
                     WebServices.AdministrarCSCNFCe.Clear;
                     WebServices.DistribuicaoDFe.Clear;
                     WebServices.EnvioWebService.Clear;

                     WebServices.Retorno.Recibo := '';
                     WebServices.Retorno.Protocolo := '';

                     NotasFiscais.LoadFromString(AXML);

                     NotasFiscais.GerarNFe;
                     NotasFiscais.Assinar;
                     NotasFiscais.Validar;
                     HKStreamsWriteInteger('{STATUS_NFCE_' + TpAmbToStr(Configuracoes.WebServices.Ambiente) + '}', 1);
                     LogSalvar('"EnviaNFCe" - Linha: 2090');
        
                     if Enviar(1, False, FSincrono) then
                     begin
                       if FSincrono then
                         FDomParser.XML := WebServices.Enviar.RetWS
                       else
                       begin
                         FDomParser.XML := Trim(WebServices.Retorno.RetWS);
                         if FDomParser.XML = '' then
                            FDomParser.XML := Trim(WebServices.Enviar.RetWS);
                       end;

                      { Adicionado Sincrono }
                      if FSincrono then
                        if Consultar then FDomParser.XML := WebServices.Consulta.RetWS;
                     end;
                     LogSalvar('"EnviaNFCe" - Linha: 2110');
                   end;
                 end,

                 Parallel.TaskConfig.OnTerminated(procedure (const Task: IOmniTaskControl)
                                                  var
                                                    Excp: Exception;
                                                    S: String;
                                                  begin
   
                                                    HKStreamsWriteInteger('{STATUS_NFCE_' + TpAmbToStr(FACBrNFCe.Configuracoes.WebServices.Ambiente) + '}', 0);

                                                    if FHandleForm > 0 then
                                                      EnviaMensagem(FHandleForm, '', '', 'AM_LIMPAR_MENSAGEM');

                                                    if Assigned(Task.FatalException) then
                                                    begin
                                                      Excp := Task.DetachException;
                                                      try
                                                        if Assigned(AInstancia) and (AProcAposErro <> '') then
                                                          Self.Invoke(AInstancia, AProcAposErro,
                                                                                  [Excp.Message,
                                                                                   FACBrNFCe.SSL.HTTPResultCode,
                                                                                   FACBrNFCe.SSL.InternalErrorCode]);

                                                        if FHandleForm > 0 then
                                                          EnviaMensagem(FHandleForm, Excp.Message, '')
                                                        else
                                                        begin
                                                          LogSalvar('"EnviaNFCe" - Linha: 2137 - Msg: '+Excp.Message); {AQUI QUE É                                                                              GERADA A EXCEÇÃO}
                                                          AppMessageBox(Excp.Message, ' Sefa - Erro...', MB_OK + MB_ICONERROR);
                                                        end;

                                                      finally
                                                        FreeAndNil(Excp);
                                                      end;
                                                    end

 

Usando a versão de demonstração na hora de carregar o certificado o xml para validar aparece essa mensagem de errro,

com o capicom ele consegue validar e assinar

erro2.png

Link para o comentário
Compartilhar em outros sites
  • Fundadores
Daniel Simoes Grand Master

Daniel Simoes

Postado
  • Fundadores
Postado

Para investigar o problema, precisamos conseguir repeoduzi-lo...

Pode por favor passar instruções de como podemos reproduzir o problema no Demo do ACBr ?

 

 A mensagem no Demo está correta pois OpenSSL não carrega o certificado por Num.Serie mas apenas por DadosPFX ou ArquivoPFX

Consultor SAC ACBr

Daniel Simões de Almeida
O melhor TEF, é com o Projeto ACBr - Clique e Conheça
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Link para o comentário
Compartilhar em outros sites
adromarc Apprentice

adromarc

Postado
  • Autor
Postado

Estou usando o meu sistema como bpl dinâmicas linkando em runtime

esse aqui é o exemplo do código que eu usei e as configurações: 

    //Executando no modelo NFCe 


	TACBrNFe(AACBrObj).Configuracoes.Geral.SSLLib := libOpenSSL
	TACBrNFe(AACBrObj).Configuracoes.Geral.SSLCryptLib := cryOpenSSL;
	TACBrNFe(AACBrObj).Configuracoes.Geral.SSLHttpLib := httpOpenSSL;
	TACBrNFe(AACBrObj).Configuracoes.Geral.SSLXmlSignLib := xsLibXml2;
	TACBrNFe(AACBrObj).Configuracoes.webservices.SSLtype := LT_TLSv1_2;
	  
	//este código é no momento que vou enviar    

  Parallel.Async(procedure
                 var
                 begin 
				     // Executando em BackGround thread
				      FSincrono := 1; //enviando de modo síncrono
					 
				     with FACBrNFCe do
                     begin
						 NotasFiscais.Clear;
						 WebServices.Enviar.Clear;
						 WebServices.Retorno.Clear;
						 WebServices.Recibo.Clear;
						 WebServices.Consulta.Clear;
						 WebServices.Inutilizacao.Clear;
						 WebServices.ConsultaCadastro.Clear;
						 WebServices.EnvEvento.Clear;
						 WebServices.AdministrarCSCNFCe.Clear;
						 WebServices.DistribuicaoDFe.Clear;
						 WebServices.EnvioWebService.Clear;

						 WebServices.Retorno.Recibo := '';
						 WebServices.Retorno.Protocolo := '';

						 NotasFiscais.LoadFromString(AXML);

						 NotasFiscais.GerarNFe;
						 NotasFiscais.Assinar;
						 NotasFiscais.Validar;
						  
						 if Enviar(1, False, FSincrono) then
						 begin
						   if FSincrono then
							 FDomParser.XML := WebServices.Enviar.RetWS
						   else
						   begin
							 FDomParser.XML := Trim(WebServices.Retorno.RetWS);
							 if FDomParser.XML = '' then
								FDomParser.XML := Trim(WebServices.Enviar.RetWS);
						   end;

						  { Adicionado Sincrono } //adicionei recentemente para pegar protocolo
						  if FSincrono then
							if Consultar then FDomParser.XML := WebServices.Consulta.RetWS;
						 end;
                    end;
                 end,

                 Parallel.TaskConfig.OnTerminated(procedure (const Task: IOmniTaskControl)
                                                  var
                                                    Excp: Exception;
                                                    S: String;
                                                  begin
													//Executa em Main Thread depois que termina em Background 
													
                                                    if Assigned(Task.FatalException) then //Caso exista exceção gera Uma mensagem de erro
                                                    begin
                                                      Excp := Task.DetachException;
                                                      try
														// É aqui que é pegado a excessão da dll "ntdll.dll"
                                                         AppMessageBox(Excp.Message, ' Sefa - Erro...', MB_OK + MB_ICONERROR);
                                                      finally
                                                        FreeAndNil(Excp);
                                                      end;
                                                    end
                                                    else // Caso Contrarario exibe a mensagem de retorno
                                                    begin                                                   
                                                      try
                                                        if FSincrono then 
															S := Trim(FACBrNFCe.WebServices.Enviar.Msg)
                                                        else 
															S := Trim(FACBrNFCe.WebServices.Retorno.Msg);

                                                        AppMessageBox(S, ' Sefa - Mensagem...', MB_OK + MB_ICONINFORMATION);

                                                      except
                                                        on E: Exception do
                                                            AppMessageBox(E.Message, ' Sefa - Erro...', MB_OK + MB_ICONERROR);
                                                      end;
                                                    end;

                                                   end)
	            );

 

Link para o comentário
Compartilhar em outros sites
  • Fundadores
Daniel Simoes Grand Master

Daniel Simoes

Postado
  • Fundadores
Postado

Se o problema não ocorre no Demo do ACBr, por favor crie um pequeno projeto, para que possamos reproduzir o problema e investigar...

Consultor SAC ACBr

Daniel Simões de Almeida
O melhor TEF, é com o Projeto ACBr - Clique e Conheça
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Link para o comentário
Compartilhar em outros sites
  • Fundadores
Daniel Simoes Grand Master

Daniel Simoes

Postado
  • Fundadores
Postado

Eu nunca tive esse problema...  e não há relatos semelhantes no fórum...

Tudo indica que há algo mais instalado nessa máquina, ou o problemas na instalação do S.O., causando o problema...

Se você conseguir uma forma de reproduzir o problema usando o Demo do ACBr, ou um projeto de testes.. eu posso investigar... mas até o momento, eu não tenho como reproduzir o problema

Consultor SAC ACBr

Daniel Simões de Almeida
O melhor TEF, é com o Projeto ACBr - Clique e Conheça
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Link para o comentário
Compartilhar em outros sites
adromarc Apprentice

adromarc

Postado
  • Autor
Postado

Vi aqui no fórum vários relatos e tópicos criados sobre esse mesmo problema:

https://www.projetoacbr.com.br/forum/topic/45171-viola%C3%A7%C3%A3o-do-acesso-ntdlldll/

 

https://www.projetoacbr.com.br/forum/topic/1987-erro-ntdlldll/

Estou testando na demo e tentando fazer reproduzir esse problema só que continua aparecendo essa tela, qual é configuração correta

com o OpenSsl?

 

erro3.png

Link para o comentário
Compartilhar em outros sites
  • Moderadores
Juliomar Marchetti Grand Master

Juliomar Marchetti

Postado
  • Moderadores
Postado
16 horas atrás, adromarc disse:

Vi aqui no fórum vários relatos e tópicos criados sobre esse mesmo problema:

https://www.projetoacbr.com.br/forum/topic/45171-viola%C3%A7%C3%A3o-do-acesso-ntdlldll/

 

https://www.projetoacbr.com.br/forum/topic/1987-erro-ntdlldll/

Estou testando na demo e tentando fazer reproduzir esse problema só que continua aparecendo essa tela, qual é configuração correta

com o OpenSsl?

 

erro3.png

outra coisa é que openssl só funciona com o arquivo PFX

Consultor SAC ACBr Juliomar Marchetti
 

Projeto ACBr

skype: juliomar
telegram: juliomar
e-mail: [email protected]
http://www.juliomarmarchetti.com.br 		MVP_NewLogo_100x100_Black-02.png
 

 

Link para o comentário
Compartilhar em outros sites
adromarc Apprentice

adromarc

Postado
  • Autor
Postado

Depurando o projeto a exceção deu em um método "assinar" nas bibliotecas do ACBr,

Lembrando que quando eu envio na primeira vez a nota vai normal, é na segunda vez que cai nessa exceção.

Deem uma olhada nesta imagem:

 

erro4.png

É no método que está passando o xml que deu a exceçao: 

ACBr_DFeComum.ACBrDFeXsLibXml2.TDFeSSLXmlSignLibXml2.Assinar('<?xml version="1.0" encoding="UTF-8"?><NFe xmlns="http://www.portalfiscal.inf.br/nfe"><infNFe versao="4.00" Id="NFe41220407424383000174550010000001881000001898"><ide><cUF>41</cUF><cNF>00000189</cNF><natOp>Venda de mercadoria adquirida ou recebida de terceiros</natOp><mod>55</mod><serie>1</serie><nNF>188</nNF><dhEmi>2022-04-07T00:00:00-03:00</dhEmi><dhSaiEnt>2022-04-07T00:00:00-03:00</dhSaiEnt><tpNF>1</tpNF><idDest>1</idDest><cMunFG>4106605</cMunFG><tpImp>1</tpImp><tpEmis>1</tpEmis><cDV>8</cDV><tpAmb>2</tpAmb><finNFe>1</finNFe><indFinal>1</indFinal><indPres>9</indPres><indIntermed>0</indIntermed><procEmi>0</procEmi><verProc>1.0.0.0</verProc></ide><emit><CNPJ>07424383000174</CNPJ><xNome>POSTO CRUZEIRO COLONIAL LTDA</xNome><xFant>POSTO CRUZEIRO COLONIAL LTDA</xFant><enderEmit><xLgr>AVENIDA SAO PAULO</xLgr><nro>372</nro><xBairro>CENTRO</xBairro><cMun>4106605</cMun><xMun>CRUZEIRO DO OESTE</xMun><UF>PR</UF><CEP>87400000</CEP><cPais>1058</cPais><xPais>BRASIL</xPais><fone>4436762081</fone></enderEmit><IE>9034527900</IE><CRT>3</CRT></emit><dest><CPF>02324142970</CPF><xNome>NF-E EMITIDA EM AMBIENTE DE HOMOLOGACAO - SEM VALOR FISCAL</xNome><enderDest><xLgr>RUA JOAO DE RESENDE</xLgr><nro>S/N</nro><xBairro>CENTRO</xBairro><cMun>4106605</cMun><xMun>CRUZEIRO DO OESTE</xMun><UF>PR</UF><CEP>87400000</CEP><cPais>1058</cPais><xPais>BRASIL</xPais></enderDest><indIEDest>9</indIEDest></dest><det nItem="1"><prod><cProd>0030074</cProd><cEAN>SEM GTIN</cEAN><xProd>CHICL. BUBBALOO</xProd><NCM>17041000</NCM><CFOP>5102</CFOP><uCom>UN</uCom><qCom>1.0000</qCom><vUnCom>0.1500000000</vUnCom><vProd>0.15</vProd><cEANTrib>SEM GTIN</cEANTrib><uTrib>UN</uTrib><qTrib>1.0000</qTrib><vUnTrib>0.1500000000</vUnTrib><indTot>1</indTot></prod><imposto><ICMS><ICMS00><orig>0</orig><CST>00</CST><modBC>2</modBC><vBC>0.15</vBC><pICMS>12.0000</pICMS><vICMS>0.02</vICMS></ICMS00></ICMS><IPI><cEnq>999</cEnq><IPINT><CST>53</CST></IPINT></IPI><PIS><PISOutr><CST>49</CST><vBC>0.00</vBC><pPIS>0.0000</pPIS>...

 

Link para o comentário
Compartilhar em outros sites
adromarc Apprentice

adromarc

Postado
  • Autor
Postado
18 horas atrás, adromarc disse:

Depurando o projeto a exceção deu em um método "assinar" nas bibliotecas do ACBr,

Lembrando que quando eu envio na primeira vez a nota vai normal, é na segunda vez que cai nessa exceção.

Deem uma olhada nesta imagem:

 

erro4.png

É no método que está passando o xml que deu a exceçao: 

ACBr_DFeComum.ACBrDFeXsLibXml2.TDFeSSLXmlSignLibXml2.Assinar('<?xml version="1.0" encoding="UTF-8"?><NFe xmlns="http://www.portalfiscal.inf.br/nfe"><infNFe versao="4.00" Id="NFe41220407424383000174550010000001881000001898"><ide><cUF>41</cUF><cNF>00000189</cNF><natOp>Venda de mercadoria adquirida ou recebida de terceiros</natOp><mod>55</mod><serie>1</serie><nNF>188</nNF><dhEmi>2022-04-07T00:00:00-03:00</dhEmi><dhSaiEnt>2022-04-07T00:00:00-03:00</dhSaiEnt><tpNF>1</tpNF><idDest>1</idDest><cMunFG>4106605</cMunFG><tpImp>1</tpImp><tpEmis>1</tpEmis><cDV>8</cDV><tpAmb>2</tpAmb><finNFe>1</finNFe><indFinal>1</indFinal><indPres>9</indPres><indIntermed>0</indIntermed><procEmi>0</procEmi><verProc>1.0.0.0</verProc></ide><emit><CNPJ>07424383000174</CNPJ><xNome>POSTO CRUZEIRO COLONIAL LTDA</xNome><xFant>POSTO CRUZEIRO COLONIAL LTDA</xFant><enderEmit><xLgr>AVENIDA SAO PAULO</xLgr><nro>372</nro><xBairro>CENTRO</xBairro><cMun>4106605</cMun><xMun>CRUZEIRO DO OESTE</xMun><UF>PR</UF><CEP>87400000</CEP><cPais>1058</cPais><xPais>BRASIL</xPais><fone>4436762081</fone></enderEmit><IE>9034527900</IE><CRT>3</CRT></emit><dest><CPF>02324142970</CPF><xNome>NF-E EMITIDA EM AMBIENTE DE HOMOLOGACAO - SEM VALOR FISCAL</xNome><enderDest><xLgr>RUA JOAO DE RESENDE</xLgr><nro>S/N</nro><xBairro>CENTRO</xBairro><cMun>4106605</cMun><xMun>CRUZEIRO DO OESTE</xMun><UF>PR</UF><CEP>87400000</CEP><cPais>1058</cPais><xPais>BRASIL</xPais></enderDest><indIEDest>9</indIEDest></dest><det nItem="1"><prod><cProd>0030074</cProd><cEAN>SEM GTIN</cEAN><xProd>CHICL. BUBBALOO</xProd><NCM>17041000</NCM><CFOP>5102</CFOP><uCom>UN</uCom><qCom>1.0000</qCom><vUnCom>0.1500000000</vUnCom><vProd>0.15</vProd><cEANTrib>SEM GTIN</cEANTrib><uTrib>UN</uTrib><qTrib>1.0000</qTrib><vUnTrib>0.1500000000</vUnTrib><indTot>1</indTot></prod><imposto><ICMS><ICMS00><orig>0</orig><CST>00</CST><modBC>2</modBC><vBC>0.15</vBC><pICMS>12.0000</pICMS><vICMS>0.02</vICMS></ICMS00></ICMS><IPI><cEnq>999</cEnq><IPINT><CST>53</CST></IPINT></IPI><PIS><PISOutr><CST>49</CST><vBC>0.00</vBC><pPIS>0.0000</pPIS>...

Alguém tem ideia do que pode ser isso? Nessa função percebi que alguns parâmetros estão passando vazio e retorna nada no Result.

 

Link para o comentário
Compartilhar em outros sites
  • Administradores
Juliana Tamizou Veteran

Juliana Tamizou

Postado
  • Administradores
Postado

Bom dia,

Nas postagens acima o Daniel reiterou a necessidade de um demo que reproduza a situação...seria importante nos encaminhar.

At.

Consultora SAC ACBr

Juliana Tamizou

Gerente de Projetos ACBr / Diretora de Marketing AFRAC
Ajude o Projeto ACBr crescer - Seja Pro

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.  Discord

Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil


Participe de nosso canal no Discord e fique ainda mais próximo da Comunidade !!

Link para o comentário
Compartilhar em outros sites
adromarc Apprentice

adromarc

Postado
  • Autor
Postado
23 horas atrás, adromarc disse:

Depurando o projeto a exceção deu em um método "assinar" nas bibliotecas do ACBr,

Lembrando que quando eu envio na primeira vez a nota vai normal, é na segunda vez que cai nessa exceção.

Deem uma olhada nesta imagem:

 

erro4.png

É no método que está passando o xml que deu a exceçao: 

ACBr_DFeComum.ACBrDFeXsLibXml2.TDFeSSLXmlSignLibXml2.Assinar('<?xml version="1.0" encoding="UTF-8"?><NFe xmlns="http://www.portalfiscal.inf.br/nfe"><infNFe versao="4.00" Id="NFe41220407424383000174550010000001881000001898"><ide><cUF>41</cUF><cNF>00000189</cNF><natOp>Venda de mercadoria adquirida ou recebida de terceiros</natOp><mod>55</mod><serie>1</serie><nNF>188</nNF><dhEmi>2022-04-07T00:00:00-03:00</dhEmi><dhSaiEnt>2022-04-07T00:00:00-03:00</dhSaiEnt><tpNF>1</tpNF><idDest>1</idDest><cMunFG>4106605</cMunFG><tpImp>1</tpImp><tpEmis>1</tpEmis><cDV>8</cDV><tpAmb>2</tpAmb><finNFe>1</finNFe><indFinal>1</indFinal><indPres>9</indPres><indIntermed>0</indIntermed><procEmi>0</procEmi><verProc>1.0.0.0</verProc></ide><emit><CNPJ>07424383000174</CNPJ><xNome>POSTO CRUZEIRO COLONIAL LTDA</xNome><xFant>POSTO CRUZEIRO COLONIAL LTDA</xFant><enderEmit><xLgr>AVENIDA SAO PAULO</xLgr><nro>372</nro><xBairro>CENTRO</xBairro><cMun>4106605</cMun><xMun>CRUZEIRO DO OESTE</xMun><UF>PR</UF><CEP>87400000</CEP><cPais>1058</cPais><xPais>BRASIL</xPais><fone>4436762081</fone></enderEmit><IE>9034527900</IE><CRT>3</CRT></emit><dest><CPF>02324142970</CPF><xNome>NF-E EMITIDA EM AMBIENTE DE HOMOLOGACAO - SEM VALOR FISCAL</xNome><enderDest><xLgr>RUA JOAO DE RESENDE</xLgr><nro>S/N</nro><xBairro>CENTRO</xBairro><cMun>4106605</cMun><xMun>CRUZEIRO DO OESTE</xMun><UF>PR</UF><CEP>87400000</CEP><cPais>1058</cPais><xPais>BRASIL</xPais></enderDest><indIEDest>9</indIEDest></dest><det nItem="1"><prod><cProd>0030074</cProd><cEAN>SEM GTIN</cEAN><xProd>CHICL. BUBBALOO</xProd><NCM>17041000</NCM><CFOP>5102</CFOP><uCom>UN</uCom><qCom>1.0000</qCom><vUnCom>0.1500000000</vUnCom><vProd>0.15</vProd><cEANTrib>SEM GTIN</cEANTrib><uTrib>UN</uTrib><qTrib>1.0000</qTrib><vUnTrib>0.1500000000</vUnTrib><indTot>1</indTot></prod><imposto><ICMS><ICMS00><orig>0</orig><CST>00</CST><modBC>2</modBC><vBC>0.15</vBC><pICMS>12.0000</pICMS><vICMS>0.02</vICMS></ICMS00></ICMS><IPI><cEnq>999</cEnq><IPINT><CST>53</CST></IPINT></IPI><PIS><PISOutr><CST>49</CST><vBC>0.00</vBC><pPIS>0.0000</pPIS>...

Alguém tem ideia do que pode ser isso? Nessa função percebi que alguns parâmetros estão passando vazio e retorna nada no Result.

Usando o "winCrypt" também dá o mesmo problema nessa dll "ntdll.dll",

mas depurando a sequência de mensagens é diferente cai na dll "libxml2.dll" antes de ir para "ntdll.dll"

 

erro5.png

erro6.png

erro8.png

Link para o comentário
Compartilhar em outros sites
 Compartilhar
Ir para a lista de tópicos
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.

The popup will be closed in 10 segundos...