ERRO CARTA DE CORREÇÃO

[Professor]

Estava fazendo uma carta de correção, mas está aparecendo a mensagem abaixo(imagem).
Mas na programação está sendo lançado corretamente.

    infEvento.cOrgao   := 35;
    infEvento.CNPJ     := CNPJ;
    infevento.chCTe    := Chave;
    infEvento.dhEvento := now;
    infEvento.tpEvento := teCCe;
    infEvento.nSeqEvento := II;
    infEvento.detEvento.descEvento := 'Carta de Correcao';
 

[Italo Giurizzato Junior]

Boa tarde,

Esse erro ocorre no momento de imprimir a CC-e, correto?

Neste caso, além de carregar o XML do evento, você carregou o XML do CT-e também antes de realizar a impressão do evento?

[Professor]

17 horas atrás, Italo Jurisato Junior disse:

Boa tarde,

Esse erro ocorre no momento de imprimir a CC-e, correto?

Neste caso, além de carregar o XML do evento, você carregou o XML do CT-e também antes de realizar a impressão do evento?

Bom dia!
Esse erro ocorre no momento de imprimir a CC-e, correto? Correto.

Neste caso, além de carregar o XML do evento, você carregou o XML do CT-e também antes de realizar a impressão do evento: Utilizei os comandos abaixo:

  ACBrCTe1.EventoCTe.GerarXML;
  ACBrCTe1.EventoCTe.Gerador.SalvarArquivo(edtPathLogs.text+ '\' + ACBrCTe1.EventoCTe.Evento.Items[0].InfEvento.chCTe +  ACBrCTe1.EventoCTe.Evento.Items[0].InfEvento.TipoEvento +IntToStr(ACBrCTe1.EventoCTe.Evento.Items[0].InfEvento.nSeqEvento) +'-procEventoCTe.xml');

  v_xmlevento:=edtPathLogs.Text +'\'+edtEmitFantasia.Text+'\EVENTOS\'; + ACBrCTe1.EventoCTe.Evento.Items[0].InfEvento.chCTe +  ACBrCTe1.EventoCTe.Evento.Items[0].InfEvento.TipoEvento +IntToStr(ACBrCTe1.EventoCTe.Evento.Items[0].InfEvento.nSeqEvento) +'-procEventoCTe.xml';
+IntToStr(ACBrCTe1.EventoCTe.Evento.Items[0].InfEvento.nSeqEvento) +'-procEventoCTe.xml';
  ACBrCTe1.EventoCTe.LerXML(v_xmlevento);

  ACBrCTe1.ImprimirEvento;
 

 

 

[Italo Giurizzato Junior]

Boa tarde,

Vamos simplificar:

     // Carrega no Componente o CTe salvo em Arquivo XML
     ACBrCTe1.Conhecimentos.Clear;
     ACBrCTe1.Conhecimentos.LoadFromFile(NomeXML_CTe);

 

     // Carrega no Componente o Evento salvo em Arquivo XML

     ACBrCTe1.EventoCTe.Evento.Clear;
     ACBrCTe1.EventoCTe.LerXML(NomeXML_Evento);

 

     // Imprime o Evento

     ACBrCTe1.ImprimirEvento;
 

[Professor]

17 minutos atrás, Italo Jurisato Junior disse:

Boa tarde,

Vamos simplificar:

     // Carrega no Componente o CTe salvo em Arquivo XML
     ACBrCTe1.Conhecimentos.Clear;
     ACBrCTe1.Conhecimentos.LoadFromFile(NomeXML_CTe);

 

     // Carrega no Componente o Evento salvo em Arquivo XML

     ACBrCTe1.EventoCTe.Evento.Clear;
     ACBrCTe1.EventoCTe.LerXML(NomeXML_Evento);

 

     // Imprime o Evento

     ACBrCTe1.ImprimirEvento;
 

Ok Italo!
Vou verificar!
Só mais uma questão:

As linhas abaixo, para enviar a carta de correção , estão corretas?

     ACBrCTE1.EnviarEvento(1);
     MemoResp.Lines.Text := ACBrCTE1.WebServices.EnvEvento.RetWS;
     LoadXML(ACBrCTE1.WebServices.EnvEvento.RetWS,WBResposta);
 

[Italo Giurizzato Junior]

A carta de correção é um evento.

Após alimentar corretamente o componente basta executar o método de envio de evento que no caso é: ACBrCTe1.EnviarEvento(1);

As outras 2 linhas simplesmente pega o retorno.

 

[Professor]

Obrigado Italo!

 

 

[Professor]

17 horas atrás, Italo Jurisato Junior disse:

A carta de correção é um evento.

Após alimentar corretamente o componente basta executar o método de envio de evento que no caso é: ACBrCTe1.EnviarEvento(1);

As outras 2 linhas simplesmente pega o retorno.

 

Deu certo Italo! 
Obrigado!

Só um detalhe: apareceram 2 impressões. A 1ª saiu tudo certo  com todos os campos preenchido, mas a 2ª saiu faltando conteúdo.  Utilizo os comandos abaixo. Pode ser por conta do PDF?

  ACBrCTe1.ImprimirEvento;

  ACBrCTe1.ImprimirEventoPDF;

[Italo Giurizzato Junior]

Boa tarde,

O método ImprimirEventoPDF apenas gerar o PDF não imprimi nada no papel.

Esse método esta sendo executado logo em seguida ao ImprimirEvento?

Não esta sendo ADD nada entre a execução de um e do outro?

[Professor]

Em 16/03/2018 at 14:33, Italo Jurisato Junior disse:

Boa tarde,

O método ImprimirEventoPDF apenas gerar o PDF não imprimi nada no papel.

Esse método esta sendo executado logo em seguida ao ImprimirEvento?

Não esta sendo ADD nada entre a execução de um e do outro?

Obrigado Italo!
deu certo!