查询数据库存储过程或者函数 文本 包含 某字段的 存储过程

查询数据库存储过程或者函数 文本 包含 某字段的 存储过程
CREATE procedure [dbo].[GetSPFNNameContainText]
(    
    @text varchar(500)
)
as
    select name, text   
    from sysobjects o, syscomments s   
    where o.id = s.id   
    and text like '%'+@text+'%'   
    and (o.xtype = 'P'  or o.type='FN')
GO