Hiding Reports Server window [message #516587] |
Tue, 19 July 2011 07:52 |
|
Dognose77
Messages: 3 Registered: July 2011
|
Junior Member |
|
|
We have a reports proces which we want to produce a report where the browser windows doest not display, or if it does, quickly closes after the report is completed.
We are using Forms Version 10.1.2.0.2, Oracle Database 10g Release 10.2.0.4.0, OS is Windows XP Pro SP3
We have tried the below, but the primary application window closes, not the report server window.
= = = = = = = = = = = = = = = = = = = = = =
- http - removed due to form message:You cannot use links until you have posted more than 5 messages.
WEB.SHOW_DOCUMENT(://'|| :global.Report_Server_Name ||
'/reports/rwservlet?cmdkey=ky10i&report='||v_rep_object||'.rdf' ||
'¶mform=no&desformat=pdf&destype=file&desname='||v_file_dir||
'&P_VOU_ID='||'883100000000000005565047129970'||
'&P_VOU_TY_CD='||'MANDIS'||
'&p_userid='||'883100000000000005557451211320','_SElF.CLOSE');
Web.show_document('javascript:window.close()','_SElF.CLOSE') ;
= = = = = = = = = = = = = = = = = = = = = =
Using the above, the report is correctly written to the drive directory, but the browser window remains open.
We have modified the forms trigger to produce the report as shown below, but get the error:
FRM-41213: Unable to connect to the Report Server
Current theory is the connection to the database is lacking the user id and password since the cmdkey is not specified. How can we specify the cmdkey when using the run_report_object?
= = = = = = = = = = = = = = = = = = = = = =
DECLARE
v_rep_tx VARCHAR2(100);
v_RepStatus VARCHAR2(2000) := '';
v_rep_id REPORT_OBJECT;
v_rep VARCHAR2(100);
v_rep_object VARCHAR2(200) := 'raopmnldsb';
v_pl_id PARAMLIST;
v_pl_name varchar2(10) := 'err_list';
v_file_dir VARCHAR2(2000);
v_next_nbr dds_voucher_fusion_v.last_used_nbr%type;
BEGIN
:global.caps_deflt_dir := INTERFACE_CALL.BQS_OUT(lpad(:global.site_alias,5,0));
v_file_dir := :global.deflt_dir||'rpt_intfc_pmnts-'||:global.bus_day|| '-'||v_next_nbr||'.pdf';
v_pl_id := GET_PARAMETER_LIST(v_pl_name);
IF NOT ID_NULL(v_pl_id) THEN
DESTROY_PARAMETER_LIST(v_pl_name);
END IF;
v_pl_id := CREATE_PARAMETER_LIST(v_pl_name);
ADD_PARAMETER(v_pl_id,'P_VOU_ID' TEXT_PARAMETER, '883100000000000005565047129970');
ADD_PARAMETER(v_pl_id,'P_VOU_TY_CD',TEXT_PARAMETER, 'MANDIS');
ADD_PARAMETER(v_pl_id,'p_userid', TEXT_PARAMETER, '883100000000000005557451211320');
v_rep_id := FIND_REPORT_OBJECT(v_rep_object);
SET_REPORT_OBJECT_PROPERTY(v_rep_id, REPORT_DESFORMAT, 'PDF');
SET_REPORT_OBJECT_PROPERTY(v_rep_id, REPORT_DESTYPE, FILE);
SET_REPORT_OBJECT_PROPERTY(v_rep_id, REPORT_DESNAME, v_file_dir);
SET_REPORT_OBJECT_PROPERTY(v_rep_id, REPORT_SERVER,:global.Report_Server_Name);
BEGIN
v_rep_tx := run_report_object(v_rep_id, v_pl_id);
V_RepStatus := REPORT_OBJECT_STATUS(v_rep_tx);
WHILE V_RepStatus in ('RUNNING','OPENING_REPORT','ENQUEUED')LOOP
V_RepStatus := REPORT_OBJECT_STATUS(v_rep_tx);
END LOOP;
if v_repstatus <> 'FINISHED' then
cg$form_errors.push ('Report not written to default directory.', 'I');
end if;
END;
end;
= = = = = = = = = = = = = = = = = = = = = =
Ideas and / or suggestions are welcome.
Thanks
|
|
|
|