-- 定位数据
-- 设计思路:
-- 保存要被移动记录的原主键值和新主键值(如果有主键的话)，然后比较两个主键值的大小（记录信息按升序排列），
-- 如果原主键值大，表明该记录被移动到前面的新位置，可将原位置的记录信息保存下来，并将从新位置的记录信息到
-- 原记录的前一条记录的信息顺次往下移动，把保存的原记录移动到新位置即可。
-- 如果原主键值小，表明该记录被移动到后面的新位置，可将原位置的记录信息保存下来，并将从新位置的记录信息到
-- 原记录的下一条记录的信息顺次往上移动，把保存的原记录移动到新位置即可。实际上就是记录块的移动.
-- 但是,如果数据表中的数据非常庞大,该存储过程的执行效率将会下降.
Use zzydb
--创建举例表(学生信息表)
Create Table T_StudentsInfo
(i_id int identity(1,1), --系统自增流水号
c_Stu_ID nvarchar(10), --学号
c_ClassName nvarchar(50), --班级
d_BirthDay datetime) --出生日期
go
--向举例表中插入4条学生信息,以验证下面的存储过程(sp_MyAdjustRecordOrder)
Insert into T_StudentsInfo values('001', '大二三班', '1978-01-25')
Insert into T_StudentsInfo values('002', '大一六班', '1979-02-05')
Insert into T_StudentsInfo values('003', '大四三班', '1981-07-15')
Insert into T_StudentsInfo values('004', '大三一班', '1976-01-05')
select * from T_StudentsInfo
if object_id('sp_MyAdjustRecordOrder') <> 0
drop proc sp_MyAdjustRecordOrder
go
Create Proc sp_MyAdjustRecordOrder(@OldStuId nvarchar(10), @NewStuId nvarchar(10))
as
--@OldStuid 学生学号(用以表示被移动的记录),
--@NewStuid 学生学号(用以表示将被移动的记录插入的新位置)
begin
declare @Old_i_id int, @New_i_id int
declare @i_BlockCount int--即将被移动的记录块条数
declare @i int--循环变量
--获得id值
Select @Old_i_id = (select I_id from T_StudentsInfo where c_Stu_ID = @OldStuId)
Select @New_i_id = (select I_id from T_StudentsInfo where c_Stu_ID = @NewStuId)
select @i_BlockCount = abs(@Old_i_id - @New_i_id)
--保存被移动的学生信息
Select c_Stu_ID, c_ClassName, d_BirthDay
into New_StudentsInfo--临时创建的表，用完后删除
from T_StudentsInfo
where c_Stu_ID = @OldStuId
if @New_i_id < @Old_i_id --将原记录信息移动到了前面
begin
select @i = 0
while @i <= @i_BlockCount - 1
begin
update T_StudentsInfo
set c_Stu_ID = T2.c_Stu_ID,
c_ClassName = T2.c_ClassName,
d_BirthDay = T2.d_BirthDay
From T_StudentsInfo , T_StudentsInfo T2
where (T_StudentsInfo.i_id = @Old_i_id - @i) and
(T2.i_id = @Old_i_id - @i - 1)
select @i = @i + 1
end
end
if @New_i_id > @Old_i_id --将原记录信息移动到了后面
begin
select @i = 0
while @i <= @i_BlockCount - 1
begin
update T_StudentsInfo
set c_Stu_ID = T2.c_Stu_ID,
c_ClassName = T2.c_ClassName,
d_BirthDay = T2.d_BirthDay
From T_StudentsInfo, T_StudentsInfo T2
where (T_StudentsInfo.i_id = @Old_i_id + @i) and
(T2.i_id = @Old_i_id + @i + 1)
select @i = @i + 1
end
end
update T_StudentsInfo
set c_Stu_ID = T3.c_Stu_ID,
c_ClassName = T3.c_ClassName,
d_BirthDay = T3.d_BirthDay
From T_StudentsInfo T1, New_StudentsInfo T3
where (T1.i_id = @New_i_id )
Drop table New_StudentsInfo
--if @New_i_id = @Old_i_id --位置未发生改变，不做任何处理
end
go
--使用举例
--要求:将c_Stu_Id为'004'的学生信息移动到c_Stu_Id为'002'的学生信息之前的位置.
--调用存储过程 sp_MyAdjustRecordOrder('004','002')即可.
--注意:这里的i_id必须是顺序的。
--备份表数据信息，以便于比较
select *
into StudentsInfoBackup
from T_StudentsInfo
--比较结果是否一致
select * from StudentsInfoBackup
select * from T_StudentsInfo
--移动数据记录信息，调用存储过程
exec sp_MyAdjustRecordOrder '003', '002'
--比较结果是否改动
select * from StudentsInfoBackup
select * from T_StudentsInfo
