SET QUOTED_IDENTIFIER ON GO SET ANSI_NULLS ON GO
ALTER procedure dbo.pager (
@page_num int = 1,
@item_count int = 0,
@query_suffix nvarchar(4000),
@query_fields nvarchar(4000) = ''''*'''',
@query_key nvarchar(4000),
@record_count int = null output
)
/******************************************************************************
** 文件: pager.sql
** 名称: pager
**
** 参数:@page_num 页码,起始页码为 1,默认页码为 1。
** @item_count 每页显示的记录条数,默认显示0条。0条表示取出所有数据。
** @query_suffix 查询后缀,即 from 后的所有语句。
** @query_fields 需要查询的字段, 默认为所有字段 ''''*''''。
** @query_key 查询主键
** @record_count 纪录总数,当参数为 null 的时候,不执行汇总操作。该参数暂未生效。
**
** 描述: 分页器。
** 取出指定区间的查询。
** 使用须知:
** 1 查询必须显式指定排序方式。
** 2 query_key 必须在 query_fields 中出现。
** 3 query_key 应该是个不允许为空,且不重复的字段。
** 示例:
** 用该函数取出
** select a.id, a.name, b.school_name from user a, school b where a.school_id=b.id order by a.id desc
** 第二页的数据,每页显示 10 条纪录
** exec pager @page_num = 2, @item_count = 10, @query_suffix=''''user a, school b where a.school_id=b.id order by a.id desc'''', @query_fields=''''a.id, a.name, b.school_name'''', @query_key=''''a.id''''
**
** 要取出所有纪录
** exec pager @query_suffix=''''user a, school b where a.school_id=b.id order by a.id desc'''', @query_fields=''''a.id, a.name, b.school_name'''', @query_key=''''a.id''''
**
** 创建:whxbb@20030108
** 修改:
**
**
** 返回:成功 0 失败错误代号.
*******************************************************************************/
As -- 查询语句 declare @query nvarchar(4000) declare @query_start nvarchar(4000) declare @query_end varchar(4000)
-- 错误号 declare @error_code int
-- 起始记录号 declare @begin_no int
-- 结束记录号 declare @end_no int set @query_suffix = '''' from '''' + @query_suffix if (@item_count = 0) begin set @query = ''''select '''' + @query_fields + '''' '''' + @query_suffix end else if (@page_num = 1) begin -- 第一页,直接使用 top n 取值
set @query = ''''select top '''' + cast(@item_count as nvarchar(10)) + '''' '''' + @query_fields + '''' '''' + @query_suffix
end else -- 不是第一页
begin
-- 上页的最后一个纪录号
set @begin_no = (@page_num - 1) * @item_count
-- 本页的最后一个纪录号
set @end_no = @begin_no + @item_count
-- 构建分页查询语句
set @query_start = ''''select top '''' + cast(@end_no as nvarchar(10)) + '''' '''' + @query_fields
set @query_start = @query_start + '''' from ('''' + @query_start + '''' '''' + @query_suffix + '''') as query_table where''''
set @query_end = ''''select top '''' + cast(@begin_no as nvarchar(10)) + '''' '''' + @query_key + '''' '''' + @query_suffix
set @query = @query_start + '''' '''' + @query_key + '''' not in('''' + @query_end + '''')''''
end
print ''''Query constructed: '''' + @query
-- 执行分页查询语句
exec(@query) set @error_code = @@error if @error_code <> 0 goto error_handle
if (@record_count is not null) begin-- 统计结果总数
-- 创建一个临时存储过程用于带出构建查询语句的结果 set @query = ''''create procedure #tmp_procedure_pager_count(@count int output)as select top 100 percent '''' + @query_key + '''' '''' + @query_suffix + '''' select @count=@@rowcount'''' print ''''Count query constructed:'''' + @query exec(@query) set @error_code = @@error if @error_code <> 0 goto error_handle -- 执行临时存储过程 exec #tmp_procedure_pager_count @record_count output set @error_code = @@error if @error_code <> 0 goto error_handle -- 删除临时存储过程 drop procedure #tmp_procedure_pager_count end
error_handle: return @error_code
return @error_code
GO SET QUOTED_IDENTIFIER OFF GO SET ANSI_NULLS ON GO
-- use example execute pager @page_num = 1, @item_count = 3324, @query_suffix='''' test where 1=1 order by entity_id'''', @query_key=''''entity_id''''
declare @i int set @i = 0 exec pager @query_suffix='''' test where 1=1 order by entity_id'''', @query_fields=''''entity_name, entity_short_name, entity_id'''', @query_key=''''entity_id'''', @record_count=@i output select @i
|