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

هل يمكن استدعاء التقرير مباشرة من ال Menue ام يجب ان نستدعي شاشه ومن ال button الموجود في الشاشه نستدعي التقرير واذا امكن ذلك يرجى شرح الطؤيقه


وشكرا

مافيش مشكلة من مناداه التقري من الmenu
و يستخدم نفس الكود اللي يكتب عند مناداه التقرير من الشاشة بس مافيش بارامتر تتباسا للتقرير الا اذا كانت fixed values

declare   
pl_id ParamList;  
BEGIN pl_id := Get_Parameter_List('REPORT_PL');  
IF NOT Id_Null(pl_id) THEN  
  Destroy_Parameter_List( pl_id );  
END IF;
pl_id := Create_Parameter_List('REPORT_PL');       
Add_Parameter(pl_id,'MAXIMIZE', TEXT_PARAMETER, 'YES'); --- fixed value passed paramter
Run_Product(REPORTS, 'R_DEED_NODEED_RQSTS', SYNCHRONOUS, RUNTIME,FILESYSTEM, pl_id, NULL);      
END;

شكرا لك اخت ام مريم وجعله الله في ميزان حسناتك
بس ياريت يا ام مريم لو تشرحيلي الكود شويه انا لسا مبتدىء او تدليني وين اسم التقرير في الكود الي انتي كتبتيه

أنا رأيي من رأي الأخت ( أم مريم ) ، حيث يمكنك إستدعاء التقرير من الـ Menu مثلما تستدعية من الـ Button الموجود علي النموذج وبنفس الطريقة دون أي مشاكل !!

لكن من رأيي الشخصي هو أن تجعل التقرير يتم إستدعائة من النموذج نفسة ، حيث من خلال هذا النموذج يمكنك إدراج الشروط علي جملة الإستعلام المرتبطة بالتقرير نفسة ... مثلاً لو نرغب في عرض بيانات موظف محدد ، من الطبيعي تحديد رقم الموظف ذاتة ( PK ) ، في هذه الحالة نحتاج الي إستخدام الـ LOV لسرد كافة الموظفين ، ومن ثم إرتجاع القيمة علي Item ، وأعتقد أن الـ Menu لا يحتوي علي هذه الخاصية LOV ، بالإضافة الي أمور كثيرة غير موجودة مثلاً Editor و Items و ............... الي آخرة

لذلك أرشح لك أن تقم بعرض التقرير من النموذج نفسة حتي تكون العملية مفتوحة بالنسبة لك ... لكن لو أنك متأكد أن هذا التقرير سيلتزم بجملة SQL دون إدخال أي Parametrat ، مثلا عرض تقرير بكافة الموظفين بالشركة ، أو كافة الفواتير ، أو .... الي آخرة ، في هذه الحالة يمكنك عرض التقرير من الـ Menu كما تشاء .

لكن سؤال ، هل شرط أساسي أن يتم إدراج Button علي النموذج لعرض التقرير !!!!

حقيقتاً ( لا ) ، فيمكنك فتح التقرير من الـ Menu كما تشاء ولكن في نفس الوقت يمكنك خداع بصيرة المستخدم بهذه العملية من خلال إدراج Trigger علي مستوي النموذج تحت إسم خاص غير أسماء الأحداث المتاحة مثل Key-Commit أو غيرها ، ومن ثم إستدعاء هذا الحدث من الـ Menu بإستخدام الدالة Execute_Trigger .

وحتي لا أطيل عليك في الحديث أنظر المرفق




بالتوفيق

Simble.zip

declare
/*ParamList تعريف متغير من نوع
لاسترجاع اللستID */
pl_id ParamList;
BEGIN
/*استدعاء الID
الخاص بالبارمتر لست*/
pl_id := Get_Parameter_List('REPORT_PL');
/*إذا كان الـ ID
الخاص بالليست موجود سوف يتم حذف الليست وهذه الخطوه يتم استخدامها لانشاء ليست جديدة براميتر جديدة حيث لايمكن استخدام ليست موجوده من قبل */
IF NOT Id_Null(pl_id) THEN Destroy_Parameter_List( pl_id ); END IF;
/*انشاء باراميتر ليست جديدة*/
pl_id := Create_Parameter_List('REPORT_PL');
/*اضافة البارامتر لليست - وهذا البرامتر يقوم بعمل تكبير للتقرير عند فتحه*/
Add_Parameter(pl_id,'MAXIMIZE', TEXT_PARAMETER, 'YES'); --- fixed value passed paramter
/*مناداة التقرير*/
Run_Product(REPORTS, 'R_DEED_NODEED_RQSTS', SYNCHRONOUS, RUNTIME,FILESYSTEM, pl_id, NULL);
END;

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

بصراحه يا اخت ام مريم كل كلمات الشكر تعجز عن التعبير ولكن اقول
وفقك الله وجزاك الله كل خير