إنتقال للمحتوى

  • تسجيل الدخول عبر الفيس بوك تسجيل الدخول عبر تويتر Log In with LinkedIn Log In with Google      تسجيل دخول    
  • إنشاء حساب

صورة
- - - - -

مساعدة توضيح


3 رد (ردود) على هذا الموضوع

#1 leader_a2000

leader_a2000

    مشترك

  • الأعضــاء
  • 54 مشاركة
  • البـلـد: Country Flag

تاريخ المشاركة 24 January 2010 - 07:19 PM

الاخوة الاعزاء السلام عليكم اريد ان افهم ما معنى التالية
لدي check box و مكتوب فيه التريجر التالي
IF CHECKBOX_CHECKED(:SYSTEM.TRIGGER_ITEM) THEN
UnchechOthers;
End if;



و يوج اجراء اسمه UnchechOthers;
ومكتوب فيه التالي
PROCEDURE UnchechOthers IS
CurRec Number := :System.trigger_record;
BEGIN FIRST_RECORD;
LOOP
if get_block_property(:system.trigger_block,current_record) <> currec then
:FAC_SUP2.ACPT:= 'N';
end if;
if :system.last_record = 'TRUE' then
exit;
end if;
next_record;
END LOOP;

END;


ما المقصود يرجى التوضيح و شكرا

#2 mk3bmw

mk3bmw

    عضو نشط

  • الأعضــاء
  • 234 مشاركة
  • البـلـد: Country Flag

تاريخ المشاركة 25 January 2010 - 09:15 AM

أخي الكريم
بالنسبة للكود الاول يسأل عن الcheckbox الذي تم تغيير حالته من checked الى unchecked والعكس فّإذا كان checked أي بداخاله صح ينادي الاجراء UnchechOthers

وبالنسبة للكود الثاني يخزن قيمة قيمة السجل الذي احتوى على ال checkbox التي قمت بتغيير قيمتها في متغيير CurRec ، ثم يدخل في تكرار مبتدأ من أول سجل في البلوك ويسأل اذا كان السجل الاول يساوي السجل الذي يحتوي على checkbox فإذا كان لا يساويه فإنه يقوم بتغيير قيمة :FAC_SUP2.ACPT الى N
وعند الوصول الى آخر سجل يخرج من التكرار والا ينتقل الى السجلب التالي وهكذا


هذا البرنامج وكما فهمت يقوم بتعطيل كل ال checkboxes عند الضغط على checkbox معينة

#3 leader_a2000

leader_a2000

    مشترك

  • الأعضــاء
  • 54 مشاركة
  • البـلـد: Country Flag

تاريخ المشاركة 25 January 2010 - 11:21 AM

بارك الله فيك يا اخي بالضبط يقوم بذلك و الحمد لله قد فهمت الموضوع شكرا و جزاك الله خيرا

#4 mk3bmw

mk3bmw

    عضو نشط

  • الأعضــاء
  • 234 مشاركة
  • البـلـد: Country Flag

تاريخ المشاركة 25 January 2010 - 11:46 AM

العفو..........