Erro Na Impressão Do Fastreport

[Fernando Rodrigo]

Bom dia a todos,

 

Sei que muitos do forum utilizam o FastReport para construção dos seus relatorios.

 

Ja utilizo a algum tempo e começou a dar um problema da seguinte forma.

 

Crio meus relatorios e passo alguns parametros em tempo de execução, como segue abaixo:

 

Tenho uma procedure que passos os parametros necessários para geração do relatorio

 

procedure Imprimir_Os_Grafico(var_Loja, var_numero, var_cliente: String; var_Data: TDate; var_arquivo_fr3: string);

begin

// imprime Ordem de Serviço em modo grafico

With MainForm.frxReport1 do

  begin

    Clear;

    LoadFromFile(var_arquivo_fr3);

    with Variables do

      begin

        Clear;

        Variables['var_loja']     := var_Loja;

        Variables['var_numero']   := var_numero;

        Variables['var_cliente']  := var_cliente;

        Variables['var_data']     := var_Data;

      end;

     ShowReport;

  end;

end;

 

 

O que esta acontecendo que não imprime a primeira vez, tenho que sair do sistema e entrar novamente e reimprimir para funcionar.

 

Enquanto eu estiver no sistema ele so imprime em branco. So que o registro existe normal, como no arquivo em anexo.

 

O que é mais engraçado que as Ordem de Serviço antiga imprime normal, so que ela ja foi reimpressa, por isso que sai, se for nova não imprime da primeira vez.

 

A ordem de serviço nova, so imprime se sair do sistema e entrar novamente.

 

Alguem tem ideia do que poderia ser, pq ja pesquisei na internet e nao encontrei nada.

 

Ja excluir os componentes do relatorio e criei tudo novamente mas continua do mesmo jeito.

 

Se alguem tiver alguma ideia foi agradecer muito.

 

 

[Régys Silveira]

Existe uma opção no imprimir para limpar os relatórios carregados, veja se isso não ajuda, ela é um parâmetro do imprimir.

[Fernando Rodrigo]

Existe uma opção no imprimir para limpar os relatórios carregados, veja se isso não ajuda, ela é um parâmetro do imprimir.

 onde tem essa opção ??

[Régys Silveira]

.Clear;

[Fernando Rodrigo]

esse fastreport  tem um bug.

 

como ele faz a conexão via ibx na hora de enviar o relatorio so desconecto e conecto novamente

 

dai funcionou normal.

 

acho que ele fica em cache e nao atualiza, so depois que fecha e abre a conexão novamente, vai entender essas loucuras.

 

// imprime Ordem de Serviço em modo grafico

With frxReport1 do

  begin

    Clear;

    With Db_IBX_Relatorio do

      begin

        Connected := False;

        Connected := True;

      end;

    LoadFromFile(var_arquivo_fr3);

    with Variables do

      begin

        Clear;

        Variables['var_loja']     := var_Loja;

        Variables['var_numero']   := var_numero;

        Variables['var_cliente']  := var_cliente;

        Variables['var_data']     := var_Data;

      end;

    PrepareReport(True);

    ShowPreparedReport;

  end;

 

Dessa forma funcionou 100%