Painel de líderes

O Juliomar havia lhe pedido para postar o código, mas pelo que você escreveu já deu para ver que está fazendo errado, o correto é: with ACBrPAF.PAF_R.RegistroR01.New do begin ...dados do r01 with RegistroR02.New do begin ...reduções Z do ECF informado em RegistroR01 with RegistroR03.New do begin ... detalhes da reduções Z informada anteriormente end; end; with RegistroR04.New do begin .. cupons fiscais do ECF informado em RegistroR01 with RegistroR05.new do begin ... Detalhes do cupom fiscal informado anteriormente end; with RegistroR07.new do begin ... Meios de pagamento do cupom informado anteriormente end; end; with RegistroR06.New do begin ... Comprovantes não fiscais do ECF informado em RegistroR01 with RegistroR07.new do begin ... meio de pagamento informado no cupom anterior end; end; end;

Algumas dicas com relação a alimentação do componente: Dica 1: if ACBrNFe.Configuracoes.Geral.ModeloDF = moNFe then begin infNFe.Versao := 2; Ide.modelo := 55; // TpcnConsumidorFinal = (cfNao, cfConsumidorFinal); Ide.indFinal := cfNao; // TpcnPresencaComprador = (pcNao, pcPresencial, pcInternet, pcTeleatendimento, pcOutros); Ide.indPres := pcOutros; Ide.dEmi := StrToDate(edtEmissao.Text); Ide.dSaiEnt := StrToDate(edtSaida.Text); Ide.hSaiEnt := StrToTime(edtHora.Text); end else begin infNFe.Versao := 3; Ide.modelo := 65; Ide.indFinal := cfConsumidorFinal; Ide.indPres := pcPresencial; Ide.dEmi := Now; end; Dica 2: if DMNFCe.NFe.Configuracoes.Geral.ModeloDF = moNFe then Ide.tpImp := tiRetrato else Ide.tpImp := tiNFCe;