Jump to content

diadoacbr

NF-e inexistente para a chave de acesso


Artsio
Go to solution Solved by Artsio,
  • Este tópico foi criado há 1553 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

Olá,

Estou tentando fazer o download do xml, depois da manifestar. 

Só que quando manifesto já faço o download, mas dá que a chave é inexistente. 

webServices.DistribuicaoDFe.cUFAutor := 41;
webServices.DistribuicaoDFe.CNPJCPF := AdestCNPJ;
WebServices.DistribuicaoDFe.chNFe   := AchvNFe;
WebServices.DistribuicaoDFe.Executar;
FDomParser.XML := WebServices.DistribuicaoDFe.RetWS;

with WebServices.DistribuicaoDFe.retDistDFeInt do
  begin
  if cStat = 138 then
  begin
  for i := 0 to docZip.Count - 1 do
    begin
      if docZip.Items[i].schema = schprocNFe then //verifica se o arquivo é o XML da NFe (-nfe.xml)
      begin
        try
          XmlDocument := TXMLDocument.Create(nil);
          XML := docZip.Items[i].XML;
          ArqXML := TStringStream.Create(XML);
          XMLDocument.LoadFromStream(ArqXML);
          XMLDocument.Active;
          ArqNFe := ApathXML + docZip.Items[i].resNFe.chNFe + '-down-nfe.xml';
          XMLDocument.SaveToFile(ArqNFe);
        finally
          XMLDocument.Free;
        end;
      end;
    end;
    end
  end;

 

Edited by Insdo
Link to comment
Share on other sites

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

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
×
×
  • Create New...

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.