Ir para conteúdo
  • Cadastre-se

Daniel Simoes

Fundadores
  • Total de ítens

    29.397
  • Registro em

  • Última visita

  • Days Won

    782

Tudo que Daniel Simoes postou

  1. Para ver as mensagens de erro da libxmlsec, rode o programa diretamente pela linha de comando... Baixei os fontes da XMLSEC e fiz algumas modificações, para debugar melhor o problema... Notei que a Chave está chegando "nula", para a LibXMLSec.. (dsigCtx^.signKey = NULL)... porém nos fontes do ACBrDFeOpenSSL ela está corretamente atribuída... Deve ser alguma diferença de "tipos", entre 32 e 64 bits, que faz com que a chave fique Nula, quando é informada para a chamada do método da DLL
  2. Waldir, Muito obrigado pela analise, correção e adição dos Testes Unitários... parabéns... Enviei para o SVN, com pequenas modificações...
  3. As modificações de TLibHandle realmente são necessárias... pois em Linux elas apontam para outra Unit. TLibHandle = PtrInt; Mesmo assim ele falha ao executar a assinatura, vazando o seguinte erro : SignResult := xmlSecDSigCtxSign(FdsigCtx, SignNode); func=xmlSecDSigCtxProcessKeyInfoNode:file=xmldsig.c:line=871:obj=unknown:subj=unknown:error=45:key is not found: func=xmlSecDSigCtxProcessSignatureNode:file=xmldsig.c:line=565:obj=unknown:subj=xmlSecDSigCtxProcessKeyInfoNode:error=1:xmlsec library function failed: func=xmlSecDSigCtxSign:file=xmldsig.c:line=303:obj=unknown:subj=xmlSecDSigCtxSignatureProcessNode:error=1:xmlsec library function failed: TApplication.HandleException Erro -1: Falha ao assinar o Documento Lendo os fontes do xmlsec, notei que o único ponto onde o erro 45 ( XMLSEC_ERRORS_R_KEY_NOT_FOUND ) poderia ocorrer é em: https://github.com/lsh123/xmlsec/blob/master/src/xmldsig.c#L947 Mas a chave foi carregada com sucesso em FdsigCtx^.signKey,.. e se chamarmos manualmente o método "xmlSecKeyMatch", ele retorna 1 (sucesso) Ret := xmlSecKeyMatch(FdsigCtx^.signKey, nil, @FdsigCtx^.keyInfoReadCtx.keyReq); Não sei qual pode ser o problema...
  4. Verifique se o comando do VB, que você está usando para enviar... não está adicionando um "LineBreak"
  5. consegui reproduzir o problema, em um OpenSuse64... estou analisando o caso...
  6. Não creio que a modificação seja necessária... dynlibs.inc TLibHandle = System.THandle; sysutilh.inc THandle = System.THandle;
  7. OK, de acordo... apliquei modificações em ACBr.inc, para facilitar o desligamento dos Warnings
  8. 6.3 - Mostre respeito pelo modo de escrever. Escreva de modo claro, gramaticalmente e semanticamente correto. Não escreva TUDO EM MAIÚSCULAS. Isso é lido como se estivesse gritando e é considerado rude. Favor leia as regras do fórum.
  9. Qual é o passo a passo, para reproduzir o problema, usando o demo ECFTeste ?
  10. Qual é exatamente o problema ? A versão 64 bits não efetua assinatura ? Quais Libs de 64 bits (DLLs) você está usando ? (onde baixá-las ?)
  11. Otimizações enviadas para o SVN.. muito obrigado pela analise a correções...
  12. Mostra o Log da comunicação Serial para eles...
  13. Porque você precisa dessa variável como Protected ? Isso está causando algum Warning ? Qual a necessidade, da modificação abaixo ? {$M+} TACBrPosRazaoColunaFonte = class
  14. Se não me engano o componente faz a conversão de Unidades... O problema é que PPLA e PPLB se diferem na maneira em que a Etiqueta é orientada... (onde é determinado o Topo e a Esquerda)
  15. Obrigado pela sugestão... Apliquei modificações no SVN, baseado no código proposto...
  16. Enviei uma possível correção para o SVN....
  17. Bom, isso foge do escopo do SAC do ACBr... pois as dúvidas são relacionadas a tributação... Mesmo assim, provavelmente algum usuário do fórum pode saber como lhe ajudar... Vamos aguardar a interação de outros usuários...
  18. Aguarde a próxima compilação do instalador e leia o manual... Ou então... use o SVN... e baixe o mesmo... https://svn.code.sf.net/p/acbr/code/trunk2/Projetos/ACBrMonitorPLUS/Lazarus/
  19. Para resolver isso em definitivo... seria necessário quebrar o suporte a D7 e converter todos os fontes para UTF8...
  20. Delphi XE é um produto superior ao Lazarus... com um ótimo conjunto de frameworks e suporte a mobile... porém é (muito) caro... Com Lazarus você terá mais liberdade, e suporte a Linux / Mac.. (o que foi determinante no meu caso) A migração de um sistema D7 será muito mais simples, se for para um novo Delphi, do que para Lazarus
  21. Hoje em dia, o risco maior, é continuar a usar o Delphi 7... Hoje, no Windows 10, ao iniciar o Delphi7, é exibida uma janela "ameaçadora", informando que o programa não é compatível e que deve ser atualizado... Ou seja, as chances do binário gerado por esse compilador não serem suportadas total ou parcialmente pelo Windows 10, são grandes...
  22. Lembre-se que se compilar em Win64 você não terá suporte a CAPICOM
  23. Para esse tipo de demanda.... você precisa enviar para a Sw.Express os Logs do SiTEf e da CliSiTef
  24. Enviei modificações para o SVN, que devem resolver o problema... (Testei em Lazarus e D7)
  25. Mesmo assim o problema continua ? Parece ser algo isolado do Delphi... Só ocorre quando conecta 2 terminais ? ou também ocorre quando conecta apenas 1 ?
×
×
  • 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...