Salvar Xml De Evento Mdfe

[opennet]

Bom dia

 

Não encontrei no forum, gostaria de saber se é possível salvar o XML de evento de cancelamento e encerramento do MDFE ?

 

No aguardo

 

Obrigado

 

[Italo Giurizzato Junior]

Boa tarde Open Net,

 

Sim, o componente possui duas propriedades Salvar, uma esta em Geral e outra em Arquivos, basta atribuir o valor True a elas, alem disso existe a propriedade para determinar o path onde os eventos vão ser salvos.

[opennet]

Certo...vou tentar

 

Obrigado

[Wislei de Brito Fernandes]

Boa tarde Italo,

 

Quando salvamos o XML do evento de Cancelamento ou Encerramento com a propriedade ACBrMDFe.Configuracoes.Arquivos.SalvarEvento    := True;, é salvo também os XML 1-eve.xml e 1-ped-evento.xml.

 

É possível configurar alguma propriedade para não salvar estes dois arquivos e apenas o XML do próprio evento?

 

Atenciosamente.

[Italo Giurizzato Junior]

Boa noite Wislei,

 

Vamos estudar sobre o assunto.

[Wislei de Brito Fernandes]

Bom dia Ítalo,

 

Muito obrigado pela atenção, fico no aguardo!

 

Atenciosamente.

[Italo Giurizzato Junior]

Bom dia Wislei,

 

Você deve ter notado que temos no componente duas propriedades Salvar, uma em Geral e outra em Arquivos.

 

Os arquivos *-ped-evento.xml e *-eve.xml não serão salvos se ambas as propriedades receberem o valor False.

 

E temos também o SalvarEvento em Arquivos.

 

Fiz uma alteração no componente, para que o mesmo tenha o seguinte comportamento:

 

Se ACBrMDFe.Configuracoes.Geral.Salvar for True vai salvar os 3 arquivos (-ped-evento.xml, -eve.xml e -procEventoMDFe.xml);

 

Se ACBrMDFe.Configuracoes.Arquivos.Salvar for True vai salvar os 3 arquivos (-ped-evento.xml, -eve.xml e -procEventoMDFe.xml);

 

Se ACBrMDFe.Configuracoes.Arquivos.SalvarEvento for True vai salvar o arquivo (-procEventoMDFe.xml);

 

Sendo assim se a sua intenção é salvar apenas o -procEventoMDFe.xml a configuração é:

 

ACBrMDFe.Configuracoes.Geral.Salvar := False;

ACBrMDFe.Configuracoes.Arquivos.Salvar := False;

ACBrMDFe.Configuracoes.Arquivos.SalvarEvento := True;

 

Favor atualizar os fontes.

[Wislei de Brito Fernandes]

Bom dia Ítalo,

 

Funcionou 100 %

 

Muito obrigado pela correção e pela velocidade de resposta!

 

Atenciosamente.

[Wislei de Brito Fernandes]

Boa tarde Italo,

 

Após atualizar os componentes recentemente, os arquivos dos eventos de Encerramento e Cancelamento não estão sendo salvos mais.

 

Eu senti falta da instrução abaixo para salvar os arquivos no procedimento TratarResposta da unit ACBrMDFeWebServices.pas

if FConfiguracoes.Arquivos.SalvarEvento then
  FConfiguracoes.Geral.Save(NomeArq, wProc.Text, GerarPathEvento);

[Italo Giurizzato Junior]

Bom dia Wislei,

 

Atribua o valor True a Configuracoes.Geral.Salvar e tente novamente.

[Wislei de Brito Fernandes]

Bom dia Italo,

 

Atribuindo o valor True para a propriedade Configuracoes.Geral.Salvar, o XML dos eventos estão sendo salvos no mesmo diretório do XML do MDF-e e não no diretório configurado em ACBrMDFe.Configuracoes.Arquivos.PathEvento.

 

Além disso, está salvando os arquivos: 10-rec.xml, 10-env-lot.xml, 319000001873394-pro-rec.xml, 319000001873394-ped-rec.xml e 0-ped-eve.xml, conforme mencionei no meu primeiro poste deste tópico.

 

Adicionando o código abaixo, o XML do evento é salvo corretamente no diretório dos arquivos de evento configurado e os arquivos acima citados não são salvos, deixando somente a propriedade ACBrMDFe.Configuracoes.Arquivos.SalvarEvento := True;

 

Alteração na unit ACBrMDFeWebServices.pas

if FConfiguracoes.Arquivos.SalvarEvento then
  FConfiguracoes.Geral.Save(NomeArq, wProc.Text, GerarPathEvento);

Como estão minhas configurações para salvar os arquivos:

ACBrMDFe.Configuracoes.Geral.Salvar             := False;
ACBrMDFe.Configuracoes.Arquivos.Salvar          := False;
ACBrMDFe.Configuracoes.Arquivos.SalvarEvento    := True;

Segue a unit com a alteração que estou mencionando. 

ACBrMDFeWebServices.pas

[Italo Giurizzato Junior]

Wislei,

 

Muito obrigado pela colaboração, já esta disponível, favor atualizar os fontes.

[Wislei de Brito Fernandes]

Italo,

 

Ficou 100 %

 

Muito obrigado!

[Eber Alves Da Silva]

bom dia Italo, para salvar uma nfe utilizo o seguinte comando 

 

ACBrNFe1.NotasFiscais.Items[0].SaveToFile('');. 

 

 

e para salvar os xml do evento de uma CC por exemplo , existe algum comando para salvar os 3 arquivos com determinado nome,

igual a função para salvar xml das notas ?

 

pois os xml das notas eu salvo em banco , gostaria de salvar os xml dos eventos tambem

[Italo Giurizzato Junior]

Bom dia Eber,

 

Você esta postando em tópico errado, aqui estamos tratando sobre o evento de MDF-e e não NF-e.

[Eber Alves Da Silva]

ok Italo , a intenção era em Nfe, mesmo estou postando la

 

Obrigado

[francinaldoac]

Como faço para salvar o XML do MDF-e, pois tenho o arquivo de Lote, e o da consulta da situação do MDF-e?

 

Obrigado!

[Italo Giurizzato Junior]

Bom dia Francinaldo,

Simples, basta configurar o componente para salvar.

Configuracoes.Arquivos.Salvar := True;

[Miro Callai]

Em 27/05/2014 at 08:53, Italo Giurizzato Junior disse:

Sendo assim se a sua intenção é salvar apenas o -procEventoMDFe.xml a configuração é:

 

ACBrMDFe.Configuracoes.Geral.Salvar := False;

ACBrMDFe.Configuracoes.Arquivos.Salvar := False;

ACBrMDFe.Configuracoes.Arquivos.SalvarEvento := True;

 

Favor atualizar os fontes.

 

Bom dia Italo! 

Aqui não tenho essa Propriedade no Componente! 

ACBrMDFe.Configuracoes.Arquivos.SalvarEvento := True;

 

[Renato Rubinho]

Bom dia,

É só Salvar, não SalvarEvento.

Veja este tópico.

 

 

[Miro Callai]

18 minutos atrás, Renato Rubinho disse:

Bom dia,

É só Salvar, não SalvarEvento.

Veja este tópico.

 

 

 

Valeu Renato!!!!

Estudando o DEMO, tive dificuldades em entender por que lá o CheckBox "cbxSalvarArqs" que alimenta essa propriedade, está com o Caption "Salvar Arquivos em Pastas Separadas" 

Então achei que essa propriedade fazia como o Caption sugere, Separar os Arquivos em Pastas diferentes!

E obrigado Italo também, que já tinha Explicado tudo no outro Post 

[Renato Rubinho]

Obrigado por reportar.

Fechando. Para novas dúvidas, criar um novo tópico.