السلام عليكم ورحمة الله وبركاتة

اريد طريقة ارسال باراميتر من فورم الى ريبورت وياريت تكون على هيئة خطوات من اول خطوة الى اخر خطوة

مع العلم اننى قمت بالبحث فى هذا الموضوع كثيرا ولكنها لم تفلح معى

وياريت تكون تم تجربتها ونجحت بالفعل


مع العلم انى استعمل database 10g


وارجو الرد سريعا لاستكمال المشروع وتسليمة


الله يخليكم نظرا لضيق الوقت

السلام عليكم ورحمة الله وبركاته

اخي الكريم

راجع الرابط التالي

http://www.araboug.org/ib/index.php?showtopic=19327


جزاكم الله كل خير

---buuton Print
DECLARE
CUR_DIR VARCHAR2(100);
DOS_FILE VARCHAR2(256);
TIME_PRINT VARCHAR2(5);
pl_id ParamList;
REP_NO VARCHAR2(100);
BEGIN
REP_NO:='W:\PROJ\ACC30922.RDF';

pl_id := Get_Parameter_List('tmpdata');
IF NOT Id_Null(pl_id) THEN
Destroy_Parameter_List( pl_id );
END IF;
pl_id := Create_Parameter_List('tmpdata');
IF Id_Null(pl_id) THEN
Message('خطا في انشاء Parameter list ');
RAISE Form_Trigger_Failure;
END IF;
***************system prameter
ADD_PARAMETER(pl_id,'DESTYPE' ,TEXT_PARAMETER,'PREVIEW' );
ADD_PARAMETER(pl_id,'COPIES' ,TEXT_PARAMETER,1 );
ADD_PARAMETER(pl_id,'ORIENTATION' ,TEXT_PARAMETER,'DEFAULT' );
ADD_PARAMETER(pl_id,'PARAMFORM' ,TEXT_PARAMETER,'NO');
******************report prameter
ADD_PARAMETER(pl_id,'DB_DATE_AR' ,TEXT_PARAMETER,:HEAD.DB_DATE);
ADD_PARAMETER(pl_id,'TIME_PRINT' ,TEXT_PARAMETER,TIME_PRINT);
ADD_PARAMETER(pl_id,'P_DOC_NO' ,TEXT_PARAMETER,TO_CHAR(:WVC_DOC_NO));

DOS_FILE:=REP_NO;
RUN_PRODUCT(REPORTS,DOS_FILE,SYNCHRONOUS,RUNTIME,FILESYSTEM,pl_id);
END;

السلام عليكم ورحمة الله وبركاته
هناك طريقة اخرى لاستدعاء التقرير من الفورم
وانا افضله فى عملى نظرا لسهولته وعدم الحاجة الى تفعيل الريبورت سيرفر

web.show_document('http://127.0.0.1:8889/reports/rwservlet?report=D:\MOSLEM\Reports\dept.jsp&destype=cache&desformat=htmlcss&userid=scott/tiger@orcl&dpt='||:dpt_txt);

مرحبا يا وردة
الكود الي انت كتبته هو فعلا احسن كود لاستدعاء التقرير عن طريق الفورم , وانا فعليا لا استخدم غيره
بس يا صاحبي في تعديل بسيط وهو
عشان الفائدة 127.0.0.1 هو اسم ال host تبع جهازك واذ استبدلته ب localhost ان شاء الله رح يزبط معك