Home » Developer & Programmer » Reports & Discoverer » run_report_object not working (oracle developer 11g r2 forms 11.1.2.2.0 windows 7 64bit)
run_report_object not working [message #661787] Sun, 02 April 2017 07:44 Go to next message
akhalaf
Messages: 7
Registered: February 2010
Location: jordan
Junior Member
hi

i'm trying to migrate from 6i to 11g using the this code i copied it is reaching run_report_object and hangs their with no response , i tried checking the report server but it is not running i think is there a way to check the report server if it is running

-------------------------------------------- the calling code

declare
reportserver varchar2(50) ;
ParaListID ParamList ;
Paralist varchar2(50) ;
report_id report_object ;
ReportServerJob varchar2(100) ;
v_jobid number(12) ;
rep_status varchar2(20) ;
v_url varchar2(120) ;
begin

IF NOT Id_Null(ParaListID) then
Destroy_Parameter_List(ParaListID);
END IF;
ParaListID:= Create_Parameter_List (ParaList);

reportserver:=get_sys_param('REPORT_SERVER_NAME') ;
report_id := find_report_object('ACCREP07');

SET_REPORT_OBJECT_PROPERTY(report_id, REPORT_COMM_MODE, SYNCHRONOUS);
SET_REPORT_OBJECT_PROPERTY(report_id, REPORT_EXECUTION_MODE, BATCH);
SET_REPORT_OBJECT_PROPERTY(report_id, REPORT_DESTYPE, FILE);
SET_REPORT_OBJECT_PROPERTY(report_id, REPORT_DESFORMAT, 'pdf');
SET_REPORT_OBJECT_PROPERTY(report_id, REPORT_SERVER,reportserver );


Add_Parameter(ParaListID,'XYEAR',TEXT_PARAMETER,:ATM_YEAR);
Add_Parameter(ParaListID,'XTRN_TYPE',TEXT_PARAMETER,:ATM_TRN_TYPE);
Add_Parameter(ParaListID,'XTRN_NO',TEXT_PARAMETER,:ATM_TRN_NO);
Add_Parameter(ParaListID,'XOFFICE_NO',TEXT_PARAMETER,:ATM_OFFICE_NO);
Add_Parameter(ParaListID, 'PARAMFORM', TEXT_PARAMETER, 'NO');
Add_Parameter(ParaListID, 'XLANG', TEXT_PARAMETER, :XLANG);

:xstatus:='near end 0' ;
pause ;

ReportServerJob := run_report_object(report_id,ParaListID);
:xstatus:='near end 1' ;
pause ;
v_jobID := substr(ReportServerJob,length(reportserver)+2,length(ReportServerJob));

IF ReportServerJob is NOT NULL THEN
rep_status := report_object_status(ReportServerJob);
:xstatus:='near end 2' ;
WHILE rep_status in ('RUNNING', 'OPENING_REPORT','ENQUEUED') LOOP
rep_status := report_object_status(ReportServerJob);
END LOOP;
IF rep_status != 'FINISHED' THEN
raise form_trigger_failure ;
END IF;
v_url := '/reports/rwservlet/getjobid'||v_jobID||'?server='||reportserver;

Web.Show_Document(v_url,'_blank');
ELSE
raise form_trigger_failure;
END IF;
end ;
----------------------------------------------------------------------------
Re: run_report_object not working [message #661801 is a reply to message #661787] Mon, 03 April 2017 01:11 Go to previous messageGo to next message
akhalaf
Messages: 7
Registered: February 2010
Location: jordan
Junior Member
i need to check the report server
Re: run_report_object not working [message #662492 is a reply to message #661801] Wed, 03 May 2017 14:41 Go to previous message
shawaj
Messages: 89
Registered: January 2016
Member
Try the following

http://host:port/reports/rwservlet/getserverinfo?server=server_name
Previous Topic: Barcode exception
Next Topic: Character mode report with barcode.
Goto Forum:
  


Current Time: Fri Mar 29 06:13:22 CDT 2024