以下是小弟写的一个数据分页的存储过程，可在语法检查的时候老提示变量未申明，不能编译。
源代码如下：
create procedure [dbo].[clipPages](
@tableName varchar(50), --数据表名称
@tableFields varchar(200), --字段名称
@keyId varchar(20), --主键名称，一般是自增变量
@whereStr varchar(2000)='1=1', --查询语句
@page_size int=10, --每页信息条数
@pageIndex int=1, --当前页
@messageTotal int=0 output, --总信息数
@pageTotal int=0 output --总页数
)
as
set nocount on
go
if @page_size=0 or @page_size is null or @pageIndex is null
return 0
declare @sql varchar(4000)
declare @lastPage int
--得到信息总数
set @sql='select @messageTotal=count('+ @keyId +') from '+ @tableName +' where ('+ @whereStr +')'
execute(@sql)
if @messageTotal <= 0
return 0
--判断是否刚还是整数页条信息
set @[email protected] % @page_size
--计算总页数
if @lastPage=0
set @[email protected] / @page_size
set @[email protected]_size
else
set @pageTotal=ceiling(@messageTotal / @page_size)
set @sql='select * from(select top '+cast(@lasePage as varchar)+' * from(select top '+cast((@page_size * @pageIndex) as varchar)+' [email protected]+' from [email protected]+' where ([email protected]+') order by [email protected]+' desc) as a order by [email protected]+' asc) as b order by [email protected]+' desc'
execute(@sql)
if @@error<>0
return 0
else
return 1
go
错误提示如下：
服务器: 消息 137，级别 15，状态 2，行 2
必须声明变量 [email protected]_size'。
服务器: 消息 178，级别 15，状态 1，行 5
在此上下文中不能使用带有返回值的 RETURN 语句。
服务器: 消息 137，级别 15，状态 1，行 9
必须声明变量 [email protected]'。
服务器: 消息 137，级别 15，状态 1，行 12
必须声明变量 [email protected]'。
服务器: 消息 178，级别 15，状态 1，行 16
在此上下文中不能使用带有返回值的 RETURN 语句。
服务器: 消息 137，级别 15，状态 1，行 16
必须声明变量 [email protected]'。
服务器: 消息 137，级别 15，状态 1，行 20
必须声明变量 [email protected]'。
服务器: 消息 137，级别 15，状态 1，行 21
必须声明变量 [email protected]_size'。
服务器: 消息 137，级别 15，状态 1，行 23
必须声明变量 [email protected]'。
服务器: 消息 137，级别 15，状态 1，行 26
必须声明变量 [email protected]'。
服务器: 消息 178，级别 15，状态 1，行 31
在此上下文中不能使用带有返回值的 RETURN 语句。
服务器: 消息 178，级别 15，状态 1，行 32
在此上下文中不能使用带有返回值的 RETURN 语句。
------解决方案--------------------
- SQL code
--TOP n 实现的通用分页存储过程(邹建)CREATE PROC sp_PageView@tbname sysname, --要分页显示的表名@FieldKey nvarchar(1000), --用于定位记录的主键(惟一键)字段,可以是逗号分隔的多个字段@PageCurrent int=1, --要显示的页码@PageSize int=10, --每页的大小(记录数)@FieldShow nvarchar(1000)='', --以逗号分隔的要显示的字段列表,如果不指定,则显示所有字段@FieldOrder nvarchar(1000)='', --以逗号分隔的排序字段列表,可以指定在字段后面指定DESC/ASC 用于指定排序顺序@Where nvarchar(1000)='', --查询条件@PageCount int OUTPUT --总页数ASSET NOCOUNT ON--检查对象是否有效IF OBJECT_ID(@tbname) IS NULLBEGIN RAISERROR(N'对象"%s"不存在',1,16,@tbname) RETURNENDIF OBJECTPROPERTY(OBJECT_ID(@tbname),N'IsTable')=0 AND OBJECTPROPERTY(OBJECT_ID(@tbname),N'IsView')=0 AND OBJECTPROPERTY(OBJECT_ID(@tbname),N'IsTableFunction')=0BEGIN RAISERROR(N'"%s"不是表、视图或者表值函数',1,16,@tbname) RETURNEND--分页字段检查IF ISNULL(@FieldKey,N'')=''BEGIN RAISERROR(N'分页处理需要主键（或者惟一键）',1,16) RETURNEND--其他参数检查及规范IF ISNULL(@PageCurrent,0)<1 SET @PageCurrent=1IF ISNULL(@PageSize,0)<1 SET @PageSize=10IF ISNULL(@FieldShow,N'')=N'' SET @FieldShow=N'*'IF ISNULL(@FieldOrder,N'')=N'' SET @FieldOrder=N''ELSE SET @FieldOrder=N'ORDER BY '+LTRIM(@FieldOrder)IF ISNULL(@Where,N'')=N'' SET @Where=N''ELSE SET @Where=N'WHERE ([email protected]+N')'[email protected],则计算总页数(这样设计可以只在第一次计算总页数,以后调用时,把总页数传回给存储过程,避免再次计算总页数,对于不想计算总页数的处理而言,[email protected])IF @PageCount IS NULLBEGIN DECLARE @sql nvarchar(4000) SET @sql=N'SELECT @PageCount=COUNT(*)' +N' FROM [email protected] +N' [email protected] EXEC sp_executesql @sql,[email protected] int OUTPUT',@PageCount OUTPUT SET @PageCount=(@[email protected])[email protected]END--计算分页显示的TOPN值DECLARE @TopN varchar(20),@TopN1 varchar(20)SELECT @[email protected], @TopN1=(@PageCurrent-1)[email protected]--第一页直接显示IF @PageCurrent=1 EXEC(N'SELECT TOP [email protected] +N' [email protected] +N' FROM [email protected] +N' [email protected] +N' [email protected])ELSEBEGIN --处理别名 IF @FieldShow=N'*' SET @FieldShow=N'a.*' --生成主键(惟一键)处理条件 DECLARE @Where1 nvarchar(4000),@Where2 nvarchar(4000), @s nvarchar(1000),@Field sysname SELECT @Where1=N'',@Where2=N'',@[email protected] WHILE CHARINDEX(N',',@s)>0 SELECT @Field=LEFT(@s,CHARINDEX(N',',@s)-1), @s=STUFF(@s,1,CHARINDEX(N',',@s),N''), @[email protected]+N' AND [email protected][email protected], @[email protected]+N' AND [email protected]+N' IS NULL', @Where=REPLACE(@Where,@Field,[email protected]), @FieldOrder=REPLACE(@FieldOrder,@Field,[email protected]), @FieldShow=REPLACE(@FieldShow,@Field,[email protected]) SELECT @Where=REPLACE(@Where,@s,[email protected]), @FieldOrder=REPLACE(@FieldOrder,@s,[email protected]), @FieldShow=REPLACE(@FieldShow,@s,[email protected]), @Where1=STUFF(@Where1+N' AND [email protected][email protected],1,5,N''), @Where2=CASE WHEN @Where='' THEN N'WHERE (' ELSE @Where+N' AND (' [email protected]+N' IS [email protected]+N')' --执行查询 EXEC(N'SELECT TOP [email protected] +N' [email protected] +N' FROM [email protected] +N' a LEFT JOIN(SELECT TOP [email protected] +N' [email protected] +N' FROM [email protected] +N' a [email protected] +N' [email protected] +N')b ON [email protected] +N' [email protected] +N' [email protected])END