Ir para conteúdo
  • Cadastre-se

dev botao

NF-e Fechando tela


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

Recommended Posts

Bom dia!
Estou com um sério problema. Após iniciar ACBR Com delphi DX10 Seattle.
Quando envio a NF-e para o sefaz, em vez de retornar algum erro, quando tem, ele Miniminiza a tela de envio criada por mim, que no delphi 7 estava normal. e nunca trás o erro. já cheguei a demorar mais de 4 horas para encontrar o erro. Alguém pode me ajudar?

Link para o comentário
Compartilhar em outros sites

1 hora atrás, Eleandro fistsoft disse:

Bom dia!
Estou com um sério problema. Após iniciar ACBR Com delphi DX10 Seattle.
Quando envio a NF-e para o sefaz, em vez de retornar algum erro, quando tem, ele Miniminiza a tela de envio criada por mim, que no delphi 7 estava normal. e nunca trás o erro. já cheguei a demorar mais de 4 horas para encontrar o erro. Alguém pode me ajudar?

Amigo boa tarde, não acredito ser um erro do ACBr propriamente dito, ja instalou corretamente o ACBr pro delphi Seattle?

 

A tela fecha ou minimiza?

 

Exceção, existe alguma, tentou debugar?

Link para o comentário
Compartilhar em outros sites

  • Moderadores

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.

É seu código que exibe os status do componente que está fazendo isso.

remova ele e também deixe false pra exibir as mensagens.

Consultor SAC ACBr Juliomar Marchetti
 

Projeto ACBr

skype: juliomar
telegram: juliomar
e-mail: [email protected]
http://www.juliomarmarchetti.com.br
MVP_NewLogo_100x100_Black-02.png
 

 

Link para o comentário
Compartilhar em outros sites

Encontrei o exato local de uma erro.

function TWebServices.Envia(ALote: String; const ASincrono: Boolean): Boolean;
begin
  FEnviar.Lote := ALote;
  FEnviar.Sincrono := ASincrono;

  if not Enviar.Executar then
    Enviar.GerarException( Enviar.Msg );

  if not ASincrono then
  begin
    FRetorno.Recibo := FEnviar.Recibo;
    if not FRetorno.Executar then
      FRetorno.GerarException( FRetorno.Msg );
  end;

  Result := True;
end;
esta função do acbr. quando retorna o erro neste
if not ASincrono then
  begin
    FRetorno.Recibo := FEnviar.Recibo;
    if not FRetorno.Executar then
      FRetorno.GerarException( FRetorno.Msg ); /////bem aqui que a tela miniminiza em vez de ver o erro. aparece o erro no debugue, colocando o mouse em cima. mas após ir debugando, faz o som e miniminiza
  end;

Link para o comentário
Compartilhar em outros sites

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

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

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