Ir para conteúdo
  • Cadastre-se

Isael Faria Junior

Membros
  • Total de ítens

    34
  • Registro em

  • Última visita

Posts postados por Isael Faria Junior

  1. Boa noite Pessoal,

    Hoje 02/08/2018, quando faço qualquer função, que consulto informação na receita de SP,

    o mesmo me retorna a seguinte mensagem

    Citar

    Rejeição: Falha no schema XML

    Ao invés de retornar a situação da nota, por exemplo.

    Porém, no caso dos outros estados, não apresenta nenhum erro.

    Alguém está passando pelo mesmo problema ? 

     

    grato,

  2. Bom dia Pessoal, estou tentando utlizar o acbr no meu projeto, porém assim que instalo, e tento compilar o meu projeto para pode executar da o seguinte erro.

    Já fiz atualização, tentei comentar, mais ai aparecem mais, já desistalei tudo, inclusive o delphi e apresenta o mesmo erro.

    Alguém pode me ajudar ?

    Estou utilizando o Delphi xe 8

     

    Sem título.png

  3. Boa tarde Juliomar,

    Está maquina, que postei, 32 bits, então copiei, para o system32 dela.

    Está dll's nunca foram usadas antes, pois não tinha mais nada instalado na maquina.

    Creio que o RegSvr32, esteja correto, conforme o que postei.

    Se puder dar uma olhada e ver se ta certo, já ajuda.

     

  4. Boa Noite Pessoal,

    Fiz a minha aplicação utilizando o componente ACBR, com o Delphi xe8.

    Na maquina que eu fiz o desenvolvimento não apresenta o problema.

    Porem, quando copio a pasta do executável para o a maquina no cliente e tendo validar o mesmo da o seguinte erro.

    Exception: Error: unable to load default xmlsec-crypto library. Make sure
    that you have it installed and check shared libraries path
    (LD_LIBRARY_PATH) environment variable.
    Erro: 
    Erro Completo: 

    Já copiei todas a dll's para a pasta do projeto, conforme a imagem (dlls)  e  fiz também o registro das dll's, utilizando o seguinte script.

    if EXIST %windir%\SysWOW64 goto Win64
    
    :Win32
    ECHO *** Copiando as DLLs ***
    if NOT EXIST %windir%\System32\capicom.dll copy capicom.dll %windir%\System32
    if NOT EXIST %windir%\System32\msxml5.dll  copy msxml5.dll  %windir%\System32
    if NOT EXIST %windir%\System32\msxml5r.dll copy msxml5r.dll %windir%\System32
    if NOT EXIST %windir%\System32\ssleay32.dll copy ssleay32.dll %windir%\System32
    if NOT EXIST %windir%\System32\libeay32.dll copy libeay32.dll %windir%\System32
    
    
    
    ECHO *** Registrando as DLLs ***
    regsvr32 %windir%\System32\capicom.dll 
    regsvr32 %windir%\System32\msxml5.dll 
    regsvr32 %windir%\System32\ssleay32.dll 
    regsvr32 %windir%\System32\libeay32.dll 
    goto end
    
    :Win64
    ECHO *** Copiando as DLLs x64 ***
    if NOT EXIST %windir%\SysWOW64\capicom.dll copy capicom.dll %windir%\SysWOW64
    if NOT EXIST %windir%\SysWOW64\msxml5.dll  copy msxml5.dll  %windir%\SysWOW64
    if NOT EXIST %windir%\SysWOW64\msxml5r.dll copy msxml5r.dll %windir%\SysWOW64
    if NOT EXIST %windir%\SysWOW64\ssleay32.dll copy ssleay32.dll %windir%\SysWOW64
    if NOT EXIST %windir%\SysWOW64\libeay32.dll copy libeay32.dll %windir%\SysWOW64
    
    ECHO *** Registrando as DLLs x64 ***
    regsvr32 %windir%\SysWOW64\capicom.dll 
    regsvr32 %windir%\SysWOW64\msxml5.dll 
    regsvr32 %windir%\SysWOW64\ssleay32.dll 
    regsvr32 %windir%\SysWOW64\libeay32.dll /s
    goto end
    
    pause
    
    :end
    
    pause

    Porem, apresenta ao tentar registrar nas seguintes linhas

    regsvr32 %windir%\System32\capicom.dll 
    regsvr32 %windir%\System32\msxml5.dll 
    regsvr32 %windir%\System32\ssleay32.dll 
    regsvr32 %windir%\System32\libeay32.dll 

    Alguém poderia me ajudar a resolver o problema ou me indicar, se estou fazendo algo de errado ?

    Alguém poderia me ajudar, pois, preciso fazer isso funcionar no cliente.

    Grato,

    dlls.png

    reg.png

  5. Boa Noite Pessoal,

    Estou fazendo o seguinte metodo para gerar um PDF.

    procedure TFormValidadorNfe.brnGerarPDFClick(Sender: TObject);
    begin
      OpenDialog.Title := 'Selecione a NFE';
      OpenDialog.DefaultExt := '*-nfe.XML';
      OpenDialog.Filter := 'Arquivos XML (*.xml)|*.xml|Todos os Arquivos (*.*)|*.*';
      OpenDialog.InitialDir := pPathEnviado;

    procedure TFormValidadorNfe.brnGerarPDFClick(Sender: TObject);
    begin
      OpenDialog.Title := 'Selecione a NFE';
      OpenDialog.DefaultExt := '*-nfe.XML';
      OpenDialog.Filter := 'Arquivos XML (*.xml)|*.xml|Todos os Arquivos (*.*)|*.*';
      OpenDialog.InitialDir := pPathEnviado;
    
      if OpenDialog.Execute then
      begin
        ACBrNFe1.NotasFiscais.Clear;
        ACBrNFe1.DANFE.Logo := pPathLogo+'\'+pNomeLogo;
        ACBrNFe1.NotasFiscais.LoadFromFile(OpenDialog.FileName,False);
        ACBrNFeDANFeRL1.PathPDF :=  pPathPDF+'\';
        ACBrNFe1.NotasFiscais.ImprimirPDF;
      end;
    end;

    Porem.,quando mando executar, apresenta o seguinte erro

    Sem título.png

    Estou fazendo a seguinte carga de variáveis,

    with ACBrNFe1.Configuracoes.WebServices do
      begin
       UF         := pUF;
       Ambiente   := StrToTpAmb(Ok,IntToStr(StrToInt(pTipoAmbiente)));
       Visualizar := False;
      end;
    
      with ACBrNFe1.Configuracoes.Geral do
      begin
       Salvar           := True;
      end;

     

    Alguém, saberia me ajudar com este problema ? Pois, só falta isso, para o ,,meu projeto estár ok.

    Outro detalhe, e que esse erro, só da na primeira vez, que tento executar a função, na segunda, não da erro.

    Grato.

  6. Boa tarde Pessoal, 

    estou com o seguinte erro ao tentar gerar o pdf da minha NFe,

    Quando executo a opção ImprimirPDF apresenta o seguinte erro.

    Citar

    Resource BBCancel not FOUND

    Alguém já teve esse problema ?

    O curioso que isso só ocorre na primeira execução, e depois não da está mensagem.

    Creio que possa ser algum parametro, porem, corri todos e não consegui achar algo que poderia resolver isso.

    Grato, pela ajuda.

    O  método que estou fazendo para gerar o PDF.

    var
     vCaminhoXml : String;
     vNumNF      : String;
    begin
     CarregarVariaveisIni;
     OpenDialog.DefaultExt := '*.xml';
     OpenDialog.Filter := 'Arquivos XML (*.xml)|*.xml|Todos os Arquivos (*.*)|*.*';
    
     OpenDialog.Title := 'Selecionar XML\';
     OpenDialog.InitialDir := pPathEnviado;
     if OpenDialog.Execute then
     Begin
       vCaminhoXml :=  OpenDialog.FileName;
    
      ACBrNFe1.NotasFiscais.Clear;
      ACBrNFe1.DANFE.Logo := pPathLogo+'\'+pNomeLogo;
      ACBrNFe1.NotasFiscais.LoadFromFile(vCaminhoXml,true);
      vNumNF   := ACBrNFe1.NotasFiscais.Items[0].NFe.Ide.nNF.ToString;
      ACBrNFe1.NotasFiscais.Validar;
      ACBrNFeDANFeRL1.PathPDF :=  pPathPDF+'\';
      ACBrNFe1.NotasFiscais.ImprimirPDF;
    
      ACBrNFe1.NotasFiscais.Clear;
      ACBrNFe1.DANFE.Logo := pPathLogo+'\'+pNomeLogo;
      ACBrNFe1.NotasFiscais.LoadFromFile(vCaminhoXml,true);
      ACBrNFe1.NotasFiscais.Imprimir;
     End;

     

  7. Boa tarde Pessoal,

    consegui resolver o problema, desinstalando o delphi xe 8 e re-instalando ele.

    Inclusive com isso o exemplo voltou a funcionar.

    Consegui agora, fazer a geração do PDF e a Impressão, porem está dando uma mensagem na primeira vez que executo o processo.

    Não consegui encontrar o porque.

    Alguém poderia me ajudar ?

     

    Sem titulo.png

  8. Boa tarde Sergio,

    Adicionei o componente ACBrNFeDANFeRL1, e associei ao Componente, porem começo a dar estes erros.

    Citar

    [dcc32 Error] E1026 File not found: 'Vcl.DBLogDlg.dfm'
    [dcc32 Error] E1026 File not found: 'Vcl.DBPWDlg.dfm'
    [dcc32 Error] E1026 File not found: 'DBCtrls.res'

    Pelo que entendi, ele está reclamando de forms e um res que não possuo, porem, estou usando o Componente do projeto.

    Poderia me ajudar ?

     

  9. Eu usei o componente ACBRNFE e não associei mais nada a ela.

    Seria Necessário associar algum outro a ela ?

    ACBrNFe1.NotasFiscais.Clear;
      ACBrNFe1.NotasFiscais.LoadFromFile(pPathEnviado+'\'+vNumNF+'.xml',true);
      ACBrNFe1.NotasFiscais.ImprimirPDF;
    
      ACBrNFe1.NotasFiscais.Clear;
      ACBrNFe1.NotasFiscais.LoadFromFile(pPathEnviado+'\'+vNumNF+'.xml',true);
      ACBrNFe1.NotasFiscais.Imprimir;

    Pois uso ele como o código acima.

  10. O exemplo do svn , não está funcionando corretamente. mesmo eu instalando os componentes necessarios.

    Como visto no post que tinha sobre outra questão.

    Seria de grande ajuda, pudesse me dizem qual o problema e como resolver, visto que o meu demo, não está funcionando corretamente.

     

    3 horas atrás, Agnaldo Prates disse:

    Esse erro ocorre no Demo também?

     

    Aguinaldo, o demo, não está funcionando no Delphi xe 8, estou usando ele para me basear, porem não tenho como executado, pois da erro de System.

    Saberia como, posso resolver este problema ?

  11. Boa Noite Pessoal,

    estou com o seguinte problema.

    Eu estou tentando gerar o PDF e Imprimir a NFE, porem está dando o erro da mensagem em anexo.

    Estou utilizando o seguinte codigo.

     

      ACBrNFe1.NotasFiscais.Clear;
      ACBrNFe1.NotasFiscais.LoadFromFile(pPathEnviado+'\'+vNumNF+'.xml',true);
      ACBrNFe1.NotasFiscais.ImprimirPDF;
    
      ACBrNFe1.NotasFiscais.Clear;
      ACBrNFe1.NotasFiscais.LoadFromFile(pPathEnviado+'\'+vNumNF+'.xml',true);
      ACBrNFe1.NotasFiscais.Imprimir;

    Poderiam me ajudar ?

    Sem título.png

  12. Obrigado Jether,

    Graças a sua ajuda, consegui realizar o envio e o retorno.

    Se puder ajudar mais uma vez, estou com problema para Imprimir e Imprimir em PDF.

    Estou utilizando a seguinte sintaxe

     ACBrNFe1.NotasFiscais.Clear;
      ACBrNFe1.NotasFiscais.LoadFromFile(pPathEnviado+'\'+vNumNF+'.xml',true);
      ACBrNFe1.NotasFiscais.ImprimirPDF;
    
      ACBrNFe1.NotasFiscais.Clear;
      ACBrNFe1.NotasFiscais.LoadFromFile(pPathEnviado+'\'+vNumNF+'.xml',true);
      ACBrNFe1.NotasFiscais.Imprimir;

    Porem, está dando o seguinte erro.

     

    Sem título.png

×
×
  • 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...