/************************************************************
* 对数据进行了分处理使查询前半部分数据与查询后半部分数据性能相同
************************************************************/
ALTER PROCEDURE Proc_QB_Pager(
@tblName NVARCHAR(200), ----要显示的表或多个表的连接
@fldName NVARCHAR(500) = '*', ----要显示的字段列表
@pageSize INT = 10, ----每页显示的记录个数
@page INT = 1, ----要显示那一页的记录
@fldSort NVARCHAR(200) = NULL, ----排序字段列表或条件
@Sort BIT = 0, ----排序方法,为升序,为降序(如果是多字段排列Sort指代最后一个排序字段的排列顺序(最后一个排序字段不加排序标记)--程序传参如:' SortA Asc,SortB Desc,SortC ')
@strCondition NVARCHAR(1000) = NULL, ----查询条件,不需where
@ID NVARCHAR(150), ----主表的主键
@Dist BIT = 0, ----是否添加查询字段的DISTINCT 默认不添加/1添加
@pageCount INT = 1 OUTPUT, ----查询结果分页后的总页数
@Counts INT = 1 OUTPUT ----查询到的记录数
)
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构造
DECLARE @timediff DATETIME --耗时测试时间差
SELECT @timediff = GETDATE()
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
--/*-----数据分页分处理-------*/
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
IF @Sort = 1
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))