السلام عليكم
اشكر الجميع على التعاون...
عندي سؤال و اتمنى الرد.....
انا مطلوب مني استدعاء from b من خلال form A و بعد الأستدعاء يتوجب علي
ان ارسل قيمة من الform b الى ال form b ...............
و استرط علي صاحب العمل ان استعمل ال call_form عند استدعاء ال form b و قال لي
انه لا يريد ان اكتب call_form مرة اخرى في الform b اي عند ارجاع القيمة المطلوبة ........
و لقد استخدمت ال global variable
ارجوا الرد منكم و جزاكم الله خيرا

ارجو منكم الرد

الرجاء التوضيح اكثر كيف الارسال من فورم b الى الفورم b

السلام عليكم
اشكر الجميع على التعاون...
عندي سؤال و اتمنى الرد.....
انا مطلوب مني استدعاء from b من خلال form A و بعد الأستدعاء يتوجب علي
ان ارسل قيمة من الform b الى ال form a ...............
و اشترط علي صاحب العمل ان استعمل ال call_form عند استدعاء ال form b و قال لي
انه لا يريد ان اكتب call_form مرة اخرى في الform b اي عند ارجاع القيمة المطلوبة ........
و لقد استخدمت ال global variable
ارجوا الرد منكم و جزاكم الله خيرا

لقد قمت بتعديل الخطأ الإملائي

طيب ممكن واحدة واحدة عشان نفهمك
انت عندك فورمة A ده عبارة عن الفورمة الرئيسية
وعندك فورمة B عايز تنادي عليها
وبعد كده عايز ترجع قيمة من الفورمة B إلى الفورمة A ???

صح كده ؟؟
==========================================
هتنادي بـ CALL_FORM من الفورمة الاولى
وتاخد القيم اللي انت عايز ترجع بيها من الفورمة التانية وتحطها global variable تمام زي ما انت قولت
وهتعمل EXIT للفورمة B


كده احنا فتحنا A >>>>> ومنها نادينا على B >>>>> وخدنا قيم من B في global variable

ناقص اننا نسمع القيم ده في الفورمة A

هتمعل على مستوى الفورمة (A ) تعمل تيرجر WHEN-WINDOW-ACTIVATED
وتقوله

:TEXT1 := (YOUR global variable1);
:TEXT2 := (YOUR global variable2);
:TEXT3 := (YOUR global variable3);

هنفترض مثلا انك عايز ترجع ب 3 قيم من B
هتعمل 3 global variable
وتعمل 3 تكستات في الفورمة A
هتباصي قيم الجلوبال فريابل لل3 تكسات
بس كده
===============================
حته زيادة بأه : اول لما تيجي تفتح الفورمة A أكيد هيطلعلك ايرور ، لان لسه معندكش الجلوبال فريابل وفي نفس الوقت تريجر WHEN-WINDOW-ACTIVATED لان الفورمة فعلا اكتف
طب الحل
ممكن تعمل جلوبال فريبال جديد وليكن اسمه DO_CALL
وتعمل شرط في التيرجر بتاع WHEN-WINDOW-ACTIVATED قبل ما تملأ التكستات
IF DO_CALL =1 THEN
---
---
--
END IF ;
طبعاً اول مرة هيكون مش بيساوي 1 ولا حاجة فمش هينفذ التريجر ده
هتيجي على الزرار بأه اللي بينادي الفورمة التانية وهتخلي قيمة DO_CALL ده يساوي
في الحالة ده اول لما تخرج من الفورمة B وتروح على الفورمة A يشتغل التريجر
يارب اكون قدرت اوصل المعلومة
جرب وقولي

[/size]مشكوووووووور قوي على الرد انا رح اجرب و اردلك خبر

ال do_call اعرفها في ال fromA؟؟؟
طبعاً اول مرة هيكون مش بيساوي 1 ولا حاجة فمش هينفذ التريجر ده
هتيجي على الزرار بأه اللي بينادي الفورمة التانية وهتخلي قيمة DO_CALL ده يساوي
في الحالة ده اول لما تخرج من الفورمة B وتروح على الفورمة A يشتغل التريج
الجملة الأخيرة دي حاسس في حاجة ناقصة

هنفترض انك عايز ترجع 3 قيم

بص يافندم ترتيب الاحداث كالاتي :
1- لازم يكون عندك 3 تكست عشان ترجع ال3 قيم فيهم .
2- تعمل جلوبال فريبال ( او براميتر ) زي ما تحب وهنسميه DO_CALL طبعاً ده في الفورمة A هتخللي قيمته صفر كمان
3- هتمل التريجر بتاع WHEN-WINDOW-ACTIVATED اللي احنا قولنا عليه
4- اول مرة لما تيجي تفتح الفورمة هيبص على الشرط بتاع DO_CALL هيلاقيه لا يساوي 1 ، مش هينفذ الكود
5- زرار بينادي على الفورمة B وتنداي على الفورمة منه وكمان تقوله DO_CALL :=1;


ده خلصنا الفورمة A
===============================================================
نخش على الفورمة B
1-اعمل الاجرءات اللي انت عايز تعملها على الفورمة براحتك ... عادي خالص
2- أعمل زرار خروج .
3- قبل ما تقول EXIT_FORM هتباصي القيم التلاته للـ 3 جوبال فريبال .
4- هتدوس على خروج عادي خالص

يبقى احنا فين حالياً ..... رجعنا تاني على الفورمة A
بمعنى ان الفورمة A اصبحت اكتيف ، يبقى التيرجر بتاعنا يشتغل

لو فيه حاجة مش مفهومه ، ما تترددش وان شاء نقدر نساعدك

شوف يا بيه انا عندي form اسمه CONTROL و form اسمه SEARCH
بال form CONTROL عندي TEXT_ITEM اسمه acct_id لما أكبس F9 و انا في ال TEXT_ITEM اللي اسمه acct_id بينطلق الفورم search عن طريق ال trigger التالي
KEY-LISTVAL ده نوع الtrigger
وانا كاتب فيه call_form('search_test',no_hide,do_replace,no_query_only,'defulte');

exit_form;
و في when_new_form instance بتاعة ال form CONTROL انا كاتب :acct_id:=:global.g_acct_id;
و في ال form SEARCH انا بختار ال RECORD اللي انا عاوزه عن طريق ال double_click triger على مستوى ال data_block
WHEN-MOUSE-DOUBLECLICK
:global.g_acct_id:=:moh_acct_view.acct_id_v;

call_form('control_form_test');
exit_form;
بس انا مش عايز اعمل call_from في ال torm اللي اسمها SEARCH و ده من طلبات المدير
انا المشاكل عندي تكمن في ال exit_form و هاي الشغلات......يعني بضل الاقي انو مش كل ال form سكروا

متشكر قوي بس ال do_call ده اعريفها فين و على اي مستوى و قلي اكتب ايه بالزبط فيها

يافندم عادي خالص
في الفورمة الاولى CONTROL
هتعمل التريجر اللي اسمه WHEN-WINDOW-ACTIVATED
وهتكتب جواه الكود اللي احنا اتفقنا عليه

- في تيرجر KEY-LISTVAL
هتكتب التيرجر بتاعك عادي بس من غير EXIT_FORM ، يعني الكود اللي انت كاتبه صح بس شيل منه EXIT_FORM ، وتضيف بس عليه :PARAMETER.DO_CALL := 1 ; طبعا لو كنت عامله براميتر ، اما لو كنت عامله جلوبال يبق :GLOBAL.DO_CALL := 1;

======================================================
في الفورمة التانية SEARCH
كل اللي انت عامله تمام التمام ، بس في زرار الخروج شيل الكود ده call_form('control_form_test');

بس كده

تم تعديل 20 يوليو 200916 سنة بواسطة abdu1_far

يا فندم في الفورم الاوولى
امعل براميتر وسميه DO_CALL
وخللي قيمته =0
بس لو عملته براميتر (PARAMETER )
يبقى الشرط بتاعك الموجود في WHEN-WINDOW-ACTIVATED
هيكون
IF :PARAMETER.DO_CALL =1 THEN
-
-
--
END IF ;
او اعمله جوبال فريبال ( زي ما تحب ) هتعرفه في الفورمة الاولى وتباصي له قيمه في الفورمة الاولى برضه

kol 7agah tamam enshallah bs al DO_CALL deh 7atganene ana 3awez a3melha global wel nabi e22oli a3rafha feen o ezay bel zabt o fe ay trigger a3arfha.....ana '3alabtak m3i 2wi

يا فندم انا في ال trigger اللي في form B الي في when_mous_double_click كتبت التالي
:global.g_acct_id:=:moh_acct_view.acct_id_v;
:parameter.do_call :=1;
exit_form;
ال value ما رجعتش عال form A
lو في when_window_activated hggd موجودة في ال form a كتبت
if :parameter.do_call = 1 then
:acct_id:=:global.g_acct_id;
select crm.CUSTMAST_get_cust_name (ar.ACCTMAST_get_cust_id (:ACCT_ID))
into :cust_name
from dual;
end if;
في حاجة خطأ؟؟؟

بص ياباشا اول حاجة في فورمة CONTROL
هتعمل تيرجر WHEN_NEW_FROM_INSTANCE
تكتب الكود ده

:GLOBAL.DO_CALL := 0;

في تيرجر WHEN-WINDOW-ACTIVATED
هتكتب الكود ده

IF :GLOBAL.DO_CALL = 1 THEN 
    acct_id:=:global.g_acct_id;
END IF ;

في تيرجر KEY-LISTVAL
الكود ده

:GLOBAL.DO_CALL := 1; 
call_form('search_test',no_hide,do_replace,no_query_only,'defulte');

اتمنى تكون الصورة وضحت

تم تعديل 20 يوليو 200916 سنة بواسطة abdu1_far

مشكوووووووووووووووووووووووووووووووووووووووووووووووووووووووووووووووووووووووور كل حاجة زبطت
ربنا يقدرني اردلك الجميل ده و يقدرني على مساعدة الناس زيك
شكرا ٌوي

يافندم احنا تحت امرك
لو عايز تساعدني فعلا ... يبقى لا تنساني من دعاءك

جزاكم الله خيرا
بجد استفدت ،،،، ربنا يارب يبارك فيكم ويوفقكم في حياتكم

أنا دعتلك ..........
و ربنا يوفقك كمان وكمان ..........ز
ادعولي انهم يثبتوني بالشغل

ربنا يبارك في الاخ عبدالله وكل الاخوة الاي مش بيبخلوا عن المساعدة

وربنا يكرمك يا haboos ويثبتوك في الشغل
ربنا يوفقك ويكرم الجميع
اللهم أمين

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