Ir para conteúdo
  • Cadastre-se

dev botao
  • Este tópico foi criado há 1578 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

  • Consultores
Postado

Boa tarde comunidade ACBr,

Estou enfrentando um problema após atualizar a suite ACBr para versão 17029 - 16/05/2019 10:24, o sistema de NFSe ao tentar enviar a nota fiscal apresenta o erro : Nenhum Elemento Encontrado, o erro ocorre quando se utiliza o SSLXmlSignLIB = xsLibXML2, caso utilizar o xsMsXML o sistema autoriza e recebe os retornos todos, o problema é apenas ao utilizar o xsLibXML2;

 

[Configurações]

Provedor : GINFES;

Cidade São José do Rio Preto - SP

<ACBrNFSe>.Configuracoes.Geral.SSLLib                := libWinCrypt;
<ACBrNFSe>.Configuracoes.Geral.SSLXmlSignLib := xsLibXml2;
<ACBrNFSe>.SSL.SSLType                                           := LT_all;

[abaixo segue o log que a minha aplicação gerou]:

Data/Hora............: 16/05/2019 14:17:26
Mensagem.............: Nenhum elemento encontrado
Classe Exceção.......: EACBrDFeException
Formulário...........: fMovimentacao
Unit.................: Vcl.Menus
Controle Visual......: 
Nome Usuario.........: Gonzales
Nome Computador......: DVLOP-01
Versão Windows.......: Windows 7 / Windows Server 2008 R2
Versão Aplicação.....: 2019.5.16.1000

(0070A152) [00B0B152] ACBrDFeXsLibXml2.TDFeSSLXmlSignLibXml2.AdicionarNode$qqrrp14Libxml2.xmlDocx20System.UnicodeString20System.UnicodeString (Line 665, "ACBrDFeXsLibXml2.pas" + 18) + $0
(00708E13) [00B09E13] ACBrDFeXsLibXml2.TDFeSSLXmlSignLibXml2.Assinar$qqrx20System.UnicodeStringt1t1t1t1t1t1 (Line 203, "ACBrDFeXsLibXml2.pas" + 44) + $28
(007A3D14) [00BA4D14] ACBrDFeSSL.TDFeSSL.Assinar$qqrx20System.UnicodeStringt1t1t1t1t1t1 (Line 1120, "ACBrDFeSSL.pas" + 20) + $26
(00D7368F) [0117468F] ACBrNFSeNotasFiscais.TNotasFiscais.AssinarLote$qqr20System.UnicodeStringt1t1ot1t1t1 (Line 688, "ACBrNFSeNotasFiscais.pas" + 15) + $24
(00DACD1B) [011ADD1B] ACBrNFSeWebServices.TNFSeEnviarLoteRPS.DefinirDadosMsg$qqrv (Line 2768, "ACBrNFSeWebServices.pas" + 168) + $56
(007D600C) [00BD700C] ACBrDFeWebService.TDFeWebService.Executar$qqrv (Line 201, "ACBrDFeWebService.pas" + 6) + $5
(00DB95F8) [011BA5F8] ACBrNFSeWebServices.TWebServices.Envia$qqr20System.UnicodeString (Line 5467, "ACBrNFSeWebServices.pas" + 16) + $8
(00DBC366) [011BD366] ACBrNFSe.TACBrNFSe.Enviar$qqr20System.UnicodeStringo (Line 443, "ACBrNFSe.pas" + 10) + $C
(00DBC25B) [011BD25B] ACBrNFSe.TACBrNFSe.Enviar$qqrio (Line 427, "ACBrNFSe.pas" + 1) + $14
(021589B8) [025599B8] uMovimentacao.TfMovimentacao.GerarNFSe$qqrv (Line 7621, "uMovimentacao.pas" + 299) + $1B
(0216483B) [0256583B] uMovimentacao.TfMovimentacao.mniSalvareProcessarDocumentoClick$qqrp14System.TObject (Line 9332, "uMovimentacao.pas" + 173) + $3
(00273BCE) [00674BCE] Vcl.Menus.TMenuItem.Click$qqrv (Line 2541, "Vcl.Menus.pas" + 19) + $8
(002764CD) [006774CD] Vcl.Menus.TPopupList.MainWndProc$qqrr24Winapi.Messages.TMessage (Line 4618, "Vcl.Menus.pas" + 2) + $5
(000E5D00) [004E6D00] System.Classes.StdWndProc$qqsp6HWND__uiuiui (Line 17187, "System.Classes.pas" + 😎 + $0

 

 

Grato desde já.

  • Curtir 1
Consultor SAC ACBr

Victor H Gonzales - Pandaaa
Ajude o Projeto ACBr crescer - Assine o SAC

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 !!

"Aprender é a única coisa que a mente nunca se cansa, nunca tem medo e nunca se arrepende” - Leonardo da Vinci

"Ter sucesso é falhar repetidamente, mas sem perder o entusiasmo"

Postado

Estou passando pelo mesmo problema com a xsLibXML2 na cidade de São Paulo.

Enviar Lote RPS:

08:46:27={TApplication().TfMenu(fMenu).TfsNFSeACBr(fsNFSeACBr).TPanel(pnBotoes)} EACBrDFeException - List index out of bounds (0)

 Consultar RPS:

08:41:59={TApplication().TfMenu(fMenu).TfsNFSeACBr(fsNFSeACBr).TPanel(pnBotoes)} EACBrDFeException - Falha ao Assinar - Consultar NFSe por RPS: Nenhum elemento encontrado

 

Tentei a  xsMsXML mas também tive erro ao enviar :

{TApplication().TfMenu(fMenu).TfsNFSeACBr(fsNFSeACBr).TPanel(pnBotoes)} EACBrDFeException - Falha ao Assinar - Consultar NFSe por RPS:

{TApplication().TfMenu(fMenu).TfsNFSeACBr(fsNFSeACBr).TPanel(pnBotoes)} EOleSysError - Classe não registrada

 

Dercide.

  • Consultores
Postado (editado)
10 minutos atrás, Dercide Alvarez disse:

Estou passando pelo mesmo problema com a xsLibXML2 na cidade de São Paulo.

Enviar Lote RPS:

08:46:27={TApplication().TfMenu(fMenu).TfsNFSeACBr(fsNFSeACBr).TPanel(pnBotoes)} EACBrDFeException - List index out of bounds (0)

 Consultar RPS:

08:41:59={TApplication().TfMenu(fMenu).TfsNFSeACBr(fsNFSeACBr).TPanel(pnBotoes)} EACBrDFeException - Falha ao Assinar - Consultar NFSe por RPS: Nenhum elemento encontrado

 

Tentei a  xsMsXML mas também tive erro ao enviar :

{TApplication().TfMenu(fMenu).TfsNFSeACBr(fsNFSeACBr).TPanel(pnBotoes)} EACBrDFeException - Falha ao Assinar - Consultar NFSe por RPS:

{TApplication().TfMenu(fMenu).TfsNFSeACBr(fsNFSeACBr).TPanel(pnBotoes)} EOleSysError - Classe não registrada

 

Dercide.

 

xsLibXML2 : Nenhum elemento encontrado, é o mesmo erro que eu estou encontrando.

 xsMsXML Classe não registrada é falta da DLL registrada (msxml5.dll);

  1. Copiar as DLL (msxml5.dll , msxml5r.dll) que encontra-se na raiz do sistema SIGE para a pasta System32 / SysWOW64 do Windows
  2. Abrir o prompt de comando (CMD) com previlégios de administrador
    1. Clicar no botão iniciar do windows
    2. digite no campo de pesquisa CMD
    3. clique com o botão direito sobre o resultado da pesquisa
    4. clique em executar como administrador
  3. no prompt de comando digitar
    %systemroot%\SysWoW64\regsvr32 msxml5.dll
  4. Pressionar a tecla enter
    1. aguardar a mensagem de confirmação
Editado por Victor H. Gonzales - Panda
Imagens que veio juntamente com o texto estavam quebradas (Confluence interno da empresa)
  • Curtir 1
Consultor SAC ACBr

Victor H Gonzales - Pandaaa
Ajude o Projeto ACBr crescer - Assine o SAC

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 !!

"Aprender é a única coisa que a mente nunca se cansa, nunca tem medo e nunca se arrepende” - Leonardo da Vinci

"Ter sucesso é falhar repetidamente, mas sem perder o entusiasmo"

Postado
23 minutos atrás, Victor H. Gonzales - Panda disse:

 

xsLibXML2 : Nenhum elemento encontrado, é o mesmo erro que eu estou encontrando.

 xsMsXML Classe não registrada é falta da DLL registrada (msxml5.dll);

  1. Copiar as DLL (msxml5.dll , msxml5r.dll) que encontra-se na raiz do sistema SIGE para a pasta System32 / SysWOW64 do Windows
  2. Abrir o prompt de comando (CMD) com previlégios de administrador
    1. Clicar no botão iniciar do windows
    2. digite no campo de pesquisa CMD
    3. clique com o botão direito sobre o resultado da pesquisa
    4. clique em executar como administrador
  3. no prompt de comando digitar
    
    %systemroot%\SysWoW64\regsvr32 msxml5.dll
  4. Pressionar a tecla enter
    1. aguardar a mensagem de confirmação

Beleza,, vou pedir pra testarem.

Postado
3 horas atrás, Dercide Alvarez disse:

Beleza,, vou pedir pra testarem.

 

4 horas atrás, Victor H. Gonzales - Panda disse:

 

xsLibXML2 : Nenhum elemento encontrado, é o mesmo erro que eu estou encontrando.

 xsMsXML Classe não registrada é falta da DLL registrada (msxml5.dll);

  1. Copiar as DLL (msxml5.dll , msxml5r.dll) que encontra-se na raiz do sistema SIGE para a pasta System32 / SysWOW64 do Windows
  2. Abrir o prompt de comando (CMD) com previlégios de administrador
    1. Clicar no botão iniciar do windows
    2. digite no campo de pesquisa CMD
    3. clique com o botão direito sobre o resultado da pesquisa
    4. clique em executar como administrador
  3. no prompt de comando digitar
    
    %systemroot%\SysWoW64\regsvr32 msxml5.dll
  4. Pressionar a tecla enter
    1. aguardar a mensagem de confirmação

Boa Noite!

Estou com o mesmo problema, fiz o procedimento e no meu caso não deu certo

  • Curtir 1
Postado

Estamos tendo que usar o

 xsLibXML2 devido a problemas encontra quanto o acesso certificado A3 nas demais df e, o que está ocasionando este erro da falta de elemento, até de ,momento estava a achar que havia mudanças no provedor benta. 

A alguma alternativa a manter a xml2 e continuar o funcionamento da nfse.

Boa noite. Agradeço.

  • Consultores
Postado (editado)

Boa Tarde, @Italo Jurisato Junior

Primeiramente obrigado pela ajuda, os testes com o arquivo paliativo informado neste tópico, alterou a mensagem de erro, o sistema para o provedor GINFES retornou a mensagem "Assinatura invalida.".

Os arquivos de schemas e ini estão atualizados pelo repositório svn.

Log:

Data/Hora............: 20/05/2019 15:59:29
Mensagem.............: Assinatura invalida.
Informar assinatura correta no documento XML.

Classe Exceção.......: EACBrDFeException
Formulário...........: fMovimentacao
Unit.................: Vcl.Menus
Controle Visual......: 
Nome Usuario.........: Gonzales
Nome Computador......: DVLOP-01
Versão Windows.......: Windows 7 / Windows Server 2008 R2
Versão Aplicação.....: 2019.5.16.1710

(007CEA82) [00BCFA82] ACBrDFe.TACBrDFe.GerarException$qqrx20System.UnicodeStringp25System.Sysutils.Exception (Line 632, "ACBrDFe.pas" + 11) + $0
(007D75C3) [00BD85C3] ACBrDFeWebService.TDFeWebService.GerarException$qqrx20System.UnicodeStringp25System.Sysutils.Exception (Line 531, "ACBrDFeWebService.pas" + 1) + $C
(00DB9667) [011BA667] ACBrNFSeWebServices.TWebServices.Envia$qqr20System.UnicodeString (Line 5470, "ACBrNFSeWebServices.pas" + 19) + $13
(00DBC3B6) [011BD3B6] ACBrNFSe.TACBrNFSe.Enviar$qqr20System.UnicodeStringo (Line 443, "ACBrNFSe.pas" + 10) + $C
(00DBC2AB) [011BD2AB] ACBrNFSe.TACBrNFSe.Enviar$qqrio (Line 427, "ACBrNFSe.pas" + 1) + $14
(02158A11) [02559A11] uMovimentacao.TfMovimentacao.GerarNFSe$qqrv (Line 7621, "uMovimentacao.pas" + 299) + $20
(02164893) [02565893] uMovimentacao.TfMovimentacao.mniSalvareProcessarDocumentoClick$qqrp14System.TObject (Line 9332, "uMovimentacao.pas" + 173) + $3
(00273BCE) [00674BCE] Vcl.Menus.TMenuItem.Click$qqrv (Line 2541, "Vcl.Menus.pas" + 19) + $8
(002764CD) [006774CD] Vcl.Menus.TPopupList.MainWndProc$qqrr24Winapi.Messages.TMessage (Line 4618, "Vcl.Menus.pas" + 2) + $5
(000E5D00) [004E6D00] System.Classes.StdWndProc$qqsp6HWND__uiuiui (Line 17187, "System.Classes.pas" + 😎 + $0

 

Forte Abraço!

1590-rps.xml 1558368208-env-lot.xml 1558368208-env-lot-soap.xml 1558368208-rec.xml 1558368208-rec-soap.xml

Editado por Victor H. Gonzales - Panda
Envio dos xmls da transmissão de testes
Consultor SAC ACBr

Victor H Gonzales - Pandaaa
Ajude o Projeto ACBr crescer - Assine o SAC

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 !!

"Aprender é a única coisa que a mente nunca se cansa, nunca tem medo e nunca se arrepende” - Leonardo da Vinci

"Ter sucesso é falhar repetidamente, mas sem perder o entusiasmo"

  • Consultores
Postado

Boa tarde @Italo Jurisato Junior,

positivo, irei fazer o teste agora

[Configurações]

Provedor : GINFES;

Cidade São José do Rio Preto - SP

<ACBrNFSe>.Configuracoes.Geral.SSLLib                := libWinCrypt;
<ACBrNFSe>.Configuracoes.Geral.SSLXmlSignLib := xsLibXml2;
<ACBrNFSe>.SSL.SSLType                                           := LT_all;

Consultor SAC ACBr

Victor H Gonzales - Pandaaa
Ajude o Projeto ACBr crescer - Assine o SAC

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 !!

"Aprender é a única coisa que a mente nunca se cansa, nunca tem medo e nunca se arrepende” - Leonardo da Vinci

"Ter sucesso é falhar repetidamente, mas sem perder o entusiasmo"

  • Consultores
Postado
8 minutos atrás, Italo Jurisato Junior disse:

Boa tarde Victor,

Você esta configurando o componente com o winCrypt, correto?

Por favor teste com essa outra Unit.

ACBrDFeXsLibXml2.pas 22 kB · 1 download

Boa tarde @Italo Jurisato Junior,

[Provedor GINFES]

Emissão [OK]

Cancelamento [OK]

 

Tudo certo na emissão do documento e cancelamento do mesmo utilizando este novo arquivo enviado 20/05/2019 - 16:17.

 

Obrigado pela ajuda forte abraço!

  • Curtir 2
Consultor SAC ACBr

Victor H Gonzales - Pandaaa
Ajude o Projeto ACBr crescer - Assine o SAC

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 !!

"Aprender é a única coisa que a mente nunca se cansa, nunca tem medo e nunca se arrepende” - Leonardo da Vinci

"Ter sucesso é falhar repetidamente, mas sem perder o entusiasmo"

Postado

Boa tarde pessoal,

para o provedor Betha ainda esta acontecendo o erro. Alguem mais ?

Ou preciso fazer algum configuracao extra.

Ou preciso baixar esta unit, para testar

 

Postado

Este que é meu maior problema pois nao consiguo simular o erro aqui, pois acontece apenas no cliente, pra min conseguir simular eu precisaria do certificado do cliente e ele possui um A3. MAs acredito que seja algo relacionado a esta ACBrDFeXsLibXml2.pas, não sei se é ao assinar ou ao validar ou ao enviar, nao estou conseguindo simular aqui.

  • 1 mês depois ...
  • 1 ano depois...
Postado

Atualmente existe um bug no arquivo fonte: ACBrDFeXsLibXml2.pas  metodo AdicionarNode (linha: 700):
Fonte atual: 

{ Se docElement possui prefixo o mesmo tem que ser removido }
vdocElement := copy(docElement, Pos(':', docElement) + 1, Length(docElement));

if (vdocElement <> '') then
  DocNode := LibXmlLookUpNode(DocNode, vdocElement);   

Correção: 

PosPrefix := Pos(':', docElement);

{ Se docElement possui prefixo o mesmo tem que ser removido }

if (PosPrefix > 0) then
  vdocElement := copy(docElement, PosPrefix + 1, Length(docElement))
else
  vdocElement :=  docElement;

vdocElement := copy(vdocElement, 1, Pos('>', docElement) - 1);

Atualmente a busca do nó (no caso de emissao para nfse, provedor Publica) está sendo por  'Rps></GerarNfseEnvio' fazendo com que nenhum nó seja encontrado.
A Correcao acima faz com que a busca do nó seja realizada por 'Rps' 

  • Moderadores
Postado
15 horas atrás, Leandro Guindani Gehlen disse:

if (PosPrefix > 0) then vdocElement := copy(docElement, PosPrefix + 1, Length(docElement)) else vdocElement := docElement;

Parece redundante, se PosPrefix for 0 vai copiar a linha toda de qualquer forma...

15 horas atrás, Leandro Guindani Gehlen disse:

vdocElement := copy(vdocElement, 1, Pos('>', docElement) - 1);

Isso não vai causar problemas com outros provedores ou outros documentos (NFe, CTe, MDFe, BPe...)?

Equipe ACBr BigWings
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

 

 

  • Este tópico foi criado há 1578 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.
Visitante
Este tópico está agora fechado para novas respostas
×
×
  • 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...
The popup will be closed in 10 segundos...