Impressão da nota de serviços componente novo ACBRNFSeX

[Antonio Paulo Mangili]

estou com um problema para imprimir a NFSe componente novo.

quando solicito para emitir uma nota nova, ele sai certinho com todos os dados.

mas quando solicito uma nova impressão no botão btnImprimir ele não imprime a razão social do prestador do serviço.

vou anexar um XML aqui para teste. lembrando que estou usando o programa exemplo.

e nesse processo:

          OpenDialog1.Title      := 'Selecione a NFSe';
          OpenDialog1.DefaultExt := '*-NFSe.xml';
          OpenDialog1.Filter     :='Arquivos NFSe (*-NFSe.xml)|*-NFSe.xml|Arquivos XML (*.xml)|*.xml|Todos os Arquivos (*.*)|*.*';
          OpenDialog1.InitialDir := ACBrNFSeX1.Configuracoes.Arquivos.PathGer;

          if OpenDialog1.Execute then
          begin
               ACBrNFSeX1.NotasFiscais.Clear;

               // LoadFromFile - Usado para carregar o Xml de apenas uma nota
               ACBrNFSeX1.NotasFiscais.LoadFromFile(OpenDialog1.FileName, False);

               // LoadFromLoteNfse - Usado para carregar um lote de notas
               // ACBrNFSeX1.NotasFiscais.LoadFromLoteNfse(OpenDialog1.FileName);

               ACBrNFSeXDANFSeRL1.Usuario := CdsUsuUSUARIO.AsString;

               ACBrNFSeX1.NotasFiscais.Imprimir;
     //          ACBrNFSeX1.NotasFiscais.ImprimirPDF;

               if ACBrNFSeX1.NotasFiscais.Items[0].NomeArqRps <> '' then
                  memoLog.Lines.Add('Arquivo Carregado de: ' + ACBrNFSeX1.NotasFiscais.Items[0].NomeArqRps)
               else
                   memoLog.Lines.Add('Arquivo Carregado de: ' + ACBrNFSeX1.NotasFiscais.Items[0].NomeArq);

               memoLog.Lines.Add('Nota Numero..........: ' + ACBrNFSeX1.NotasFiscais.Items[0].NFSe.Numero);
               memoLog.Lines.Add('Código de Verificação: ' + ACBrNFSeX1.NotasFiscais.Items[0].NFSe.CodigoVerificacao);
               memoLog.Lines.Add('Data de Emissão......: ' + DateToStr(ACBrNFSeX1.NotasFiscais.Items[0].NFSe.DataEmissao));
               memoLog.Lines.Add('Prestador............: ' + ACBrNFSeX1.NotasFiscais.Items[0].NFSe.Prestador.RazaoSocial);
               memoLog.Lines.Add('Tomador..............: ' + ACBrNFSeX1.NotasFiscais.Items[0].NFSe.Tomador.RazaoSocial);

               if ACBrNFSeX1.NotasFiscais.Items[0].NFSe.SituacaoNfse = ACBrNFSeXConversao.snCancelado then
                  memoLog.Lines.Add('A Nota encontra-se Cancelada.');

               pgRespostas.ActivePageIndex := 0;
          end;
 

obrigado

3522070485998300025856000000000000036-nfse.xml 3522070485998300025856000000000000076-rps.xml 3522070485998300025856000000000000036-nfse.pdf

[Juliomar Marchetti]

Bom dia.

tente informar os dados no componente pois o mesmo  possui eles pois alguns xml não vem com os mesmos para imprimir

[Antonio Paulo Mangili]

47 minutos atrás, Juliomar Marchetti disse:

Bom dia.

tente informar os dados no componente pois o mesmo  possui eles pois alguns xml não vem com os mesmos para imprimir

bom dia. tendi. vou fazer isso e reporto aqui. obrigado

[Antonio Paulo Mangili]

bom dia @Juliomar Marchetti deu certinho sua orientação. por favor poderia encerrar esse topico.

obrigado

[Italo Giurizzato Junior]

Obrigado por reportar.

Fechando. Para novas dúvidas, criar um novo tópico.