كيف يمكن تمرير باراميتر parameter من Form إلى Report

السلام عليكم

أخ وحيد هذا مثال كامل للموضوع ،لكن اعذرني على قلة التنسيق :o ...

تفضـــل

وايضأ قم بالبحث في المنتدى اتوقع فيه مشاركات اخرى عن نفس الموضوع لكن قديمه ....

تحياتي للجميع

اخي وحيد

لقد توصلت بفضل الله وكرمه الى ما تريد و لكنه بمكتبي فباذن الله تعالى يوم الاحد بعد غد ساحضره لك في المنتدى مساءا و ليكون اضافة ضئيلة لجوار ما كتبه استاذنا محمد

و اسف للتاخير

السلام عليكم

جزاك الله خير اخ محمد الشنقيطي على الرد

هذا هو المطلوب (f) (f) (f) .

واشكر الاخ oracle على التفاعل مع موضوعي ومنتظر منك الاضافات يوم الاحد ان شاء الله (clock) ، جزاك الله خير

وشكرا للجميع

أخوكم / وحيد المصباحي

هاك اخي العزيز مثال على ما طلبت والذي ارجو ان يكون اضافة بسيطة لما قدمه الاخوة في المنتدى

ملاحظات قبل العمل:

1-يجب ان تقوم بشطب ل parameters من ال parameter form الخاص بالتقرير.

2-يجب ان تكون ال parameters في ال form و ال report متطابقة في العدد والنوع

والان هاك المثال

declare

list_id paramlist;

car_number varchar2(15):='car_number';

begin

list_id:=create_parameter_list(car_number);

add_parameter (list_id,'car_number',text_parameter,:car_number);

add_parameter(list_id,'DATE1',text_parameter,:DATE1);

add_parameter(list_id,'DATE2',text_parameter,:DATE2);

RUN_PRODUCT(REPORTS,'C:carsreportscontactorsCONT_CARS_MOVE',SYNCHRONOUS,RUNTIME,

FILESYSTEM,list_id,NULL);

destroy_parameter_list(list_id);

end;

ارجو المعذرة لقلة التنسيق

السلام عليكم

الحمد لله اشتغل معايا تمام

شكرأ الجميع

(f) (f) (f)

السلام عليكم

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

declare 

p1_id paramlist;

p1 datae;

p2 date;

p3 number;

Begin 

p1 := :rep_1.dat_1 --- ( الحقل الموجود في ال form ) ----;

p2 := :rep_1.dat_2;

p1_id := get_parameter_list ('tempdata');

if not id_null (p1_id) then 

destroy_parameter_list ( 'tempdata');

end if;

p1_id :=create_parameter_list('tempdata');

add_parameter(p1_id,'paramform',text_parameter,'no');

add_parameter 'maximiz',text_parameter,'yes');

add_parameter (p1_id,' p_1 ' ,text_parameter,to_char (p1,'dd-mm-yy'));

add_parameter ( p1_id, 'p_2',text_parameter,to_char (p2,'dd-mm-yy'));

add_parameter(p1_id ,'p_3',text_parameter,to_char (p3));

run_product ( reports , ' c:dev2000r_audit_2.rdf',synchronous,runtime,filesystem,p1_id,null);

end;

انهيت الان هذا الكود الذي يستدعي ال rep من ال form

و ارجو من اله ان اكون قد افدت في كلامي

و بالطبع جميع المتغيرات الموجود بالكود يمكن تعديلها كما يمكن الاستغناء عن p2,p3 و الاكتفاء بتقرير احادي اي له متغير واحد و بالتالي ستحذف كل ما له علاقه بهم من الكود

يا ترى وفقت ام لا :o

السلام عليكم

أخي oracle يكفيني انك اوفيت بوعدك ( فجزاك الله خير) (f)(f)(f) ، ولو ان الرد جاء متأخر ، لكن مقبول منك .

انا مقدر ظروفك ، فربنا يعينك

تمنياتي للجميع بالتوفيق

أخوكم / وحيد المصباحي