Rodar um Relatório no Forms

Dicas do Oracle Forms Builder - Blocos, Itens, LOV, Canvas, Triggers, comandos, PLL, d2kwutil, FMB, Alert, menus, etc
Responder
LC_JK
Rank: Programador Sênior
Rank: Programador Sênior
Mensagens: 46
Registrado em: Ter, 24 Ago 2004 2:02 pm
Localização: São Paulo
Contato:

Como faço para Rodar um relatório no Forms?! Como posso passar os parametros para ele?!
Avatar do usuário
dr_gori
Moderador
Moderador
Mensagens: 5024
Registrado em: Seg, 03 Mai 2004 3:08 pm
Localização: Portland, OR USA
Contato:
Thomas F. G

Você já respondeu a dúvida de alguém hoje?
https://glufke.net/oracle/search.php?search_id=unanswered

Veja a rotina abaixo.
Deve solucionar seu problema!!!

Selecionar tudo

DECLARE
   Print_Name    Varchar2(100);
   Port_name     Varchar2(100);
   PL_ID          PARAMLIST;
BEGIN
	
  -- cria lista de parâmetros vazia
  PL_ID := Get_Parameter_List('tmpdata');
  If Not Id_Null(Pl_Id) Then
     Destroy_Parameter_List( Pl_Id );
  End If;
  Pl_Id := Create_Parameter_List('tmpdata');
   
  -- adiciona os parametros
	Add_Parameter(Pl_Id, 'PARAMFORM'  ,   Text_Parameter, 'NO');
	Add_Parameter(Pl_Id, 'DESTYPE'    ,   Text_Parameter, 'PREVIEW');  
	Add_Parameter(Pl_Id, 'ORIENTATION',   Text_Parameter, 'PORTRAIT');
	Add_Parameter(Pl_Id, 'SEU_PARAMETRO', Text_Parameter, sysdate);
  -- Destino pode ser FILE, PREVIEW  ou PRINTER
  -- Orientacao pode ser PORTRAIT LANDSCAPE
	

	Win_Api_Dialog.Select_Printer( Print_Name, Port_Name );
	
	Add_Parameter(Pl_Id, 'DESNAME', Text_Parameter, PRINT_NAME||','||PORT_NAME);
  
	Run_Product(Reports, 'c:\seu_report', aSynchronous, Runtime, Filesystem, Pl_Id, Null);


End;
gubsd
Rank: Estagiário Pleno
Rank: Estagiário Pleno
Mensagens: 7
Registrado em: Sex, 09 Set 2005 9:06 am
Localização: ribeirão preto

A rotina abaixo citada p/ dr_gori eu chamo-a no froms através de uma trigger WHEN_BUTTON_PRESSED??

Grato.

Gustavo
Avatar do usuário
Toad
Rank: DBA Pleno
Rank: DBA Pleno
Mensagens: 253
Registrado em: Sex, 18 Nov 2005 2:14 pm
Localização: Seattle, WA
Contato:

Isso Gustavo.

Você pode colocar em seu form um botão e joga esse código no trigger WHEN_BUTTON_PRESSED...

No meu, deu erro em Win_Api_Dialog.Select_Printer como se eu tivesse que declarar alguma função!

Alguém sabe como corrigir isso!?
Avatar do usuário
TBou
Rank: Analista Sênior
Rank: Analista Sênior
Mensagens: 136
Registrado em: Qui, 05 Ago 2004 9:33 am
Localização: Campo Grande - MS
Thiago Bourscheidt
thiago.info@apoiorural.com.br
Analista de Sistemas

você precisa anexar a biblioteca D2KWUtil que tem estas funções de API do windows.
ricardoar
Rank: Estagiário Júnior
Rank: Estagiário Júnior
Mensagens: 1
Registrado em: Qua, 18 Abr 2007 10:36 am
Localização: Curitiba - PR

Estou com a mesma situação mas como que eu recebo e manipulo o valor vindo do FORMs no Report? Pelo codigo do dr_gori o parametro de destino é DESNAME ou seja o report deve ter um parametro com o mesmo nome no Parameter Form?

Resumindo até consigo teoricamente passar o parametro para meu report mas ele retorna em branco. Mas o form está acusando um erro:

FRM-47013: Cannot add parameter TESTE2 to Parameter List TXT_PROJETO: parameter with this name exists


Obrigado desde já.
Avatar do usuário
Toad
Rank: DBA Pleno
Rank: DBA Pleno
Mensagens: 253
Registrado em: Sex, 18 Nov 2005 2:14 pm
Localização: Seattle, WA
Contato:
Matheus Gonçalves
matheus.dev
twitter.com/developer__c

Ricardo. Me parece ser um caso diferente.
Tem como você postar o código pra gente ver?
Responder
  • Informação
  • Quem está online

    Usuários navegando neste fórum: Nenhum usuário registrado e 6 visitantes