通用分页存储过程

CREATE   PROCEDURE  ListPage

@Tables   varchar ( 1000 ),
@PK   varchar ( 100 ),
@Sort   varchar ( 200 )  =   NULL ,
@PageNumber   int   =   1 ,
@PageSize   int   =   10 ,
@Fields   varchar ( 1000 )  =   ' * ' ,
@Filter   varchar ( 1000 )  =   NULL ,
@Group   varchar ( 1000 )  =   NULL ,
@Counts   int  output
AS
/* Count Nums */
DECLARE   @SQLTMP   NVARCHAR ( 1024 )
SET   @SQLTMP =   ' SELECT @Counts=count(1) from  '   +   @Tables   +   '   WHERE  '   +   @Filter  
EXEC  sp_executesql  @SQLTMP  ,N ' @Counts int out  ' , @Counts  out

/* Default Sorting */
IF   @Sort   IS   NULL   OR   @Sort   =   ''
SET   @Sort   =   @PK

/* Find the @PK type */
DECLARE   @SortTable   varchar ( 100 )
DECLARE   @SortName   varchar ( 100 )
DECLARE   @strSortColumn   varchar ( 200 )
DECLARE   @operator   char ( 2 )
DECLARE   @type   varchar ( 100 )
DECLARE   @prec   int

/* Set sorting variables. */  
IF   CHARINDEX ( ' DESC ' , @Sort ) > 0
BEGIN
SET   @strSortColumn   =   REPLACE ( @Sort ,  ' DESC ' ,  '' )
SET   @operator   =   ' <= '
END
ELSE
BEGIN
IF   CHARINDEX ( ' ASC ' ,  @Sort )  =   0
SET   @strSortColumn   =   REPLACE ( @Sort ,  ' ASC ' ,  '' )
SET   @operator   =   ' >= '
END


IF   CHARINDEX ( ' . ' ,  @strSortColumn )  >   0
BEGIN
SET   @SortTable   =   SUBSTRING ( @strSortColumn ,  0 ,  CHARINDEX ( ' . ' , @strSortColumn ))
SET   @SortName   =   SUBSTRING ( @strSortColumn ,  CHARINDEX ( ' . ' , @strSortColumn )  +   1 ,  LEN ( @strSortColumn ))
END
ELSE
BEGIN
SET   @SortTable   =   @Tables
SET   @SortName   =   @strSortColumn
END

SELECT   @type = t.name,  @prec = c.prec
FROM  sysobjects o 
JOIN  syscolumns c  on  o.id = c.id
JOIN  systypes t  on  c.xusertype = t.xusertype
WHERE  o.name  =   @SortTable   AND  c.name  =   @SortName

IF   CHARINDEX ( ' char ' ,  @type )  >   0
SET   @type   =   @type   +   ' ( '   +   CAST ( @prec   AS   varchar )  +   ' ) '

DECLARE   @strPageSize   varchar ( 50 )
DECLARE   @strStartRow   varchar ( 50 )
DECLARE   @strFilter   varchar ( 1000 )
DECLARE   @strSimpleFilter   varchar ( 1000 )
DECLARE   @strGroup   varchar ( 1000 )

/* Default Page Number */
IF   @PageNumber   <   1
SET   @PageNumber   =   1

/* Set paging variables. */
SET   @strPageSize   =   CAST ( @PageSize   AS   varchar ( 50 ))
SET   @strStartRow   =   CAST ((( @PageNumber   -   1 ) * @PageSize   +   1 )  AS   varchar ( 50 ))

/* Set filter & group variables. */
IF   @Filter   IS   NOT   NULL   AND   @Filter   !=   ''
BEGIN
SET   @strFilter   =   '  WHERE  '   +   @Filter   +   '   '
SET   @strSimpleFilter   =   '  AND  '   +   @Filter   +   '   '
END
ELSE
BEGIN
SET   @strSimpleFilter   =   ''
SET   @strFilter   =   ''
END
IF   @Group   IS   NOT   NULL   AND   @Group   !=   ''
SET   @strGroup   =   '  GROUP BY  '   +   @Group   +   '   '
ELSE
SET   @strGroup   =   ''

/* Execute dynamic query */  
EXEC (
'
DECLARE @SortColumn  '   +   @type   +   '
SET ROWCOUNT  '   +   @strStartRow   +   '
SELECT @SortColumn= '   +   @strSortColumn   +   '  FROM  '   +   @Tables   +   @strFilter   +   '   '   +   @strGroup   +   '  ORDER BY  '   +   @Sort   +   '
SET ROWCOUNT  '   +   @strPageSize   +   '
SELECT  '   +   @Fields   +   '  FROM  '   +   @Tables   +   '  WHERE  '   +   @strSortColumn   +   @operator   +   '  @SortColumn  '   +   @strSimpleFilter   +   '   '   +   @strGroup   +   '  ORDER BY  '   +   @Sort   +   '
'
)
GO