إدخال اتوماتيكي للطلاب في فصول

[مبرمجة أوراكل]

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

اريد مساعدة في عمل بروسيجر

لدي 3 جداول
جدول طلاب ومعلوماتهم
جدول كورسات

واخير جدول العلاقة بينهما


لدي شاشة اقوم بادخال معلومات الطلاب فيها

الكورسات تعقد يومين في الاسبوع ولنفرض الاحد والثلاثاء وتسجل في الجدول الثاني كسجلات

الكورس الواحد يحتوي 20 طالبا

المطلوب

عند ادخال معلومات الطالب

يتم ادخال اسمه ورقمه اتوماتيكيا في الكورس المقبل الذي يتسع له

بحيث يغلق الفصل عند اكتمال 20 طالبا فيه

وبالتالي عند ادخال معلومات طالب جديد يدخل في الكورس التالي الذي يتسع له
وهكذا


لااعرف ان تم ايصال المعلومة بطريقة صحيحة ومن لديه معلومة ويريد المساعدة فليتفضل

وجزيتم خيرا جميعا

[Ahmad.Hasan]

السلام عليكم
يتم استدعاء البروسيجر على : Pre-Inser & Pre-Update

Procedure Insert_Student Is
Cursor C Is           
Select Student_Id
  From Relational_Table Where Cource_Id = :Blk_1.Cource_Id;  
vn_cource         Number;
Begin Begin Select Count(*)
   Into vn_cource From Relational_Table
  Where Cource_Id = :Blk_1.Cource_Id;   
Exception When No_Data_Found Then
	Null;
End;
For Rec In C Loop  
	If Rec.Student_Id <> :Blk_1.Student_Id Then  ---- To Check That The Student Not Join With This Class.
  If vn_cource < 20 Then
	  Insert Into Students (Student_Code, Student_Name) Values (:Blk_1.Student_Code, :Blk_1.Student_Name);
	   :System.Message_Level := 25;
	   Commit;
	   :System.Message_Level := 0;
  Else
	  Message('Course Is Full');
	  Message('Course Is Full');
	  Raise Form_Trigger_Failure;
  End If;
	End If;
End Loop; 
End;

بالتوفيق

تم تعديل 27 مارس 2010 بواسطة PALI.ORACLE

[مبرمجة أوراكل]

شكرا اخي احمد على البروسيجر المفيد

حيث يتم تجربته ولكن مع بعض التعديلات لان رقم الكورس غير موجود بالاساس بالفورم ، مسألة معقدة نوعا ما لكن جاري التجربة