Ir para conteúdo
  • Cadastre-se

dev botao

Desmembrar Xmls Vindos De Uma Consulta Por Período


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

Recommended Posts

Opa pessoal, tudo bom! Eu tava querendo implementar uma consulta das Notas Fiscais de Serviço por período, e quando vem o XML gerado vem apenas 1 XML, com todas as notas incluídas. Eu conseguiria desmembrar esses XMLs para salvar os arquivos no PC do cliente, 1 XML pra cada nota? Ou eu teria de tentar desmembrar de outra maneira lendo o arquivo? Sou meio iniciante no Delphi e nãop consegui achar nada relacionado.

 

Até a próxima!

Link para o comentário
Compartilhar em outros sites

  • Consultores

Bom dia Rodrigo,

 

O componente ACBrNFSe já realiza essa operação de gerar um XML para cada NFSe retornada através da consulta por periodo.

Consultor SAC ACBr

Italo Giurizzato Junior
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

Analista de Sistemas / Araraquara-SP

Araraquara - A era dos Trólebus

Link para o comentário
Compartilhar em outros sites

Opa Italo, tudo bom!

 

É que quando eu tentava contar as notas pelo componente só retornava 1 nota. Eu usei o seguinte código:

 

ACBrNFSe1.ConsultarNFSe(cnpjEmpresa, inscMunEmpresa, EditDataInicial.Date, EditDataFinal.Date);

ACBrNFSe1.NotasFiscais.Count; //para mostrar o número de notas

 

Não sei se eu estava fazendo corretamente. Eu quero criar um loop para salvar cada nota em arquivos separados.

 

Até a próxima!

Link para o comentário
Compartilhar em outros sites

Eu consegui chegar em cada nota importada, mas o XML de cada uma está vindo em branco. O código que utilizei:

 

S:=TStringList.Create;
    with ACBrNFSe1.WebServices.ConsNfse.NFSeRetorno do
    begin
      for I:=0 to ListaNfse.CompNfse.Count-1 do
      begin
        S.Text:=ListaNfse.CompNfse.Items.Nfse.XML;
        S.SaveToFile(PathWithDelim(EditPathSalvar.Text)+ ListaNfse.CompNfse.Items.Nfse.Numero+'-NFSe.xml');
      end;
    end;
    S.Free;

Editado por rodrigoflausino
Link para o comentário
Compartilhar em outros sites

  • Consultores

Boa tarde Rodrigo,

 

Ao realizar a consulta conforme exposto por você, o componente salva um arquivo chamado <datainicial><datafinal>-lista-nfse.xml na pasta "Ger".

 

E salva cada nota retornada nessa consulta separadamente com o seguinte nome: <numero>-nfse.xml na pasta "NFSe".

  • Curtir 1
Consultor SAC ACBr

Italo Giurizzato Junior
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

Analista de Sistemas / Araraquara-SP

Araraquara - A era dos Trólebus

Link para o comentário
Compartilhar em outros sites

  • 3 meses depois ...
italojjr,

Boa tarde Rodrigo,

 

Ao realizar a consulta conforme exposto por você, o componente salva um arquivo chamado <datainicial><datafinal>-lista-nfse.xml na pasta "Ger".

 

E salva cada nota retornada nessa consulta separadamente com o seguinte nome: <numero>-nfse.xml na pasta "NFSe".

 

Como o componente faz o loop de gravação dos arquivos das nfs-e internamente, como eu poderia atualizar o número da nfs-e no meu banco de dados?

Link para o comentário
Compartilhar em outros sites

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

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar Agora
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.