كيف يمكن نسخ بيانات فاتورة Master Details

يمكن كتابة برنامج صغير يقوم بعمل Loop لإضافة الـ Records لكن مع تغيير قيمة الشهر!

انظر الى الككود التالي وقد استخدمت به ال cursor وتحتاج الى تغيير اسماء الجداول والحقول

DECLARE test_cursor CURSOR
READ_ONLY
FOR SELECT   id,empid,total  FROM tblMaster  --where DECLARE @id int ,@empid int ,@total int 
DECLARE @identity int

OPEN test_cursor

FETCH NEXT FROM test_cursor INTO @id  ,@empid  ,@total 
WHILE (@@fetch_status <> -1)
BEGIN IF (@@fetch_status <> -2)
	BEGIN --بدل  2   تضع  اي  شهر  تريد
	insert  into tblMaster (empid,month,total) values(@empid ,  2  ,@total)

     select @identity =@@identity  -- ألرقم الجديد 

    insert  into Detail (pk,total) select @identity ,total from detail where pk = @id 
	END
	FETCH NEXT FROM test_cursor INTO  @id  ,@empid  ,@total
END

CLOSE test_cursor
DEALLOCATE test_cursor

وفي النهاية هذه الفكرة ويمكن التطوير عليها واضافة الكود الى اجراء مخزن واستخدام ال trans وما الى ذلك

use tempdb

GO

Drop Table Detail
Drop Table Master


create Table Master(id int identity Primary Key, _month int , emp_no int)
Create Table Detail(id int identity , MasterId int Foreign Key references Master(id), _value int )

Insert Master(_month, emp_no) Select 1,1
Insert Master(_month, emp_no) Select 1,2
Insert Master(_month, emp_no) Select 1,3
Insert Master(_month, emp_no) Select 1,4

GO

Insert Detail(MasterId, _value)  Select 1,1455
Insert Detail(MasterId, _value)  Select 1,1548
Insert Detail(MasterId, _value)  Select 1,1365

Insert Detail(MasterId, _value)  Select 2,2544
Insert Detail(MasterId, _value)  Select 2,2544
Insert Detail(MasterId, _value)  Select 2,2447

Insert Detail(MasterId, _value)  Select 3,3554
Insert Detail(MasterId, _value)  Select 3,3264
Insert Detail(MasterId, _value)  Select 3,3254

Insert Detail(MasterId, _value)  Select 4,455
Insert Detail(MasterId, _value)  Select 4,4655
Insert Detail(MasterId, _value)  Select 4,4521

GO

-- إنشاء إجرائية مخزنة للنقل
Create Procedure Transfer_to_New_Month
	@month Int
AS

	Create Table #Master(id int , _month int , emp_no int) 
	Insert #Master Select * From Master

	Declare @id int , @newId Int 

	Declare C Cursor For Select id from #Master  
	Open C

	Fetch Next From C Into @id 

	while @@fetch_status = 0
	begin

		Insert Into Master(_month, emp_no) Select @month, emp_no From Master Where id =@id
		Select @newId  = @@identity 

		Insert Into Detail(MasterId, _value) 
			Select @newId, _value From Detail Where MasterId = @id

		--Select @newId, _value From Detail Where MasterId = @id

		Fetch Next From C Into @id 

	end

	Close C
	DeAllocate C



GO

-- إختبار
exec Transfer_to_New_Month @month = 2

-- النتائج
Select * From Master
Select * From Detail