Jump to content

icones_brancos.png

dia-do-acbr-online.png botao

botao.pngbotao.png

botao.pngbotao.png

Ofertas Embarcadero
Descontos de até 35%

Saiba Mais

logo_acbr_paygo.png

TEF ACBr PayGo
Seja um revendedor e ofereça uma solução completa para seu cliente.


botao.png

beneficios.png

Mauricio Elias

Usuários SAC
  • Content Count

    228
  • Joined

  • Last visited

Community Reputation

63 Excellent

1 Follower

About Mauricio Elias

  • Rank
    Membro

Profile Information

  • Sexo
    Masculino
  • Location
    Presidente Prudente - SP

Recent Profile Visitors

The recent visitors block is disabled and is not being shown to other users.

  1. Olá Juliomar, sim a pasta schemas está atualizada, e mesmo assim o erro persisti. BigWings a opção Complete boolean evalution já se encontra desativada. Obrigado pela Ajuda de vocês!
  2. Boa Tarde Desinstalei o ACBr e instalei novamente, até com a opção não usar capicom marcada (apesar de ser ela estar me salvando, até agora pois por ela não da erro), mas mesmo assim o erro persisti. Fui debugando e cheguei no local exato onde ocorre o erro, e na função: LibXmlNodeWasFound que fica na unit ACBrDFeXsLibXml2. function TDFeSSLXmlSignLibXml2.LibXmlNodeWasFound(ANode: xmlNodePtr; const NodeName: String; const NameSpace: String): boolean; begin Result := (ANode <> nil) and (ANode^.Name = NodeName) and ((NameSpace = '') or (ANode^.ns^.href = NameS
  3. Boa Tarde a Todos! Segui todos esses passos , mas infelizmente o erro persisti. Como meu windows 7 64 na instalação o as dll são copiadas para a pasta syswow64 ae copieo a libxml2 pra system32 mas também não resolveu. Bom não seu ela está ativada, pois só se ativa durante a instalação ou de alguma outra forma sem querer eu eu ativei, mas se saber pois nunca usei essa diretiva USE_MINGW pra ser sincero não sei pra que ela é usada. Por via das dúvidas copiei as dlls da pasta MinGW, mas não resolveu. Vou tentar desinstalar o ACBr e instalar novamente como última altern
  4. Olá Boa Tarde BigWings Então não é usando o mesmo exe, o exe gerado na maquina virtual esse funciona la na maquina virtual onde ele foi criado quanto na maquina com problema. O exe gerado aqui nessa maquina com problema não funciona aqui e nem na máquina virtual. Ok vou reinstalar o ACBr seguindo essa configurações que você passou, e seguir as outras recomendações depois te falo se deu certo. As dlls capicom, msxml estão dentro pois como tive que atualizar alguns clientes, e com esse problema por hora estão usando a capicom. Obrigado pela Ajuda!
  5. Olá Bom Dia BigWings fiz a pequena aplicação que você pediu, que abri um xml e tenta assinar. O windows está atualizado mas o erro persisti. Segue em anexo a aplicação feita no delphi 2010. Segue sem o executável pois mesmo compactado ultrapassa o tamanho de 2 mb. As dlls também não estão juntas e nem a pasta schemas pelo mesmo motivo de ultrapassar o limite do tamanho do arquivo para anexar. As dlls que está dentro da pasta dessa minha aplicação são: capicom,iconv,inpout32,libeay32,libxml2,libxmlsec,msvcr71,msvcr120,msxml5,msxml5r,ssleay32,swmfd,zlib1 Como disse
  6. Bom Dia a Todos Desculpa a demora por responder é que estava procurando saber se tinha mais alguma atualização do windows faltando, mas agora estão todas feitas e mesmo assim o erro persisti. Olá BigWings eu fiz dessa forma informando o caminho do certificado A1 no ArquivoPFX, e infelizmente também não solucionou o problema. O mais estranho que tenho uma o delphi 2010 instalado em uma máquina virtual com win 7 32 bits e lá fiz atualização do ACBr antes pra testar e lá também está com o windows atualizado e nele não da o erro. Pelo que lembro quando atualizei a versão do ACBr
  7. Olá Boa Tarde a Todos! Depois de muita luta consegui terminar as atualizações do windows, agora está atualizado. Mas infelizmente não resolveu o problema, o mesmo erro persisti e no mesmo lugar: O erro ocorre function TDFeSSL.Assinar no trecho em negrito if not Assinado then begin XmlAss := FSSLXmlSignClass.Assinar( ConteudoXML, docElement, infElement, SignatureNode, SelectionNamespaces, IdSignature, IdAttr); Tenho a opção no sistema de mudar a config por de wincrypt
  8. Bom Dia Juliomar Atualizei todas as dll para x86 e testei por exemplo a libxml2 de x86 de todas pastas do acbr, e todas elas estão na pasta do executável mas o erro persisti . Sobre a instalação do microsoft runtime bom a versão que está instalado aqui e a mesma que estava funcionando antes de eu atualizar o ACBr. O erro ocorre function TDFeSSL.Assinar no trecho em negrito if not Assinado then begin XmlAss := FSSLXmlSignClass.Assinar( ConteudoXML, docElement, infElement, SignatureNode, SelectionNamespaces,
  9. Boa Tarde BigWings Bom eu deixo todas dlls na pasta onde é gerado o executável. Eu testei atualizando lbxml2.dll da pasta C:\ACBr\DLLs\LibXml2 testei tanto da pasta x64 quanto x86 e ambos os casos ocorreu o mesmo erro no mesmo lugar. Meu executavel é 32 bits já que ainda uso o delphi 2010, e não lembro de ter nele alguma opção igual tem no Delphi Rio por exemplo que de a opção de gerar na versão pra 32 ou 64 bits. Não uso a diretiva USE_MINGW ativada no ACBr.inc. Atualizei as dlls libeay32 e ssleay32 também das pastas 186 e x64 mas ambas o erro persisti. Obrig
  10. Boa Tarde Juliomar ! Sim o certificado(A1) está instalado no Windows e sim quando instalei marquei ele como exportavel. Minha configuração é essa: SSLLIB: libwincrypt Cryptlib: crywinCrypt Httplib: httpWinHttp XMLSIGNLIB: xsLibxml2 SSLTYPE: LT_TLSv1_2 ae mudei para SSLLIB: libcapicom Cryptlib: cryCapicom Httplib: httpWinINet XMLSIGNLIB: xsMsXmlCapicom SSLTYPE: LT_TLSv1_2 Configurado usando o capicom não da o erro e enviou ae deu algumas rejeições, mas o que importa é que não deu o erro, mas só que recomendação que vi já
  11. Bom vamos lá eu atualizei na pasta do projeto as dlls: libxml2, libeay32, ssleay32 e testei mesmo erro. Tem que atualizar mais alguma? Minha configuração: SSLLIB: libwincrypt Cryptlib: crywinCrypt Httplib: httpWinHttp XMLSIGNLIB: xsLibxml2 SSLTYPE: LT_TLSv1_2 Sempre usei essa configuração tanto pra nota quanto pra manifesto e estava funcionando antes de atualizar a versão. Você sugere alguma outra? Debugando mais um pouco o erro acontece nessa função na parte em negrito: function TDFeSSL.Assinar(const ConteudoXML, docElement, infElement: String;
  12. Olá BigWings Testando mais um pouco, descobri que o erro ocorre depois de executar o ACBrMDFe1.Enviar, dentro da unit ACBMDFe quando executa a função : function TACBrMDFe.Enviar(const ALote: String; Imprimir:Boolean = True; ASincrono: Boolean = False): Boolean; o erro acontece ao executar o procedure Manifestos.Assinar que está na unit ACBrMDFeManifestos. procedure TManifestos.Assinar; var i: integer; begin for i := 0 to Self.Count - 1 do Self.Items[i].Assinar; end; O erro ocorre na linha Self.Items[i].Assinar; Ae dentro do procedure
  13. Olá BigWings Testando mais um pouco, descobri que o erro ocorre depois de executar o ACBrMDFe1.Enviar, dentro da unit ACBMDFe quando executa a função : function TACBrMDFe.Enviar(const ALote: String; Imprimir:Boolean = True; ASincrono: Boolean = False): Boolean; o erro acontece ao executar o procedure Manifestos.Assinar que está na unit ACBrMDFeManifestos. procedure TManifestos.Assinar; var i: integer; begin for i := 0 to Self.Count - 1 do Self.Items[i].Assinar; end; O erro ocorre na linha Self.Items[i].Assinar; O que pode ser? Será q
  14. Testando mais um pouco, descobri que o erro ocorre depois de executar o ACBrMDFe1.Enviar, dentro da unit ACBMDFe quando executa a função : function TACBrMDFe.Enviar(const ALote: String; Imprimir:Boolean = True; ASincrono: Boolean = False): Boolean; o erro acontece ao executar o procedure Manifestos.Assinar que está na unit ACBrMDFeManifestos. procedure TManifestos.Assinar; var i: integer; begin for i := 0 to Self.Count - 1 do Self.Items[i].Assinar; end; O erro ocorre na linha Self.Items[i].Assinar; O que pode ser? Será que tenho desinstal
  15. Bom dia Italo! Então essa parte de GerarMdfe e Gravarxml eu pus agora na tentativa meio no desespero já que o cliente está com caminhão já em trânsito ae fiz essa tentativa. Mas o problema o erro acontece no Enviar antes até desse trecho e antes da atualização não ocorria enviava normalmente. Tem alguma configuração nova no componente ACBrMDFe? Obrigado pela Ajuda!
×
×
  • Create New...