بسم الله الرحمن الرحيم
الاخوه السلام عليكم ورحمة الله وبكاته
هل يوجد من فرق بين استدعاء التقارير في 10g والاصدالاات السابقه .
حيث واني كتبت نفس الشفره في 10g ولكن لم يتم استدعاء التقرير .
وكل الحب والتقدير الى باعقيل الرجل النبيل بهذه المعلومات وموافاتنا بالجديد.

PROCEDURE call_report IS
repid REPORT_OBJECT;
v_rep VARCHAR2(100);
rep_status VARCHAR2(20);
v_prep_emp varchar2(100);
v_dept_manager varchar2(100);
PL_ID paramlist ;
BEGIN
PL_ID := GET_PARAMETER_LIST('TMPDATA');
IF NOT ID_NULL(PL_ID) THEN
DESTROY_PARAMETER_LIST(PL_ID);
END IF;
repid := find_report_object('GUR05024');

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,'rmo-as-01');

SET_REPORT_OBJECT_PROPERTY(repid,REPORT_OTHER,'paramform=no'||' P_POL_CLASS='||:POL_CLASS);
--
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 /*Display report in the browser*/
--WEB.SHOW_DOCUMENT('http://1)'||'?'||'server=repserver90','_blank');
WEB.SHOW_DOCUMENT('http://rmo-as-01/reports/rwservlet/getjobid'||substr(v_rep,instr(v_rep,'_',-1)+1)||
'?'||'server=rmo-as-01'
);
ELSE
message('Error when running report');
END IF;
END;
--[/php]

الكود ده متجرب على 10
declare
repid report_object;
r varchar2(100);
rr varchar2(100);
job number;
begin
repid:=find_report_object('rep');
set_report_object_property(repid,REPORT_DESTYPE,cache);
set_report_object_property(repid,REPORT_SERVER,'Repserver');
set_report_object_property(repid,REPORT_DESFORMAT,'HTML');
set_report_object_property(repid,REPORT_COMM_MODE,SYNCHRONOUS);
SET_REPORT_OBJECT_PROPERTY(repid,REPORT_OTHER,'PARAMFORM=NO');
r:=run_report_object(repid);

rr:=report_object_status®;
:tt:=r||rr;
job:=substr(r,length('repserver')+2);
--WEB.SHOW_DOCUMENT('/reports/rwservlet/getjobid='|| job||'?server='||'RepServer','_blank');
web.show_document('/reports/rwservlet/getjobid='||job||'?server=Repserver','_blank');

end;

السلام عليكم

اخي الكريم sherifmans

ممكن تشرح لنا سطور الكود

واكون شاكرا لك

تحياتي