1 USE [AAA_TYDC]
2 GO
3 /****** Object: StoredProcedure [dbo].[proc_DataPagination] Script Date: 11/20/2014 11:04:47 ******/
4 SET ANSI_NULLS ON
5 GO
6 SET QUOTED_IDENTIFIER ON
7 GO
8
9 /*********************************************************
10 * 作 用：数据分页
11 * 作 者：evafly920
12 * 作者博客：http://blog.csdn.net/evafly920/article/details/614813
13 * 创建日期：2003-11-23
14 * 修改日期：2014-11-23
15 * 使用说明：
16 --调用例子：
17 --1.单表/单排序
18 EXEC proc_DataPagination @TableNames='bigtable',@PrimaryKey='d_id',@Fields='d_id,d_title,d_content,d_time',@PageSize=20,@CurrentPage=1,@Filter ='',@Group='',@Order='d_id desc'
19 --2.单表/多排序
20 EXEC proc_DataPagination 'bigtable','d_id','*',20,0,'','','d_time asc,d_id desc'
21 --3.多表/单排序
22 EXEC proc_DataPagination 'bigtable left join bigtable_author on bigtable.d_id=bigtable_author.BigTable_id', 'bigtable.d_id', 'bigtable.d_id,bigtable.d_title,bigtable.d_content,bigtable.d_time,bigtable_author.d_author', 20, 0, '', '', 'bigtable.d_id asc'
23 --4.多表/多排序
24 EXEC proc_DataPagination 'bigtable left join bigtable_author on bigtable.d_id=bigtable_author.BigTable_id', 'bigtable.d_id', 'bigtable.d_id,bigtable.d_title,bigtable.d_content,bigtable.d_time,bigtable_author.d_author', 20, 0, '', '', 'bigtable.d_time asc,bigtable.d_id desc'
25
26 *********************************************************/
27 ALTER PROCEDURE [dbo].[proc_DataPagination]
28 @TableNames VARCHAR(200), --表名，可以是多个表，但不能用别名
29 @PrimaryKey VARCHAR(100), --主键，可以为空，但@Order为空时该值不能为空
30 @Fields VARCHAR(200), --要取出的字段，可以是多个表的字段，可以为空，为空表示select *
31 @PageSize INT, --每页记录数
32 @CurrentPage INT, --当前页，0表示第1页
33 @Filter VARCHAR(200) = '', --条件，可以为空，不用填 where
34 @Group VARCHAR(200) = '', --分组依据，可以为空，不用填 group by
35 @Order VARCHAR(200) = '' --排序，可以为空，为空默认按主键升序排列，不用填 order by
36 AS
37 BEGIN
38 DECLARE @SortColumn VARCHAR(200)
39 DECLARE @Operator CHAR(2)
40 DECLARE @SortTable VARCHAR(200)
41 DECLARE @SortName VARCHAR(200)
42 IF @Fields = ''
43 SET @Fields = '*'
44 IF @Filter = ''
45 SET @Filter = 'WHERE 1=1'
46 ELSE
47 SET @Filter = 'WHERE ' + @Filter
48 IF @Group <>''
49 SET @Group = 'GROUP BY ' + @Group
50
51 IF @Order <> ''
52 BEGIN
53 DECLARE @pos1 INT, @pos2 INT
54 SET @Order = REPLACE(REPLACE(@Order, ' asc', ' ASC'), ' desc', ' DESC')
55 IF CHARINDEX(' DESC', @Order) > 0
56 IF CHARINDEX(' ASC', @Order) > 0
57 BEGIN
58 IF CHARINDEX(' DESC', @Order) < CHARINDEX(' ASC', @Order)
59 SET @Operator = '<='
60 ELSE
61 SET @Operator = '>='
62 END
63 ELSE
64 SET @Operator = '<='
65 ELSE
66 SET @Operator = '>='
67 SET @SortColumn = REPLACE(REPLACE(REPLACE(@Order, ' ASC', ''), ' DESC', ''), ' ', '')
68 SET @pos1 = CHARINDEX(',', @SortColumn)
69 IF @pos1 > 0
70 SET @SortColumn = SUBSTRING(@SortColumn, 1, @pos1-1)
71 SET @pos2 = CHARINDEX('.', @SortColumn)
72 IF @pos2 > 0
73 BEGIN
74 SET @SortTable = SUBSTRING(@SortColumn, 1, @pos2-1)
75 IF @pos1 > 0
76 SET @SortName = SUBSTRING(@SortColumn, @pos2+1, @pos1-@pos2-1)
77 ELSE
78 SET @SortName = SUBSTRING(@SortColumn, @pos2+1, LEN(@SortColumn)-@pos2)
79 END
80 ELSE
81 BEGIN
82 SET @SortTable = @TableNames
83 SET @SortName = @SortColumn
84 END
85 END
86 ELSE
87 BEGIN
88 SET @SortColumn = @PrimaryKey
89 SET @SortTable = @TableNames
90 SET @SortName = @SortColumn
91 SET @Order = @SortColumn
92 SET @Operator = '>='
93 END
94
95 DECLARE @type varchar(50)
96 DECLARE @prec int
97 SELECT @type=t.name, @prec=c.prec
98 FROM sysobjects o
99 JOIN syscolumns c on o.id=c.id
100 JOIN systypes t on c.xusertype=t.xusertype
101 WHERE o.name = @SortTable AND c.name = @SortName
102 IF CHARINDEX('char', @type) > 0
103 SET @type = @type + '(' + CAST(@prec AS varchar) + ')'
104
105 DECLARE @TopRows INT
106 SET @TopRows = @PageSize * @CurrentPage + 1
107 print @TopRows
108 print @Operator
109 EXEC('
110 DECLARE @SortColumnBegin ' + @type + '
111 SET ROWCOUNT ' + @TopRows + '
112 SELECT @SortColumnBegin=' + @SortColumn + ' FROM ' + @TableNames + ' ' + @Filter + ' ' + @Group + ' ORDER BY ' + @Order + '
113 SET ROWCOUNT ' + @PageSize + '
114 SELECT ' + @Fields + ' FROM ' + @TableNames + ' ' + @Filter + ' AND ' + @SortColumn + '' + @Operator + '@SortColumnBegin ' + @Group + ' ORDER BY ' + @Order + '
115 ')
116 END
117
118 GO
