Erro Visualizar DANFE Modo Paisagem

[paulo.uninfosistemas]

Necessidade: Nossos clientes precisam de que as colunas Percentual e Valor de ST sejam mostrados na lista de produtos. No trunk2, modelo Retrato, ambos os campos não são mostrados.

Solução: Em pesquisas aqui no fórum, constei que estas duas colunas são mostradas no modo Paisagem do DANFE. Desta forma, necessito configurar meu sistema para ter a possibilidade do usuário mostrar o DANFE neste modo.

Problema: Ao abrir o DANFE no formato descrito acima, ocorre uma série de erros:

• Could not convert variant of type (Null) into type (OleStr) Variável ou campo desconhecido: Parametros."Mensagem0"
  • No FastReport, possui o seguinte procedimento que esta ocasionando este erro:

    procedure Overlay1OnBeforePrint(Sender: TfrxComponent);
    begin
      if <Parametros."Mensagem0"> <> '' then 
      begin                       
        Overlay1.Visible := True;
        Overlay1.Height        := Engine.PageHeight;
        memWatermark.Text      := <Parametros."Mensagem0">;                                                                                                      
        memWatermark.Width     := Overlay1.Width;                                  
        memWatermark.Height    := Engine.PageHeight;
        memWatermark.Font.Size := 50;
        if (<Parametros."Mensagem0"> = 'NFe Cancelada') or
           (<Parametros."Mensagem0"> = 'NFe em Contingência - Cancelada') or                                                         
           (<Parametros."Mensagem0"> = 'NFe em Contingência sem Autorização de Uso da SEFAZ') or       
           (<Parametros."Mensagem0"> = 'NFe sem Autorização de Uso da SEFAZ') then
          memWatermark.font.color   := $009797FF       
        else
        if (<Parametros."Mensagem0"> = 'NFe em Contingência') then
          memWatermark.font.color   := $0080FFFF
        else
        if (<Parametros."Mensagem0"> = 'NFe sem Valor Fiscal - HOMOLOGAÇÃO') or
           (<Parametros."Mensagem0"> = 'NFe em Contingência - HOMOLOGAÇÃO') or
           (<Parametros."Mensagem0"> = 'NFe Cancelada - HOMOLOGAÇÃO') then
          memWatermark.font.color   := $00CBFBB5  
        else                      
          memWatermark.font.color   := $00D7D7D7;                                     
      end
      else
        Overlay1.Visible := False;                                                                   
    end;

  • Removi este trecho de código, para tentar mostrar o relatório.
  • Este erro não ocorreu mais.
• No entanto ainda ocorre o seguinte erro: "Memo2: Erro na expressão 'Emitente."XNome"': Identifier expected"
  • Este memo2, recebe um texto com os seguintes parâmetros:

Recebemos de [Emitente."XNome"] os produtos e/ou serviços constantes da Nota Fiscal Eletrônica indicada ao lado. 
Destinatário: [Destinatario."Xnome"] - [Destinatario."XLgr"], [Destinatario."Nro"] - [Destinatario."XBairro"] - [Destinatario."XMun"] - [Destinatario."UF"].Emissão: [Identificacao."DEmi"]  Valor Total: R$ [CalculoImposto."VNF" #n%2,2n]

 

Me certifiquei de que o texto passado no fonte C:\trunk2\Fontes\ACBrDFe\ACBrNFe\DANFE\NFe\Fast\ACBrNFeDANFEFRDM.pas, procedimento CarregaEmitente, é um texto válido.
O erro ocorre ao mostrar o relatório. No fonte C:\trunk2\Fontes\ACBrDFe\ACBrNFe\DANFE\NFe\Fast\ACBrNFeDANFEFR.pas, método PrepareReport, na linha: Result := FdmDanfe.frxReport.PrepareReport;

Desculpe a insistência, mas não estamos conseguindo resolver esta situação. Pedimos auxílio.

 

Observações: Delphi 2010; FastReport 5; trunk2; Anexo XML;
 

nfe.xml

[hleorj]

@paulo.uninfosistemas, danfe fast no modo paisagem. NÃO esta estável para produção.

[hleorj]

@paulo.uninfosistemas, o seu codigo esta atualizado .? 

 

Usando o demo 

[paulo.uninfosistemas]

Boa tarde.

A princípio esta atualizado. Revisão do arquivo 104828.

 

[hleorj]

Teste no demo imprimiu a figura acima.

[paulo.uninfosistemas]

Estou tentando fazer funcionar o demo, teria como você me disponibilizar seu demo, enquanto resolvo alguns problemas contidos? Ou seu arquivo fr3?

Editado 8 Janeiro, 2016 por paulo.uninfosistemas

[paulo.uninfosistemas]

Voltei para os erros que estão dando em produção.

Alguém poderia me explicar como é carregado os valores do XML no relatório? Da forma que esta implementado aqui, o relatório é criado em tempo de execução e não é passado nenhuma conexão com banco de dados.

Pergunto isto por que vejo que o erro que esta ocorrendo, é quando carrego o relatório padrão no meu relatório na seguinte linha de comando: FdmDanfe.frxReport.LoadFromFile('C:\DANFe.fr3').

[Juliomar Marchetti]

Que conexão de banco?

veja tu usa um xml pra preencher os dados a única situação que se usa é clientdataset pra poder vincular do gerador!

[hleorj]

@paulo.uninfosistemas, Estudou o código do demo ?