ERRO MDFE RETORNO VAZIO (URGÊNCIA)

[rodrigoernandespaiva]

Olá boa tarde, estou tendo problemas quanto ao envio do mdfe, retorna exceção vazio.

 

*****Erro começou a acontecer desde ontem a tarde, antes disso estava tudo normal.

 

Anexe o código

 

Fazendo tudo isso recebo o retorno com exceção vazia.

 

Alguém pode me ajudar? 

 

Precisava de uma solução com urgência

[Italo Giurizzato Junior]

Boa noite Rodrigo,

Por favor não poste como texto trechos grandes de código, procure sempre colocar em um arquivo TXT e anexar para que possamos analisar.

Desta forma a postagem fica mais clara e curta.

[rodrigoernandespaiva]

Olá... ok mas como já viu o código pode me ajudar????

 

Precisava disso urgente Italo

Agora, rodrigoernandespaiva disse:

Olá... ok mas como já viu o código pode me ajudar????

 

Precisava disso urgente Italo

ACBrMDFe1.Configuracoes.WebServices.TimeOut := FParametroNFe.TimeOutValidacao;

  ACBrMDFe1.Configuracoes.Arquivos.PathSalvar       := PathMensal;

  ACBrMDFe1.Configuracoes.WebServices.UF := ParametroNFe.UFEmitente;

  ACBrMDFe1.Configuracoes.WebServices.Visualizar := True;

  ACBrMDFe1.Configuracoes.WebServices.AguardarConsultaRet      := 5000;  // tempo padrão que vai aguardar para consultar após enviar a NF-e
  ACBrMDFe1.Configuracoes.WebServices.IntervaloTentativas      := 3000;  // Intervalo entre as tentativas de envio
  ACBrMDFe1.Configuracoes.WebServices.Tentativas               := 10;    // quantidade de tentativas de envio
  ACBrMDFe1.Configuracoes.WebServices.AjustaAguardaConsultaRet := True;

  ACBrMDFe1.Configuracoes.Geral.VersaoDF := ve300;
  ACBrMDFe1.Configuracoes.Arquivos.AdicionarLiteral := True;
  ACBrMDFe1.Configuracoes.Arquivos.EmissaoPathMDFe  := True;
  ACBrMDFe1.Configuracoes.Arquivos.SepararPorMes    := True;
  ACBrMDFe1.Configuracoes.Arquivos.PathMDFe         := APath + cDiretorioLogMDFE;

  ACBrMDFe1.Configuracoes.Arquivos.PathSchemas := APath + cDiretorioEsquemasMDFE +
    TVersaoManualMdfeString[vm300Mdfe];

  ACBrMDFe1.Configuracoes.Arquivos.Salvar := True;
  ACBrMDFe1.Configuracoes.Arquivos.PathSalvar := APath + cDiretorioLogMDFE;

  case FParametroNFe.AmbienteMdfe of
    tmdfeaProducao:
      ACBrMDFe1.Configuracoes.WebServices.Ambiente := taProducao;

    tmdfeaHomologacao:
      ACBrMDFe1.Configuracoes.WebServices.Ambiente := taHomologacao;
  end;

  ACBrMDFe1.Configuracoes.WebServices.ProxyHost := FParametroNFe.ProxyEndereco;
  ACBrMDFe1.Configuracoes.WebServices.ProxyPort := IntToStr
    (FParametroNFe.ProxyPorta);
  ACBrMDFe1.Configuracoes.WebServices.ProxyUser := FParametroNFe.ProxyUsuario;
  ACBrMDFe1.Configuracoes.WebServices.ProxyPass := FParametroNFe.ProxySenha;

  if Trim(FParametroNFe.CertificadoNome) = EmptyStr then
    raise Exception.Create('Ocorreu erro nenhum certificado definido');

  ACBrMDFe1.Configuracoes.Certificados.NumeroSerie :=
    FParametroNFe.CertificadoSerie;

  ACBrMDFe1.Configuracoes.Geral.FormaEmissao := TpcnTipoEmissao.teNormal;

  if ACBrMDFe1.DAMDFe <> nil then
  begin
    ACBrMDFe1.DAMDFe.PathPDF           := PathMensal;
    ACBrMDFe1.DAMDFe.ExpandirLogoMarca := False;
    ACBrMDFe1.DAMDFe.MostrarPreview    := not FParametroNFe.ImpDiretoDanfMDFE;
    ACBrMDFe1.DAMDFe.TipoDAMDFe        := tiRetrato;
    try
      ACBrMDFe1.DAMDFE.Logo              := Sessao.Usuario.Estabelecimento.LogoTipo;
    except
    end;
    ACBrMDFe1.DAMDFE.NumCopias         := FParametroNFe.NumViasMDFe;

    ACBrMDFeDAMDFEFR1.FastFile         := NotaUtil.PathAplication + cDiretorioMDFE + '\DAMDFE.FR3';

  end;
 

essa de cima é a rotina que uso para configurar o componente

 

Existe algo que esteja fazendo de errado ou faltando

[rodrigoernandespaiva]

Como pedito segue arquivos.

 

configuração.tx

tenvio.txt

 

Podem me ajudar?

 

Ainda continuo recebendo o retorno vazio no envio e em consulta de status.

 

Como disse

 

O que já fiz:

1 - Atualizei o acbr para ultima versão

2- Alterei as configurações de internet tls e ssl

[Juliomar Marchetti]

Bom dia

primeiro tome cuidado em ficar postado diversas vezes. não é assim que vai conseguir ajuda no fórum e muito menos colocando o título que o fez aqui. lembre-se aqui é gratuito e aberto se queres algo mais rápido sugiro assinar o ACBrSAC.

agora vamos lá

abra o exemplo do svn, faça o processo e nos repasse as configurações que usou e os passos lá para que possamos reproduzir.

o exemplo serve para isso, pois não temos o seu ambiente e nem os seus fontes pra saber o que fez

[rodrigoernandespaiva]

como pode olhar nos arquivos a rotina de configuração e de envio estão idênticas ao exemplo do mdfe, porém não funciona, o problema aconteceu a partir das 4 horas da tarde de anteontem e desde então não consigo mais testar...

 

toda vez que envio o mdfe tenho a exceção vazio.

 

Pode ajudar?

[BigWings]

31 minutos atrás, rodrigoernandespaiva disse:

toda vez que envio o mdfe tenho a exceção vazio.

Geralmente isso acontece quando há retorno do webservice, mas em um formato que não é o esperado pelo ACBr.

Minha sugestão é que configure o componente para gravar os arquivos de envio e retorno

ACBrMDFe1.Configuracoes.Geral.Salvar := True;

ACBrMDFe1.Configuracoes.WebServices.Salvar := True;

E analise os arquivos de retorno.

Suspeito que tenha a haver com a configuração de TLS 1.2.

[rodrigoernandespaiva]

Consegui descobrir o problema foi somente reiniciar o modem que funcionou