السلام عليكم ورحمه الله وبركاته

انا مبتدأ جدا في لغه الاوراكل

بأختصار لعدم شغل اوقات حضراتك كان الله في عون حضراتكم

انشات فورم به زناد WHEN-BUTTON-PRESSED لجمع رقمين ووضع الناتج في حقل بقاعده البيانات وتمت الحمد لله

لــــــــــــــــــــــــــــــــــكن

اريد تكرار هذا الامر بمجرد الضغط علي الزر حتي اخر سجل

يعني كل مره احتاج بها الجمع اضغط علي WHEN-BUTTON-PRESSED

اتنفيذ الامر

begin
;(text_item6:=(:er.id+:er.gh:
end;

اريد تكرار هذا الامر بمجرد الضغط علي الزر حتي اخر سجل

ولسيادتكم الشكر

43 مشاهده ولا رد واح

 

اوك طب ممكن حد يدلني علي اي شرح لاوامر loop  خاصه المساعده لعمليات الجمع والطرح لناتج الخانات

السلام عليكم

جرب الكود التالي:

 

 

 

DECLARE
   num_total_records   NUMBER;
   num_loop_i          NUMBER;
BEGIN
   GO_BLOCK ('Blk_2');
   FIRST_RECORD;
   LAST_RECORD;
   num_total_records := TO_NUMBER (NAME_IN ('SYSTEM.CURSOR_RECORD'));
   FIRST_RECORD;


   FOR num_loop_i IN 1 .. num_total_records
   LOOP
      :text_item6 := (:er.ID + :er.gh);
      NEXT_RECORD;
   END LOOP;


   FIRST_RECORD;
   :SYSTEM.message_level := 25;
   COMMIT;
   :SYSTEM.message_level := 0;
END;
 

جاري التجربه وشكرا للرد