查找该视图/表 被哪些视图引用的存储过程

查找该视图 被哪些视图引用的存储过程

alter procedure GetviewYY
@viewNameYY nvarchar(128)

AS
 declare @ViewText nvarchar(4000)
 declare @viewName nvarchar(128)

declare viewCursor cursor for
Select b.text ,a.name
from sysobjects a
inner join syscomments b on a.id=b.id
where a.xtype='V' 

open viewCursor

FETCH NEXT FROM viewCursor
INTO @ViewText,@viewName

WHILE @@FETCH_STATUS = 0
begin
  if @viewName<>@viewNameYY and  charindex(@viewNameYY,@ViewText )>0
  begin
    print @viewName
  end

FETCH NEXT FROM viewCursor
INTO @ViewText,@viewName
end

CLOSE viewCursor
DEALLOCATE viewCursor
 

-----

--存储过程

create procedure GetviewPP
@viewNamePP nvarchar(128)
AS
declare @ViewText nvarchar(4000)
declare @viewName nvarchar(128)
declare viewCursor cursor for
Select b.text ,a.name
from sysobjects a
inner join syscomments b on a.id=b.id
where a.xtype='P'
open viewCursor
FETCH NEXT FROM viewCursor
INTO @ViewText,@viewName
WHILE @@FETCH_STATUS = 0
begin
if @viewName<>@viewNamePP and charindex(@viewNamePP,@ViewText )>0
begin
print @viewName
end
FETCH NEXT FROM viewCursor
INTO @ViewText,@viewName
end
CLOSE viewCursor
DEALLOCATE viewCursor


 

posted @ 2011-03-31 15:19  坚持Delphi  阅读(336)  评论(0)    收藏  举报