--如何判断一个存储过程是否有输入参数!

Question

--查看返回结果。如果结果>1,则有参数.(邹建书上有)
CREATE PROC sp_PROC_Params
@procedure_name sysname,            --存储过程或者用户定义函数名
@group_number   int=1,              --存储过程的组号,必须在0到32767之间,0表示显示该存储过程组的所有参数
@operator       nchar(2)=N'='       --查找对象的运算符
AS
SET NOCOUNT ON
DECLARE @sql nvarchar(4000)
SET @sql=N'SELECT
PorcedureName=CASE 
WHEN o.xtype IN(''P'',''X'')
THEN QUOTENAME(o.name)+N'';''+CAST(c.number as varchar)
WHEN USER_NAME(o.uid)=''system_function_schema''
AND o.xtype=''FN''
THEN o.name
WHEN  USER_NAME(o.uid)=''system_function_schema''
THEN ''::''+o.name
WHEN o.xtype=''FN''
THEN QUOTENAME(USER_NAME(o.uid))+N''.''+QUOTENAME(o.name)
ELSE QUOTENAME(o.name) END,
Owner=USER_NAME(o.uid),
GroupNumber=c.number,
ParamId=c.colid,
ParamName=CASE 
WHEN o.xtype=''FN'' AND c.colid=0 THEN ''<Returns>''
ELSE c.name END,
Type=QUOTENAME(t.name)+CASE 
WHEN t.name IN (''decimal'',''numeric'')
THEN N''(''+CAST(c.prec as varchar)+N'',''+CAST(c.scale as varchar)+N'')''
WHEN t.name=N''float''
OR t.name like ''%char''
OR t.name like ''%binary''
THEN N''(''+CAST(c.prec as varchar)+N'')''
ELSE '''' END,
Orientation=CASE 
WHEN o.xtype=''FN'' AND c.colid=0 THEN ''<Returns>''
ELSE N''Input''
+CASE WHEN c.isoutparam=1 THEN ''/Output'' ELSE '''' END
END
FROM sysobjects o,syscolumns c,systypes t
WHERE o.id=c.id
AND c.xusertype=t.xusertype
AND o.name'
+CASE 
WHEN @operator IN('=','>','>=','!>','<','<=','!<','<>','!=')
THEN @operator+QUOTENAME(@procedure_name,'''')
WHEN @operator='IN'
THEN @operator+N' IN('+QUOTENAME(@procedure_name,'''')+')'
WHEN @operator IN('LIKE','%')
THEN ' LIKE '+QUOTENAME(@procedure_name,'''')
ELSE '='+QUOTENAME(@procedure_name,'''')
END
+N' 
AND(('
+CASE 
WHEN @group_number BETWEEN 1 AND 32767 
THEN N'c.number='+CAST(@group_number as varchar)
WHEN @group_number=0
THEN N'1=1'
ELSE N'c.number=1'
END+N' AND o.xtype IN(''P'',''X'')) 
OR (c.number=0 AND o.xtype=''FN'')
OR (c.number=1 AND o.xtype IN(''IF'',''TF'')))'
EXEC sp_executesql @sql

Answer 1

--也可以用,分析是否有参数.
sp_helptext  '存储过程名称'

Answer 2

--原来可以这样
if exists 
(select 1 from ( select
'Parameter_name' = name,
'Type' = type_name(xusertype),
'Length' = length,
'Param_order' = colid,
'Collation' = collation
from syscolumns where id = object_id('存储过程名称'))t)
print '有参数'
else
print '没有参数'