Ir para conteúdo
  • Cadastre-se

dev botao

Erro AcbrNfe_demo


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

Recommended Posts

Caro Sérgio o erro é de execução conforme imagem abaixo...

 

image.png.d1e80fe94d7334efcfc52476ae244d52.png

Voce está conseguindo ver?

 

procedure TForm1.btnStatusServClick(Sender: TObject);
begin
 ACBrNFe1.WebServices.StatusServico.Executar;   <= logo assim que executo essa linha

 MemoResp.Lines.Text := ACBrNFe1.WebServices.StatusServico.RetWS;
 memoRespWS.Lines.Text := ACBrNFe1.WebServices.StatusServico.RetornoWS;
 LoadXML(ACBrNFe1.WebServices.StatusServico.RetornoWS, WBResposta);

 pgRespostas.ActivePageIndex := 1;

 MemoDados.Lines.Add('');
 MemoDados.Lines.Add('Status Serviço');
 MemoDados.Lines.Add('tpAmb: '    +TpAmbToStr(ACBrNFe1.WebServices.StatusServico.tpAmb));
 MemoDados.Lines.Add('verAplic: ' +ACBrNFe1.WebServices.StatusServico.verAplic);
 MemoDados.Lines.Add('cStat: '    +IntToStr(ACBrNFe1.WebServices.StatusServico.cStat));
 MemoDados.Lines.Add('xMotivo: '  +ACBrNFe1.WebServices.StatusServico.xMotivo);
 MemoDados.Lines.Add('cUF: '      +IntToStr(ACBrNFe1.WebServices.StatusServico.cUF));
 MemoDados.Lines.Add('dhRecbto: ' +DateTimeToStr(ACBrNFe1.WebServices.StatusServico.dhRecbto));
 MemoDados.Lines.Add('tMed: '     +IntToStr(ACBrNFe1.WebServices.StatusServico.TMed));
 MemoDados.Lines.Add('dhRetorno: '+DateTimeToStr(ACBrNFe1.WebServices.StatusServico.dhRetorno));
 MemoDados.Lines.Add('xObs: '     +ACBrNFe1.WebServices.StatusServico.xObs);
end;

 

 

 

 

 

Editado por Ronan Amaral
Link para o comentário
Compartilhar em outros sites

  • Moderadores
25 minutos atrás, Ronan Amaral disse:

Estou tentando testar o AcbrNfe_demo no delphi Xe2, mas quando clico na opção Status de Serviço dá um erro de runtime ( ACBrNFe1.WebServices.StatusServico.Executar), e percebi que em todo o comando que possua o componente (ACBrNFe1...) também da erro.

image.png.c23318def4ee5fd54e205eaaa14e686d.png 

Alguém poderia me ajudar?

Tente acrescentar a unit MidasLib ao uses do dpr.

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

Projeto ACBr

 

 

Link para o comentário
Compartilhar em outros sites

  • Membros

Recompile o pacote ACBr_NFe.dpk e tente novamente.

Se não der certo, atualize o seu ACBr e faça novamente a instalação usando o ACBrInstall_Trunk2 marcando a opção para remover os arquivos antigos.

Poste aqui o resultado.

Equipe ACBr Sérgio Assunção
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

 

[email protected]

Link para o comentário
Compartilhar em outros sites

  • Membros
6 minutos atrás, Ronan Amaral disse:

Caro Sérgio, fiz tudo como solicitado, porem continua com o mesmo erro.

Registrou as dlls ?

Copie a midas.dll para a pasta do executavel (é só mais uma alternativa)

Equipe ACBr Sérgio Assunção
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

 

[email protected]

Link para o comentário
Compartilhar em outros sites

  • 10 meses depois ...
  • Este tópico foi criado há 2085 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.