Inovatechi Sistemas

Membros

Community Answers

Inovatechi Sistemas's post in Impressão Cancelamento NFE was marked as the answer 23 Junho, 2019

Verifica se ajuda:
//Configurando componente de impressão ACBrNFeDANFeRL1.ACBrNFe := ACBrNFe1; ///.... //Imprimindo Danfe ACBrNFe1.NotasFiscais.Clear; ACBrNFe1.NotasFiscais.LoadFromFile(PathNFe + FormatDateTime('YYYYMM', DataEmissao)+'\'+ChaveAcesso+'-nfe.xml',False); ACBrNFe1.NotasFiscais.Imprimir; //Imprimindo Evento de Cancelamento if NotaCancelada then begin ACBrNFe1.NotasFiscais.LoadFromFile(PathNFe + FormatDateTime('YYYYMM', DataEmissao)+'\Cancelamentos\'+'110111'+ChaveAcesso+'01-procEventoNFe.xml',False); ACBrNFe1.EventoNFe.Evento.Clear; ACBrNFe1.EventoNFe.LerXML(PathNFe + FormatDateTime('YYYYMM', DataEmissao)+'\Cancelamentos\'+'110111'+ChaveAcesso+'01-procEventoNFe.xml') ; ACBrNFe1.DANFE.PathPDF := PathNFe + FormatDateTime('YYYYMM', DataEmissao)+'\'; ACBrNFe1.ImprimirEvento; end;