ترحيل الطلب

[بنت العراق الغالي]

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

لديمشروع التخرج شؤون طلاب لجامعة
يوجد مجموع من الجداول منها:
جدول الطلاب : يحتوي على بيانات الطالب ( رقم ،اسم ............الخ)
جدول الدراسية :يحتوي على( رقم الطالب ، رقم المادة ، الدرجة )

س:كيف يتم انشاء loop لطلاب على كل طالب ،وثم loop لدرجات هذا طالب .
حسب جدولين سابق
شكرأ لكم

[Ahmad.Hasan]

السلام عليكم
هل تريدين عمل LOOP لإدخال البيانات على جدول اخر بهدف الترحيل ؟؟

[بنت العراق الغالي]

نعم

[Ahmad.Hasan]

السلام عليكم

Declare
Cursor Student_Cur Is
Select A.Std_No,
       A.Std_Name,
       B.Crs_Id,
       B.Crs_Name,
       B.Regestration_Date
  From Students A,
       Courses B
 Where A.Std_No = B.Std_No
   And A.Std_No = :Blk_1.Std_No;	   
Begin
For Rec In Student_Cur Loop
	Insert Into Temp_Table (Std_No,
	                        Std_Name.
	                        Crs_Id,
	                        Crs_Name,
	                        Regestration_Date)
	                Values (Rec.Std_No,
	                        Rec.Std_Name,
	                        Rec.Crs_Id,
	                        Rec.Crs_Name,
	                        Rec.Regestration_Date);
End Loop;
:System.Message_Level := 25;
Commit;
:System.Message_Level := 0;
Message('Transfering Data Is Complete');
Message('');
End; 

في حال سيتم تعبئة البيانات في جدول واحد.

بالتوفيق.