Política de Envio da NFe

[FABRICIO CERAVOLO PENA]

Boa tarde,

uma das mais importantes perguntas minhas e decisivas para o uso correto do ACBr.

Ao se enviar uma nfe, com este codigo

  ACBrNFe1.NotasFiscais.Clear;

  ACBrNFe1.Configuracoes.Geral.ModeloDF := moNFe;
  ACBrNFe1.Configuracoes.Geral.VersaoDF :=  TpcnVersaoDF(cbVersaoDF.ItemIndex)

  GerarNFe(NUMERONF);
  ACBrNFe1.NotasFiscais.GerarNFe;
  ACBrNFe1.NotasFiscais.Assinar;
  try   
     ACBrNFe1.Enviar(1,True);    //aki oh que cria na tabela nfeid

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

except

    trataErros();

end;

Preciso que se não conseguir passar da função ACBrNFe1.Enviar(1,True); não execute o código embaixo do comando. Não entendo , achei que se desse errado a função Enviar, iria direto para o trataErros. Ou então ele envia a Nota mas não chega o Retorno então eu não tenho como gravar os dados do Protocolo pois a variavel vem em branco. 

Como resolvo o problema de que Envia a nota mas não traz nada de retorno ? Alguém sabe como tratar melhor este problema ?

 

[André Ferreira de Moraes]

O Exception ocorrerá quando houver algum erro na transmissão. Se vc enviar uma nota com dados inválidos, ela é transmitida normalmente, mas não é autoriza, então não cairá no Except.

Se vc está emitindo NFCe, o envio é Sincrono, então as respostas estarão nas propriedades abaixo:

ACBrNFe1.WebServices.Enviar.TpAmb;
ACBrNFe1.WebServices.Enviar.verAplic;
ACBrNFe1.WebServices.Enviar.cStat;
ACBrNFe1.WebServices.Enviar.xMotivo;  
ACBrNFe1.WebServices.Enviar.cUF;
ACBrNFe1.WebServices.Enviar.Recibo;
ACBrNFe1.WebServices.Enviar.TMed;
ACBrNFe1.WebServices.Enviar.RetWS;