Ir para conteúdo
  • Cadastre-se

dev botao

Impressão De Carta De Correção


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

Recommended Posts

pode deixar silvasoares resolvendo posto aqui 

Agora estou com outra duvida fui ate o acbr demo e o meu erro continua a dar porem quando uso debug vejo que o xml e carregado porem não retorna nada nos campos, e obs: notem que cometei o cOrgao por isso não deu erro nele rsrsr.

olhem e veja quem pode me ajudar, e sera que estou no caminho certo ou não tem nada haver isso... 

desde já obrigado.

imagem2.jpg

imagem1.jpg

Link para o comentário
Compartilhar em outros sites

Fiz uns teste e inserir o codigo (FieldByName('cOrgao').AsInteger := 31;//InfEvento.cOrgao;) ai sim imprimiu, mas sem os dados da carta de correção, na verdade não esta lendo o xml .

caminho do xml 'Desktop\1101103117042473781500011655001000000105100000105401-procEventoNFe.xml'

Evento que leio o Xml:

    ACBrNFeDANFEFR1.MostrarPreview := True;

    ACBrNFe1.NotasFiscais.Clear;
    ACBrNFe1.NotasFiscais.LoadFromString(OpenDialog1.FileName); //<XML Nota Eletrônica>

    ACBrNFe1.EventoNFe.Evento.Clear;
    ACBrNFe1.EventoNFe.LerXMLFromString(OpenDialog1.FileName); //<XML Evento>
    ACBrNFeDANFEFR1.FastFileEvento := 'C:\VEEV\server\danfe\EVENTOS.fr3';

    ACBrNFe1.ImprimirEvento;

 

o que posso esta fazendo de errado?

Obrigado!

 

Link para o comentário
Compartilhar em outros sites

sumiu erro "Campo cOrgao não informado."  

usei o seguinte código e tudo certo 

  OpenDialog1.Title := 'Selecione o Evento';
  OpenDialog1.DefaultExt := '*.XML';
  OpenDialog1.Filter := 'Arquivos XML (*.XML)|*.XML|Todos os Arquivos (*.*)|*.*';
  OpenDialog1.InitialDir := ACBrNFe1.Configuracoes.Arquivos.PathSalvar;
  if OpenDialog1.Execute then
  begin
    //ACBrNFeDANFeRL1.MostrarPreview := True;
    ACBrNFeDANFEFR1.FastFileEvento := 'C:\VEEV\server\danfe\EVENTOS.fr3';
    ACBrNFe1.EventoNFe.Evento.Clear;
    ACBrNFe1.EventoNFe.LerXML(OpenDialog1.FileName) ;
    ACBrNFe1.ImprimirEvento;
  end;

Silvasoares o meu erro sumiu com esse código ai, se precisar de ajuda só falar! 

e obrigado a todos! valeu!

 

Link para o comentário
Compartilhar em outros sites

2 minutos atrás, Thiago Cocati disse:

sumiu erro "Campo cOrgao não informado."  

usei o seguinte código e tudo certo 


  OpenDialog1.Title := 'Selecione o Evento';
  OpenDialog1.DefaultExt := '*.XML';
  OpenDialog1.Filter := 'Arquivos XML (*.XML)|*.XML|Todos os Arquivos (*.*)|*.*';
  OpenDialog1.InitialDir := ACBrNFe1.Configuracoes.Arquivos.PathSalvar;
  if OpenDialog1.Execute then
  begin
    //ACBrNFeDANFeRL1.MostrarPreview := True;
    ACBrNFeDANFEFR1.FastFileEvento := 'C:\VEEV\server\danfe\EVENTOS.fr3';
    ACBrNFe1.EventoNFe.Evento.Clear;
    ACBrNFe1.EventoNFe.LerXML(OpenDialog1.FileName) ;
    ACBrNFe1.ImprimirEvento;
  end;

Silvasoares o meu erro sumiu com esse código ai, se precisar de ajuda só falar! 

e obrigado a todos! valeu!

 

Obrigado, Thiago!, vou tentar.

Link para o comentário
Compartilhar em outros sites

  • 3 meses depois ...
Em 31/10/2015 at 15:43, silvasoares disse:

Obrigado, Sérgio pelo help, mas eu até encontro o retorno do evento, o problema é que vem em 2 arquivo(125-eve.xml e 0-ped-eve.xml e na hora de imprimir a Carta de Correção

não aparecem os campos: o status, protocolo e data/hora do registro

(estou usando o Fortes, não sei se tem algum erro, enfim)

 

Você conseguiu resolver o seu problema? Estou com o mesmo problema e não estou conseguindo resolver.

Em 06/04/2017 at 14:52, silvasoares disse:

Obrigado, Thiago!, vou tentar.

Estou usando o Fortes reports também, você conseguiu resolver?

Link para o comentário
Compartilhar em outros sites

34 minutos atrás, Adjeryan disse:

Você conseguiu resolver o seu problema? Estou com o mesmo problema e não estou conseguindo resolver.

Estou usando o Fortes reports também, você conseguiu resolver?

Infelizmente, não. Criei por fora uma carta de correção para "quebrar o galho" e imprimir, mas não ficou o ideal. 

Link para o comentário
Compartilhar em outros sites

Conseguir resolver meu problema extraindo o XML com o método a seguir: XMLCCe := ACBrNFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.XML;
Antes de imprimir usei:
ACBrNFe1.NotasFiscais.Clear;
ACBrNFe1.NotasFiscais.LoadFromFile(xml da NFe);

ACBrNFe1.EventoNFe.Evento.Clear;
ACBrNFe1.EventoNFe.LerXMLFromString( XMLCCe );

Funcionou direitinho.

Link para o comentário
Compartilhar em outros sites

  • Este tópico foi criado há 2437 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.