Download XML da nfe

[einocencio]

Boa tarde.

 

Apos atualizar o componente comecei a receber os xmls inválidos como oque segue em anexo.

 

Alguém tem alguma ideia do que pode estar ocorrendo?

 

obrigado

41150200328924000111550010033244691658309456.xml

Editado 27 Fevereiro, 2015 por einocencio

[Italo Giurizzato Junior]

Boa tarde,

 

O problema é que antes o componente removia os acentos das vogais e trocava o cedilha por C que conta-se nos retornos e ao ler os XML.

 

Se você abrir o XML que você postou com o bloco de notas e procurar por cedilha e vogais acentuadas e fazer as trocas, vai conseguir visualiza-lo sem nenhum problema com um navegador.

[aloisiofs]

Amigos, estou no desespero de baixar alguns xml para confirmar, faturamento, tive perda de dados. Voces

conseguiram finalizar os testes aqui mencionados.

[Lazaro Pavao]

Bom dia 

 

Download do xml da NFe de terceiro depois de manisfestado esta dando erro pcnRetDownloadNFe

 

          try

            try

              // XML da NF-e

              StrAux := RetornarConteudoEntre(Leitor.Grupo, '<NFeZip>', '</NFeZip');

              StrDecod := DecodeBase64(StrAux);

              StrStream.WriteString(StrDecod);

              FretNFe.Items.FNFeZip := UnZipMsg(StrStream);

 

              // XML do Protocolo da NF-e

              StrAux := RetornarConteudoEntre(Leitor.Grupo, '<protNFeZip>', '</protNFeZip');

              StrDecod := DecodeBase64(StrAux);

              StrStream.WriteString(StrDecod);

              FretNFe.Items.FProtNFeZip := UnZipMsg(StrStream);

            except

              on e : Exception do

              begin

                Raise Exception.Create(e.message);

              end;

            end;

          finally

            FreeAndNil(StrStream);

          end;

 

 

Comentando estas linhas desse try

 

              // XML do Protocolo da NF-e

//              StrAux := RetornarConteudoEntre(Leitor.Grupo, '<protNFeZip>', '</protNFeZip');

//              StrDecod := DecodeBase64(StrAux);

//              StrStream.WriteString(StrDecod);

//              FretNFe.Items.FProtNFeZip := UnZipMsg(StrStream);

 

funciona perfeitamente o download.

Editado 4 Março, 2015 por Lazaro Pavao

[Italo Giurizzato Junior]

Bom dia Lazaro,

 

Erro de compilação ou execução?

 

Todos os fontes de todas as pastas estão atualizados?

[Gandalf]

Bom dia Italo,

 

eu creio que estou com o mesmo problema do colega aí de cima. Não consigo abrir o xml no navegador. Também não encontrei nenhum "ç" ou caracter acentuado. Estou postando o arquivo aqui.

Poderias dar uma luz.

 

Desde já agradeço

 

Társis Francke Ferreira

18589-000-CLAUDIO ALVES & CIA LTDA ME-nfe.xml

[Tiago Ravache]

Olá notei que aqui ele aponta como erro logo após o caractere &, percorrendo na internet indicações de que esse caractere pode dar problemas de formatação incorreta.

 

 

Alterei o & na tag xNome para "e" e aqui abriu normalmente.

 

Espero que te ajude

[Gandalf]

Olá Tiago,

 

realmente, tirando o "&" o arquivo passou a abrir normalmente.

Eu vi o Italo postando que antes o componente tirava as letras acentuadas e os caracteres inválidos do XML que ele baixava e, aparentemente, agora não faz mais.

Tu saberias como contornar isso?

 

Desde já agradeço muito, porque agora, pelo menos, já sei onde está pegando.

 

Abraço!

[Tiago Ravache]

Aqui deixo ACBrNFe.Configuracoes.Geral.RetirarAcentos := True; tbm pode marcar pelo object inspector

[Gandalf]

Essa propriedade também vai se encarregar de mudar o "&" para o "E" na hora de importar o XML?

[Tiago Ravache]

Não te dou a certeza, o pessoal que desenvolve mais efetivamente o componente pode confirmar melhor mas, desde sempre trabalho com essa propriedade como true e até hj nunca tive esse tipo de problema

[Gandalf]

Valeu Tiago!

[rrodrigoffernandes]

Olá amigos, estou retomando novamente esse tópico devido a problemas no arquivo XML que foi feito download após o manifesto, o problema havia sido resolvido e voltou a acontecer novamente, percebi que o XML está vindo malformado, com tags a mais desnecessárias, já atualizei meu acbr e não resolveu, em anexo estou colocando o XML com o problema. Vale ressaltar que esse problema não acontece com todos os downloads que meu cliente efetua, acontece apenas em alguns.

 

estou utilizando o seguinte comando para efetuar o download:

 

ACBRNFe.WebServices.DownloadNFe.Executar;

 

 

MASTER ATS SUPERMERCADOS LTDA - NF 12711 - 01-04.xml

[Italo Giurizzato Junior]

Boa tarde Rodrigo,

 

Quais são as TAGs desnecessárias no XML que você anexou?

 

Outra coisa, em vez de você utilizar o método Download, porque não utiliza o DistribuicaoDFe?

 

Ele também retorna o XML completo de uma nota quando esta já tenha sido manifestada, com uma vantagem, ser você manifestou 5 notas o DistribuicaoDFe retorna todas elas.

[rrodrigoffernandes]

Ok Italo, vou pesquisar sobre essa DistribuicaoDFe, pra mim é novo, eu não conhecia.

Vou pesquisar exemplos, qualquer dúvida peço ajuda. 

Sobre as tags que estão vindo a mais no XML que postei eu não sei ao certo quais são, pois não consegui arrumar ele manualmente para descobrir.

[carlosmarian]

Olá,

   Ao efetuar o Download(ACBrNFe1.Download) da nota o XML que é extraído do ZIP contém o seguinte texto em algumas tags:  

<infAdProd>Resolu褯 do Senado Federal nڠ13/12,  No da FCI 9c895984-567d-4ef8-ba87-620da116c63b,  Contede Importa褯 50 %</infAdProd> 

  O XML tem caracteres especiais no texto.

 

  Desta forma ao tentar ler este XML em um outro momento(ACBrNFe1.NotasFiscais.LoadFromFile), a rotina não esta conseguindo ler o arquivo e carregar o "TStringList"(ArquivoXML):  

function TNotasFiscais.LoadFromFile(CaminhoArquivo: String; AGerarNFe: Boolean = True): Boolean;
...
ArquivoXML := TStringList.Create;
    try
      ArquivoXML.LoadFromFile(CaminhoArquivo {$IFDEF DELPHI2009_UP}, TEncoding.UTF8{$ENDIF});
...

  A variável "ArquivoXML.Text" esta vazia.

 

  Alguém já passou por um caso similar?

 

No aguardo.
Obrigado.

[carlosmarian]

Encontrei uma forma de contornar meu problema relatado acima.

Passei a ler o arquivo xml por um "FileStream", que depois converto para String;

Desta forma estou usando o NotasFiscais.LoadFromString, passando com parâmetro o String convertido.

 

At+

[Guilherme Verardi]

Bom dia, 

 

  Também estou com o mesmo problema do colega rrodrigoffernandes. Estou utilizando o comando "ACBRNFe.WebServices.DownloadNFe.Executar;", e também estou recebendo XML's inválidos.

 

  Dei uma analisada, e descobri que no fim do arquivo, entre o fim da tag <NFe> e o início da tag <protNFe> o XML está com este valor : "<?xml version="1.0" encoding="utf-8"?>" (que geralmente está no início dos arquivos XML). Após remover este conteúdo, o XML passa a ser válido.

 

  A dúvida é, tenho que tratar isso no meu código, ou seria algum problema no método do Download?

[Guilherme Verardi]

Encontrei o possível problema. Dentro do arquivo "pcnRetDownloadNFe.pas", no método "LerXml", existem 3 linhas com um comentário indicando "(*JR12 *)". Alterei removendo o conteúdo " '<'+ENCODING_UTF8+'>' " que havia alimentando a variável, e o download começou a salvar o XML correto. 

 

Segue em anexo o arquivo, para quem quiser testar.

 

pcnRetDownloadNFe.pas

[Italo Giurizzato Junior]

Bom dia Guilherme,

 

Se possível post como anexo o XML salvo agora de forma correta, com as alterações que você fez.

[Guilherme Verardi]

Boa tarde,

 

  Fui gerar o XML e notei que o ocorreu o erro novamente, mesmo com a alteração. Então, após uma nova análise, descobri que no momento de buscar o conteúdo dentro da tag <protNFeZip>  e descompactar, ele acaba recebendo o valor "<?xml version="1.0" encoding="utf-8"?>" antes da tag <protNFe>. Em Anexo os 2 XML's, com o código original e o código alterado.

 

 Abaixo o código onde a operação é realizada.

 

Antes:

          // XML do Protocolo da NF-e
          StrStream := TStringStream.Create('');
          try
            try
              StrAux := RetornarConteudoEntre(Leitor.Grupo, '<protNFeZip>', '</protNFeZip');
              StrDecod := DecodeBase64(StrAux);
              StrStream.WriteString(StrDecod);
              FretNFe.Items[i].FProtNFeZip := UnZipMsg(StrStream);
            except
              on e : Exception do
              begin
                Raise Exception.Create(e.message);
              end;
            end;
          finally
            FreeAndNil(StrStream);
          end;

Depois (Apenas um modo de solucionar o problema. Talvez vocês saibam uma maneira melhor de fazer isso):

          // XML do Protocolo da NF-e
          StrStream := TStringStream.Create('');
          try
            try
              StrAux := RetornarConteudoEntre(Leitor.Grupo, '<protNFeZip>', '</protNFeZip');
              StrDecod := DecodeBase64(StrAux);
              StrStream.WriteString(StrDecod);
              FretNFe.Items[i].FProtNFeZip := UnZipMsg(StrStream);
              FretNFe.Items[i].FProtNFeZip := '<protNFe' + RetornarConteudoEntre(FretNFe.Items[i].FProtNFeZip, '<protNFe', '</protNFe>') + '</protNFe>';
            except
              on e : Exception do
              begin
                Raise Exception.Create(e.message);
              end;
            end;
          finally
            FreeAndNil(StrStream);
          end;

Antes_43150502656032000175550010000011931000011934-nfe.xml

Depois_43150502656032000175550010000011931000011934-nfe.xml

Antes_43150502656032000175550010000011931000011934-nfe.xml

Depois_43150502656032000175550010000011931000011934-nfe.xml

[Italo Giurizzato Junior]

Boa tarde Guilherme,

 

Por favor atualize os fontes e teste novamente.

[Guilherme Verardi]

Boa tarde,

 

  Atualizei os fontes, e está funcionando corretamente agora. Porém, notei que você também comentou onde era incluso a variável "ENCODING_UTF8", que foi o que indiquei como problema no primeiro comentário. Isso não causa problemas, mas você pode descomentar estas variáveis, pois só aquele tratamento para recortar o conteúdo dentro da tag <protNFe> já resolve tudo.

[fsacchet]

Bom dia, está funcionando o download do XML ?

[Juliomar Marchetti]

17 minutos atrás, fsacchet disse:

Bom dia, está funcionando o download do XML ?

Testou? abriu o demo e rodou suas configurações?