طباعة تقرير مباشرة من الفورم ديفلوبر

السلام عليكم

اخي الفاضل من قائمةPROPERTY PALETTE

ستجد خانة باسم distribution افتحها ستجد مكان اسمه destype افتحها و حول القيمة الموجودة بداخلها الى printer و هكذا سيطبع التقرير مباشرة دون ان يظهر على الشاشة

شكراً يا أخي الكريم

وكل عام وأنتم بخير

لكن القضية شاشة المعاملات ما زالت تظهر عند فتح الريبورت من فورم

اكتب هذا الكود في WHEN_BUTTON_PRESSED

DECLARE

C PARAMLIST;

BEGIN

C:=CREATE_PARAMETER_LIST('C_SOC');

/************ هذا لعملية نقل المتغيرات من الشاشة الى التقرير حيث ان المتغير الذي امامه نقطتين

هذا اسمه على الشاشة والذي بين SENGLE QUTE هذا اسمه في التقرير******************/

ADD_PARAMETER(C,'COMP_NO',TEXT_PARAMETER,:COMP_NO);

ADD_PARAMETER(C,'END_DATE',TEXT_PARAMETER,TO_CHAR(:END_DATE,'DD-MON-YYYY'));

ADD_PARAMETER(C,'EMP_NO',TEXT_PARAMETER,:EMP_NO);

/*************** هذا لمعرفة مكان توجيه الطباعة SCREEN OR PRINTER وممكن ان تاخذها من الشاشة */

ADD_PARAMETER(C,'DESTYPE',TEXT_PARAMETER,'PRINTER');

/****** هذا اذا كنت لاتريد ان يخرج الPARAMETER FORM */

ADD_PARAMETER(C,'PARAMFORM',TEXT_PARAMETER,'NO');

/************* امر تشغيل التقرير **********************************/

RUN_PRODUCT (REPORTS,'مكان وجود التقريرواسمه',ASYNCHRONOUS,RUNTIME,FILESYSTEM,C);

DESTROY_PARAMETER_LIST©;

END;

شكراً أخي الكريم

وجزيت خيراً