Imprimir Carta de Correção

[UEMERSON NEGREIRO DA SILVA]

Boa Tarde

Estou tendo dificuldade em fazer uma Carta de correção em Ambiente de Homologação..qual o procedimento ?

eu tentei fazer assim 

   ACBrNFe1.CartaCorrecao.CCe.Evento.Clear;

  ACBrNFe1.CartaCorrecao.CCe.idLote := StrToInt('1') ;

  with ACBrNFe1.CartaCorrecao.CCe.Evento.Add do

   begin

     infEvento.chNFe := Trim(EdtChaveNotaFiscal.Text);

    // infEvento.cOrgao := StrToInt(codOrgao);

     infEvento.CNPJ   := copy(EdtChaveNotaFiscal.Text,7,14);;;

     infEvento.dhEvento := now;

     infEvento.tpEvento := 110110;

     infEvento.nSeqEvento := StrToInt('1');

     infEvento.versaoEvento := '1.00';

     infEvento.detEvento.descEvento := 'Carta de Correção';

     infEvento.detEvento.xCorrecao := Correcao;

     infEvento.detEvento.xCondUso := ''; //Informar vazio, o componente vai colocar o texto correto

   end;

  ACBrNFe1.EnviarCartaCorrecao(StrToInt('1'));

  ACBrNFe1.ImprimirEventoPDF;  <<<<---- ERRO

 

Ele retorna esse erro 

ImprimirPDF não implementado em: TACBrNFeDANFeESCPOS.

 

O que devo fazer ?? 

 

 

 

[Juliomar Marchetti]

Exatamente a resposta certa!

para impressão ESCPOS não existe a impressão de evento

troque o componente para um TACBrNFeDANFeRL

[UEMERSON NEGREIRO DA SILVA]

Funcionou...

Muito Obrigado Juliomar Marchetti