السلام عليكم

لدي check box في الفورم
المطلوب عند تنفيذه وأردت وضع check على record معين فإن باقي الrecordes في الفورم
يجب أن تكون unchecked

الاخ الكريم يمكن عمل ذلك بالشكل التالي
قم بعمل على مستوى check box تريجر WHEN-CHECKBOX-CHANGED

declare 

d varchar2(1);
n number;
BEGIN
   d:=:your_current_check_box_vlaue;
first_record;
n:= TO_NUMBER(:SYSTEM.TRIGGER_RECORD); 
loop
   if d:='Y' then
      :check_box:='N';
  elsif d:='N' then
      :check_box:='Y';
  end if;
next_record;
end if;
 exit when  :system.last_record='TRUE';
end loop;
go_record(n);
:check_box=d;
END;

أشكرك أخي على تجاوبك معي وتقبل الله منكم ومنا الصيام
ماذا تقصد يا أخي بال :your_current_check_box_vlaue;
واذا تكرمت علي اشرح لي الكود
وشكرا لك خاصة ولهذا المنتدى الرائع

الاخ الكريم

اقصد ب your_current_check_box_vlaue;

هو انك عند الوقوف على check box الثالثة وضغطت عليها سوف تخزن في d قيمة check box

فكرة الكود هي انك تضع قيمة ال check box اللي قمت بالضغط عليه فيضع القيمة داخل متغير

ونأخذ رقم ال check box يعني اذا كانت الريكورد الثالث واقف عليه يخزن رقم الريكود للرجوع اليه فيما بعد طبعا يقوم النظام

بالذهاب الى اول ريكورد واعطاء قيمة عكس القيمة الحالية يعني اذا كانت قيمة اختارك y يقوم بوضعها n

وهكذا وعند الانتهاء يقوم بالاتجاه الى الريكورد الذي كنت واقف عليه ويرجع القيمة التي اخترتها

ارجو ان تكون قد وضحت الصورة جربها وخبرنا بالنتيجة

يا أخي المدعو ADMIN05 لقد قمت بتجربتها لكن دون جدوى
أرجوك رجاء خاص بتجربتها أنت كمثال وترسله لي وان شاء الله أفهمه أكثر

شكرا لك أخي لقد حاولت فيها والحمد لله توصلت للحل وهذا هو الكود
ويوضع -كما تفضلت - على مستوى check box تريجر WHEN-CHECKBOX-CHANGED
وإليكم الكود
وفكرته كيف أقوم بتنشيط chek_box واحدة؟
declare

current_check_box_vlaue number;
record_count number:=0;
BEGIN
current_check_box_vlaue:= TO_NUMBER(:SYSTEM.TRIGGER_RECORD);
first_record;
select count(*) into record_count from ar_ord_sheet;
--:system.last_record='FALSE'
for i in 1..record_count loop
if :used_flag=1 then
:used_flag:=0;
end if;
next_record;
end loop;
go_record(current_check_box_vlaue);
:used_flag:=1;
END;

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