call a pdf report from a form [message #419411] |
Fri, 21 August 2009 23:14 |
charuamit
Messages: 121 Registered: January 2009
|
Senior Member |
|
|
Hi friends
I want to generate a dynamic pdf report and call it in my form on button pressed....
I mean instead of calling a rdf file,i want to generate a pdf report and call it...
Any ideas ?
Thanks.
Charu
|
|
|
|
Re: call a pdf report from a form [message #419941 is a reply to message #419411] |
Wed, 26 August 2009 04:41 |
sharjeelshafqat
Messages: 33 Registered: August 2009 Location: Pakistan
|
Member |
|
|
declare
repid REPORT_OBJECT;
v_rep VARCHAR2(100);
rep_status VARCHAR2(50);
BEGIN
repid := find_report_object(E:\Forms\report.rdf');
SET_REPORT_OBJECT_PROPERTY(repid,REPORT_EXECUTION_MODE,BATCH);
SET_REPORT_OBJECT_PROPERTY(repid,REPORT_COMM_MODE,SYNCHRONOUS);
SET_REPORT_OBJECT_PROPERTY(repid,REPORT_DESTYPE,CACHE);
SET_REPORT_OBJECT_PROPERTY(repid,REPORT_DESFORMAT,'pdf');
SET_REPORT_OBJECT_PROPERTY(repid,REPORT_SERVER,'rep_sharjeel');
SET_REPORT_OBJECT_PROPERTY(repid,REPORT_OTHER,'EMPNO='||:EMPNO||' paramform=no');
v_rep := RUN_REPORT_OBJECT(repid);
rep_status := REPORT_OBJECT_STATUS(v_rep);
WHILE rep_status in ('RUNNING','OPENING_REPORT','ENQUEUED')
LOOP
rep_status := report_object_status(v_rep);
END LOOP;
IF rep_status = 'FINISHED' THEN
WEB.SHOW_DOCUMENT('/reports/rwservlet/getjobid'||substr(v_rep,instr(v_rep,'_',-1)+1)||'?'||'server=rep_sharjeel','_blank');
ELSE
message('Error when running report');
END IF;
END;
|
|
|
|
|