查询数据库中的所有存储过程语句

select a.name,b.name
,(case when c.name in ('char','varchar','nchar','nvarchar')
 then c.name+'('+convert(varchar,b.max_length)+')'
  else c.name end) as 数据类型
,(case when b.is_output=1 then '输出' else '输入' end) as 输出类型
  from sys.procedures a
,sys.parameters b,systypes c
where a.object_id=b.object_id
and b.user_type_id=c.xusertype