بسم الله
اقدم لكم كود لاستدعاء تقرير مع تنفيذه من خلال التحكم في الكويري باستخدام باراميترز
و التقرير اسمه R_CITIES و ممكن تغيروه للاسم الي تريدونه

declare
 repid report_object;
 v_rep varchar2(100);
 rep_status varchar2(20);
 pl_id paramlist;
begin
pl_id := get_paramETER_list('tempdata');
if id_null(pl_id) then
	pl_id := CREATE_PARAMETER_LIST('tempdata');
-- هنا تكويد المدن برقم المدينة و اسمها و اطلب هنا مدينة مكة ورقمها 2 في التقرير
	add_parameter(pl_id, 'P1', TEXT_PARAMETER, '2');
end if;

 repid := find_report_object('R_CITIES');
 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,'myrepserver');

 set_report_object_property(repid,report_other,'paramform=no');

 v_rep := RUN_REPORT_OBJECT(repid, pl_id);
 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
   ('http://jet9:8890/reports/rwservlet/getjobid'||substr(v_rep,instr(v_rep,'_',-1)+1)||'?'||'server=myrepserver','_blank');

 ELSE
   message('Error when running report ASHRAF');
 END IF;
END;

و هو بحمد الله اشتغل معي و لمن له مرئياته يتفضل بها

لا تنسو وضع امر تشغيل السيرفر اولا من الكوماند
rwserver server=myrepserver batch=yes

rwserver server=myrepserver batch=yes

هل myrepserver متغير

ام في جميع الاجهزة

وشكرا لك

شكرا لك اخى وجارى التجربه

rwserver server=myrepserver batch=yes

هل myrepserver متغير

ام في جميع الاجهزة

وشكرا لك

========================
هذا هو الأساسي عند التنزيل للاوراكل

الف شكر لك