[转]Sql Server 分页存储过程

澳门新葡亰网站注册 2

核心提示:事例数据库表:企业信息表表名称prd_wxt_enterprise_tbl_EnterpriseInfo数据来源
存储数据企业信息表主键/外键 字段名称说明类型

本文转自:

1)事例数据库表: 企业信息表 表名称
prd_wxt_enterprise_tbl_EnterpriseInfo 数据来源 存储数据 企业信息表
主键/外键 字段名称 说明 类型 备注 cEnterpriseId n企业ID Char(10)
sEnterpriseName n企业名称 Varchar(200) sShortName n简称 Varchar(50)
sAddress n地址 nVarchar(200) E_system n企业所属系统 Char(1)

版权声明:作者:jiankunking 出处: 
本文版权归作者和CSDN共有,欢迎转载,但未经作者同意必须保留此段声明,且在文章页面明显位置给出原文连接。

产品表 表名称 Shop_tbl_ProductInfo 数据来源 存储数据 产品表 主键/外键
字段名称 说明 类型 备注 P_Code(PK)
n产品SKU号,即下单号,产品系统编号(p123456789) Char(10) not null
EnterpriseId n企业ID Char(10) not null P_Name n产品名称 Nvarchar(100)
not null P_Price n产品价格 Money P_UserPrice n产品会员价 Money Remark
n备注 Nvarchar(500) 2)要实现的功能:
删除旧企业数据及相关的产品,要求用嵌套存储过程实现
3)存储过程:包括两个存储过程
a)存储过程一:根据企业ID,删除该企业及下面的产品: 存储过程代码如下:
/* 功能:删除企业,同时删除关联的表,包括企业表及其关联的产品表数据
创建人: 创建日期:2007-4-10 修改日期:2007-4-10 */ CREATE PROCEDURE
[DeleteEnterprise]澳门新葡亰网站注册, ( @EnterpriseID nvarchar(10) ) AS declare @strSQL
nvarchar(4000) –删除企业产品表 select @strSQL = delete from
Shop_tbl_ProductInfo where EnterpriseId=+@EnterpriseID+; exec(@strSQL)
–删除企业表 select @strSQL = delete from
prd_wxt_enterprise_tbl_EnterpriseInfo where
cEnterpriseID=+@EnterpriseID+; exec(@strSQL) GO

分页存储过程一:

b)存储过程二:选出旧企业的数据,然后通过循环嵌套的方式,通过循环语句调用存储过程一,删除所有的旧企业数据及其产品数据
存储过程代码如下: /* 功能:删除旧企业数据,同时删除关联的表,包括
创建人: 创建日期:2007-4-11 修改日期:2007-4-11 */ CREATE PROCEDURE
[DeleteOldEnterprise] AS declare @strSQL nvarchar(4000) declare
@EnterpriseID nvarchar(10) DECLARE Enterprise_CURSOR Cursor FOR Select
cEnterpriseId from prd_wxt_enterprise_tbl_EnterpriseInfo where
e_system=1 or e_system is null OPEN Enterprise_CURSOR Fetch next from
Enterprise_CURSOR into @EnterpriseID –以下一直到END都是循环语句 WHILE
@@FETCH_STATUS = 0 BEGIN –下面这行是调用存储过程一删除企业及其产品数据
exec DeleteEnterprise @EnterpriseID Fetch next from Enterprise_CURSOR
into @EnterpriseID END CLOSE Enterprise_CURSOR DEALLOCATE
Enterprise_CURSOR GO

 

[sql] view
plain
copy
print?

  1. –/*—–存储过程 分页处理 孙伟 2005-03-28创建 ——-*/   
  2. –/*—– 对数据进行了2分处理使查询前半部分数据与查询后半部分数据性能相同 ——-*/   
  3. –/*—–存储过程 分页处理 孙伟 2005-04-21修改 添加Distinct查询功能——-*/   
  4. –/*—–存储过程 分页处理 孙伟 2005-05-18修改 多字段排序规则问题——-*/   
  5. –/*—–存储过程 分页处理 孙伟 2005-06-15修改 多字段排序修改——-*/   
  6. –/*—–存储过程 分页处理 孙伟 2005-12-13修改 修改数据分页方式为top max模式性能有极大提高——-*/   
  7. –/*—–缺点:相对之前的not in版本主键只能是整型字段,如主键为GUID类型请使用not in 模式的版本——-*/   
  8. CREATE PROCEDURE dbo.proc_ListPageInt   
  9. (   
  10. @tblName nvarchar(200), —-要显示的表或多个表的连接   
  11. @fldName nvarchar(500) = ‘*’, —-要显示的字段列表   
  12. @pageSize int = 10, —-每页显示的记录个数   
  13. @page int = 1, —-要显示那一页的记录   
  14. @pageCount int = 1 output, —-查询结果分页后的总页数   
  15. @Counts int = 1 output, —-查询到的记录数   
  16. @fldSort nvarchar(200) = null, —-排序字段列表或条件   
  17. @Sort bit = 0, —-排序方法,0为升序,1为降序(如果是多字段排列Sort指代最后一个排序字段的排列顺序(最后一个排序字段不加排序标记)–程序传参如:’ SortA Asc,SortB Desc,SortC ‘)   
  18. @strCondition nvarchar(1000) = null, —-查询条件,不需where   
  19. @ID nvarchar(150), —-主表的主键   
  20. @Dist bit = 0 —-是否添加查询字段的 DISTINCT 默认0不添加/1添加   
  21. )   
  22. AS   
  23. SET NOCOUNT ON   
  24. Declare @sqlTmp nvarchar(1000) —-存放动态生成的SQL语句   
  25. Declare @strTmp nvarchar(1000) —-存放取得查询结果总数的查询语句   
  26. Declare @strID nvarchar(1000) —-存放取得查询开头或结尾ID的查询语句   
  27.   
  28. Declare @strSortType nvarchar(10) —-数据排序规则A   
  29. Declare @strFSortType nvarchar(10) —-数据排序规则B   
  30.   
  31. Declare @SqlSelect nvarchar(50) —-对含有DISTINCT的查询进行SQL构造   
  32. Declare @SqlCounts nvarchar(50) —-对含有DISTINCT的总数查询进行SQL构造   
  33.   
  34.   
  35. if @Dist = 0   
  36. begin   
  37. set @SqlSelect = ‘select ‘   
  38. set @SqlCounts = ‘Count(*)’   
  39. end   
  40. else   
  41. begin   
  42. set @SqlSelect = ‘select distinct ‘   
  43. set @SqlCounts = ‘Count(DISTINCT ‘+@ID+’)’   
  44. end   
  45.   
  46.   
  47. if @Sort=0   
  48. begin   
  49. set @strFSortType=’ ASC ‘   
  50. set @strSortType=’ DESC ‘   
  51. end   
  52. else   
  53. begin   
  54. set @strFSortType=’ DESC ‘   
  55. set @strSortType=’ ASC ‘   
  56. end   
  57.   
  58.   
  59.   
  60. ——–生成查询语句——–   
  61. –此处@strTmp为取得查询结果数量的语句   
  62. if @strCondition is null or @strCondition=” –没有设置显示条件   
  63. begin   
  64. set @sqlTmp = @fldName + ‘ From ‘ + @tblName   
  65. set @strTmp = @SqlSelect+’ @Counts=’+@SqlCounts+’ FROM ‘+@tblName  
  66. set @strID = ‘ From ‘ + @tblName   
  67. end   
  68. else   
  69. begin   
  70. set @sqlTmp = + @fldName + ‘From ‘ + @tblName + ‘ where (1>0) ‘ + @strCondition   
  71. set @strTmp = @SqlSelect+’ @Counts=’+@SqlCounts+’ FROM ‘+@tblName + ‘ where (1>0) ‘ + @strCondition   
  72. set @strID = ‘ From ‘ + @tblName + ‘ where (1>0) ‘ + @strCondition   
  73. end   
  74.   
  75. —-取得查询结果总数量—–   
  76. exec sp_executesql @strTmp,N’@Counts int out ‘,@Counts out   
  77. declare @tmpCounts int   
  78. if @Counts = 0   
  79. set @tmpCounts = 1   
  80. else   
  81. set @tmpCounts = @Counts   
  82.   
  83. –取得分页总数   
  84. set @pageCount=(@tmpCounts+@pageSize-1)/@pageSize   
  85.   
  86. /**//**当前页大于总页数 取最后一页**/   
  87. if @page>@pageCount   
  88. set @page=@pageCount   
  89.   
  90. –/*—–数据分页2分处理——-*/   
  91. declare @pageIndex int –总数/页大小   
  92. declare @lastcount int –总数%页大小   
  93.   
  94. set @pageIndex = @tmpCounts/@pageSize   
  95. set @lastcount = @tmpCounts%@pageSize   
  96. if @lastcount > 0   
  97. set @pageIndex = @pageIndex + 1   
  98. else   
  99. set @lastcount = @pagesize   
  100.   
  101. –//***显示分页   
  102. if @strCondition is null or @strCondition=” –没有设置显示条件   
  103. begin   
  104. if @pageIndex<2 or @page<=@pageIndex / 2 + @pageIndex % 2 –前半部分数据处理   
  105. begin   
  106. if @page=1   
  107. set @strTmp=@SqlSelect+’ top ‘+ CAST(@pageSize as VARCHAR(4))+’ ‘+ @fldName+’ from ‘+@tblName  
  108. +’ order by ‘+ @fldSort +’ ‘+ @strFSortType   
  109. else   
  110. begin   
  111. set @strTmp=@SqlSelect+’ top ‘+ CAST(@pageSize as VARCHAR(4))+’ ‘+ @fldName+’ from ‘+@tblName  
  112. +’ where ‘+@ID+’ <(select min(‘+ @ID +’) from (‘+ @SqlSelect+’ top ‘+ CAST(@pageSize*(@page-1) as Varchar(20)) +’ ‘+ @ID +’ from ‘+@tblName  
  113. +’ order by ‘+ @fldSort +’ ‘+ @strFSortType+’) AS TBMinID)’   
  114. +’ order by ‘+ @fldSort +’ ‘+ @strFSortType   
  115. end   
  116. end   
  117. else   
  118. begin   
  119. set @page = @pageIndex-@page+1 –后半部分数据处理   
  120. if @page <= 1 –最后一页数据显示   
  121. set @strTmp=@SqlSelect+’ * from (‘+@SqlSelect+’ top ‘+ CAST(@lastcount as VARCHAR(4))+’ ‘+ @fldName+’ from ‘+@tblName  
  122. +’ order by ‘+ @fldSort +’ ‘+ @strSortType+’) AS TempTB’+’ order by ‘+ @fldSort +’ ‘+ @strFSortType   
  123. else   
  124. set @strTmp=@SqlSelect+’ * from (‘+@SqlSelect+’ top ‘+ CAST(@pageSize as VARCHAR(4))+’ ‘+ @fldName+’ from ‘+@tblName  
  125. +’ where ‘+@ID+’ >(select max(‘+ @ID +’) from(‘+ @SqlSelect+’ top ‘+ CAST(@pageSize*(@page-2)+@lastcount as Varchar(20)) +’ ‘+ @ID +’ from ‘+@tblName  
  126. +’ order by ‘+ @fldSort +’ ‘+ @strSortType+’) AS TBMaxID)’   
  127. +’ order by ‘+ @fldSort +’ ‘+ @strSortType+’) AS TempTB’+’ order by ‘+ @fldSort +’ ‘+ @strFSortType   
  128. end   
  129. end   
  130.   
  131. else –有查询条件   
  132. begin   
  133. if @pageIndex<2 or @page<=@pageIndex / 2 + @pageIndex % 2 –前半部分数据处理   
  134. begin   
  135. if @page=1   
  136. set @strTmp=@SqlSelect+’ top ‘+ CAST(@pageSize as VARCHAR(4))+’ ‘+ @fldName+’ from ‘+@tblName  
  137. +’ where 1=1 ‘ + @strCondition + ‘ order by ‘+ @fldSort +’ ‘+ @strFSortType   
  138. else   
  139. begin   
  140. set @strTmp=@SqlSelect+’ top ‘+ CAST(@pageSize as VARCHAR(4))+’ ‘+ @fldName+’ from ‘+@tblName  
  141. +’ where ‘+@ID+’ <(select min(‘+ @ID +’) from (‘+ @SqlSelect+’ top ‘+ CAST(@pageSize*(@page-1) as Varchar(20)) +’ ‘+ @ID +’ from ‘+@tblName  
  142. +’ where (1=1) ‘ + @strCondition +’ order by ‘+ @fldSort +’ ‘+ @strFSortType+’) AS TBMinID)’   
  143. +’ ‘+ @strCondition +’ order by ‘+ @fldSort +’ ‘+ @strFSortType   
  144. end   
  145. end   
  146. else   
  147. begin   
  148. set @page = @pageIndex-@page+1 –后半部分数据处理   
  149. if @page <= 1 –最后一页数据显示   
  150. set @strTmp=@SqlSelect+’ * from (‘+@SqlSelect+’ top ‘+ CAST(@lastcount as VARCHAR(4))+’ ‘+ @fldName+’ from ‘+@tblName  
  151. +’ where (1=1) ‘+ @strCondition +’ order by ‘+ @fldSort +’ ‘+ @strSortType+’) AS TempTB’+’ order by ‘+ @fldSort +’ ‘+ @strFSortType   
  152. else   
  153. set @strTmp=@SqlSelect+’ * from (‘+@SqlSelect+’ top ‘+ CAST(@pageSize as VARCHAR(4))+’ ‘+ @fldName+’ from ‘+@tblName  
  154. +’ where ‘+@ID+’ >(select max(‘+ @ID +’) from(‘+ @SqlSelect+’ top ‘+ CAST(@pageSize*(@page-2)+@lastcount as Varchar(20)) +’ ‘+ @ID +’ from ‘+@tblName  
  155. +’ where (1=1) ‘+ @strCondition +’ order by ‘+ @fldSort +’ ‘+ @strSortType+’) AS TBMaxID)’   
  156. +’ ‘+ @strCondition+’ order by ‘+ @fldSort +’ ‘+ @strSortType+’) AS TempTB’+’ order by ‘+ @fldSort +’ ‘+ @strFSortType   
  157. end   
  158. end   
  159.   
  160. ——返回查询结果—–   
  161. exec sp_executesql @strTmp   
  162. –print @strTmp   
  163. SET NOCOUNT OFF   
  164. GO   

    –/—–存储过程 分页处理 孙伟 2005-03-28创建 ——-/
    –/—– 对数据进行了2分处理使查询前半部分数据与查询后半部分数据性能相同 ——-/
    –/—–存储过程 分页处理 孙伟 2005-04-21修改 添加Distinct查询功能——-/
    –/—–存储过程 分页处理 孙伟 2005-05-18修改 多字段排序规则问题——-/
    –/—–存储过程 分页处理 孙伟 2005-06-15修改 多字段排序修改——-/
    –/—–存储过程 分页处理 孙伟 2005-12-13修改 修改数据分页方式为top max模式性能有极大提高——-/
    –/—–缺点:相对之前的not in版本主键只能是整型字段,如主键为GUID类型请使用not in 模式的版本——-/
    CREATE PROCEDURE dbo.proc_ListPageInt
    (
    @tblName nvarchar(200), —-要显示的表或多个表的连接
    @fldName nvarchar(500) = ‘*’, —-要显示的字段列表
    @pageSize int = 10, —-每页显示的记录个数
    @page int = 1, —-要显示那一页的记录
    @pageCount int = 1 output, —-查询结果分页后的总页数
    @Counts int = 1 output, —-查询到的记录数
    @fldSort nvarchar(200) = null, —-排序字段列表或条件
    @Sort bit = 0, —-排序方法,0为升序,1为降序(如果是多字段排列Sort指代最后一个排序字段的排列顺序(最后一个排序字段不加排序标记)–程序传参如:’ SortA Asc,SortB Desc,SortC ‘)
    @strCondition nvarchar(1000) = null, —-查询条件,不需where
    @ID nvarchar(150), —-主表的主键
    @Dist bit = 0 —-是否添加查询字段的 DISTINCT 默认0不添加/1添加
    )
    AS
    SET NOCOUNT ON
    Declare @sqlTmp nvarchar(1000) —-存放动态生成的SQL语句
    Declare @strTmp nvarchar(1000) —-存放取得查询结果总数的查询语句
    Declare @strID nvarchar(1000) —-存放取得查询开头或结尾ID的查询语句

    Declare @strSortType nvarchar(10) —-数据排序规则A
    Declare @strFSortType nvarchar(10) —-数据排序规则B

    Declare @SqlSelect nvarchar(50) —-对含有DISTINCT的查询进行SQL构造
    Declare @SqlCounts nvarchar(50) —-对含有DISTINCT的总数查询进行SQL构造

if @Dist = 0 
begin 
set @SqlSelect = 'select ' 
set @SqlCounts = 'Count(*)' 
end 
else 
begin 
set @SqlSelect = 'select distinct ' 
set @SqlCounts = 'Count(DISTINCT '+@ID+')' 
end 


if @Sort=0 
begin 
set @strFSortType=' ASC ' 
set @strSortType=' DESC ' 
end 
else 
begin 
set @strFSortType=' DESC ' 
set @strSortType=' ASC ' 
end 



--------生成查询语句-------- 
--此处@strTmp为取得查询结果数量的语句 
if @strCondition is null or @strCondition='' --没有设置显示条件 
begin 
set @sqlTmp = @fldName + ' From ' + @tblName 
set @strTmp = @SqlSelect+' @Counts='+@SqlCounts+' FROM '+@tblName
set @strID = ' From ' + @tblName 
end 
else 
begin 
set @sqlTmp = + @fldName + 'From ' + @tblName + ' where (1>0) ' + @strCondition 
set @strTmp = @SqlSelect+' @Counts='+@SqlCounts+' FROM '+@tblName + ' where (1>0) ' + @strCondition 
set @strID = ' From ' + @tblName + ' where (1>0) ' + @strCondition 
end 

----取得查询结果总数量----- 
exec sp_executesql @strTmp,N'@Counts int out ',@Counts out 
declare @tmpCounts int 
if @Counts = 0 
set @tmpCounts = 1 
else 
set @tmpCounts = @Counts 

--取得分页总数 
set @pageCount=(@tmpCounts+@pageSize-1)/@pageSize 

/**//**当前页大于总页数 取最后一页**/ 
if @page>@pageCount 
set @page=@pageCount 

--/*-----数据分页2分处理-------*/ 
declare @pageIndex int --总数/页大小 
declare @lastcount int --总数%页大小 

set @pageIndex = @tmpCounts/@pageSize 
set @lastcount = @tmpCounts%@pageSize 
if @lastcount > 0 
set @pageIndex = @pageIndex + 1 
else 
set @lastcount = @pagesize 

--//***显示分页 
if @strCondition is null or @strCondition='' --没有设置显示条件 
begin 
if @pageIndex<2 or @page<=@pageIndex / 2 + @pageIndex % 2 --前半部分数据处理 
begin 
if @page=1 
set @strTmp=@SqlSelect+' top '+ CAST(@pageSize as VARCHAR(4))+' '+ @fldName+' from '+@tblName
+' order by '+ @fldSort +' '+ @strFSortType 
else 
begin 
set @strTmp=@SqlSelect+' top '+ CAST(@pageSize as VARCHAR(4))+' '+ @fldName+' from '+@tblName
+' where '+@ID+' <(select min('+ @ID +') from ('+ @SqlSelect+' top '+ CAST(@pageSize*(@page-1) as Varchar(20)) +' '+ @ID +' from '+@tblName
+' order by '+ @fldSort +' '+ @strFSortType+') AS TBMinID)' 
+' order by '+ @fldSort +' '+ @strFSortType 
end 
end 
else 
begin 
set @page = @pageIndex-@page+1 --后半部分数据处理 
if @page <= 1 --最后一页数据显示 
set @strTmp=@SqlSelect+' * from ('+@SqlSelect+' top '+ CAST(@lastcount as VARCHAR(4))+' '+ @fldName+' from '+@tblName
+' order by '+ @fldSort +' '+ @strSortType+') AS TempTB'+' order by '+ @fldSort +' '+ @strFSortType 
else 
set @strTmp=@SqlSelect+' * from ('+@SqlSelect+' top '+ CAST(@pageSize as VARCHAR(4))+' '+ @fldName+' from '+@tblName
+' where '+@ID+' >(select max('+ @ID +') from('+ @SqlSelect+' top '+ CAST(@pageSize*(@page-2)+@lastcount as Varchar(20)) +' '+ @ID +' from '+@tblName
+' order by '+ @fldSort +' '+ @strSortType+') AS TBMaxID)' 
+' order by '+ @fldSort +' '+ @strSortType+') AS TempTB'+' order by '+ @fldSort +' '+ @strFSortType 
end 
end 

else --有查询条件 
begin 
if @pageIndex<2 or @page<=@pageIndex / 2 + @pageIndex % 2 --前半部分数据处理 
begin 
if @page=1 
set @strTmp=@SqlSelect+' top '+ CAST(@pageSize as VARCHAR(4))+' '+ @fldName+' from '+@tblName
+' where 1=1 ' + @strCondition + ' order by '+ @fldSort +' '+ @strFSortType 
else 
begin 
set @strTmp=@SqlSelect+' top '+ CAST(@pageSize as VARCHAR(4))+' '+ @fldName+' from '+@tblName
+' where '+@ID+' <(select min('+ @ID +') from ('+ @SqlSelect+' top '+ CAST(@pageSize*(@page-1) as Varchar(20)) +' '+ @ID +' from '+@tblName
+' where (1=1) ' + @strCondition +' order by '+ @fldSort +' '+ @strFSortType+') AS TBMinID)' 
+' '+ @strCondition +' order by '+ @fldSort +' '+ @strFSortType 
end 
end 
else 
begin 
set @page = @pageIndex-@page+1 --后半部分数据处理 
if @page <= 1 --最后一页数据显示 
set @strTmp=@SqlSelect+' * from ('+@SqlSelect+' top '+ CAST(@lastcount as VARCHAR(4))+' '+ @fldName+' from '+@tblName
+' where (1=1) '+ @strCondition +' order by '+ @fldSort +' '+ @strSortType+') AS TempTB'+' order by '+ @fldSort +' '+ @strFSortType 
else 
set @strTmp=@SqlSelect+' * from ('+@SqlSelect+' top '+ CAST(@pageSize as VARCHAR(4))+' '+ @fldName+' from '+@tblName
+' where '+@ID+' >(select max('+ @ID +') from('+ @SqlSelect+' top '+ CAST(@pageSize*(@page-2)+@lastcount as Varchar(20)) +' '+ @ID +' from '+@tblName
+' where (1=1) '+ @strCondition +' order by '+ @fldSort +' '+ @strSortType+') AS TBMaxID)' 
+' '+ @strCondition+' order by '+ @fldSort +' '+ @strSortType+') AS TempTB'+' order by '+ @fldSort +' '+ @strFSortType 
end 
end 

------返回查询结果----- 
exec sp_executesql @strTmp 
--print @strTmp 
SET NOCOUNT OFF 
GO 

怎么在数据库中测试呢?

 

 

[sql] view
plain
copy
print?

  1. declare @pageCount int   
  2. declare @Counts int   
  3. exec [dbo].[proc_ListPageInt] ‘sysobjects’, ‘* ‘, 20,1,@pageCount output,@Counts output,’id’, 0,”,’id’,0  
  4. print @pageCount –这个可有可无   
  5. print @Counts –这个可有可无   

    declare @pageCount int
    declare @Counts int
    exec [dbo].[proc_ListPageInt] ‘sysobjects’, ‘* ‘, 20,1,@pageCount output,@Counts output,’id’, 0,”,’id’,0
    print @pageCount –这个可有可无
    print @Counts –这个可有可无

执行效果如下:

 

澳门新葡亰网站注册 1

澳门新葡亰网站注册 2

分页存储过程二: