Script to list user tables with related procedures

set nocount on

create table #TableProList (
ID int identity (1,1),
TblName varchar(35),
Procedures varchar(50))

DECLARE TBList CURSOR
FOR select name FROM SYSOBJECTS WHERE TYPE = 'U'
AND name <>'dtproperties'

DECLARE @name varchar(35)
OPEN TBList

FETCH NEXT FROM TBList INTO @name
WHILE (@@fetch_status <> -1)
BEGIN

INSERT #TableProList(TBLNAME, PROCEDURES)
SELECT DISTINCT @NAME, A.name from sysobjects A, syscomments B WHERE B.text like '%' + @NAME + '%' AND A.id = B.id

FETCH NEXT FROM TBList INTO @name
END

CLOSE TBList
DEALLOCATE TBList

select TblName, Procedures from #TableProList order by ID

drop table #TableProList