Recuperar XML de CCe

[Valdir Dill]

Boa tarde,

Não sei se é possível fazer o que eu preciso, mas vou relatar a situação e, quem puder, me ajude, por favor.
Analisei alguns posts aqui que falam sobre essa questão, mas nenhum traz esclarecimentos completos.

É o seguinte: o que eu preciso é recuperar (fazer donwload) de um arquivo de uma CCe enviada pelo meu sistema.
Sim, quando se envia o evento, dá para já salvar o arquivo. O sistema faz isso. Mas volta e meia aparece um usuário que perde esse arquivo e precisa recuperar depois. 

Tentei fazer assim:

procedure RecuperaXMLCCe(VChaveNFe : String);
Var
 I : Integer;
begin
 ACBrNFe1.NotasFiscais.Clear;
 ACBrNFe1.NotasFiscais.LoadFromFile('C:\XMLs\' + VChaveNFe +'-NFe.xml');
 ACBrNFe1.Consultar;

 for I := 0 to ACBrNFe1.WebServices.Consulta.procEventoNFe.Count-1 do
  if DMCompon.ACBrNFeCuringa.WebServices.Consulta.procEventoNFe.Items.RetEventoNFe.InfEvento.tpEvento = teCCe then
   begin
    ACBrNFe1.NotasFiscais.LoadFromString(ACBrNFe1.WebServices.Consulta.procEventoNFe.Items.RetEventoNFe.XML);
    ACBrNFe1.NotasFiscais.GravarXML('C:\XMLs\CCe_' + I.ToString + '.xml');
   end;
end;

Essa rotina acima até gera um XML (estou enviando em anexo) com algumas informações da nota. Mas não é um XML de CCe. 

Alguma dica?

Obrigado!   

CCe_1.xml

[Italo Giurizzato Junior]

Boa tarde Valdir,

Esse XML nada mais é do que o XML da NF-e.

Me diz uma coisa ao carregar o XML da NF-e e executar o método Consultar, não foi salvo um XML chamado: *-NFeDFe.xml ?

Se sim, você poderia anexa-lo?

[Valdir Dill]

6 minutos atrás, Italo Jurisato Junior disse:

Boa tarde Valdir,

Esse XML nada mais é do que o XML da NF-e.

Me diz uma coisa ao carregar o XML da NF-e e executar o método Consultar, não foi salvo um XML chamado: *-NFeDFe.xml ?

Se sim, você poderia anexa-lo?

Boa tarde Italo,

Sim, gerou. Envio em anexo.

Obrigado!

41180205520100000162550010000025351942580032-NFeDFe.xml

[Italo Giurizzato Junior]

Valdir,

Abra esse arquivo através de um navegador, note que nele consta o XML da NF-e e no final temos um grupo chamado <procEventoNFe> e dentro deste outros dois grupos também chamados <procEventoNFe>.

Esses 2 grupos cada um você vai notar que se refere as 2 cartas de correções que foram enviadas para essa nota.

Infelizmente ainda o componente não extrai desse XML os eventos e salva-os separadamente, mas através de um editor de texto você consegue extrair, ou você pode tentar escrever uma rotina que faça isso.