SQL2005查看死锁存储过程sp_who_lock

下面是我整理的监控sql server数据库，在性能测试过程中是否出现死锁、堵塞的sql语句，还算比较准备，留下来备用。

调用方法：选中相应的数据库，执行exec sp_who_lock

use [master]
go
set ansi_nulls on
go
set quoted_identifier on
go


create procedure [dbo].[sp_who_lock] 
as 
begin 
declare @spid int, @bl int, @inttransactioncountonentry int, @introwcount int, @intcountproperties int, @intcounter int 

create table #tmp_lock_who ( 
	id int identity(1,1), 
	spid smallint, 
	bl smallint
) 

if @@error<>0 return @@error 

insert into #tmp_lock_who(spid,bl) select 0 ,blocked 
	from (select * from sysprocesses where blocked>0 ) a 
	where not exists(select * from (select * from sysprocesses where blocked>0 ) b 
	where a.blocked=spid) 
	union select spid,blocked from sysprocesses where blocked>0 

if @@error<>0 return @@error 
 
-- 找到临时表的记录数 
select @intcountproperties = count(*),@intcounter = 1 
from #tmp_lock_who 

if @@error<>0 return @@error 

if @intcountproperties=0 
	select '现在没有阻塞和死锁信息' as message 

-- 循环开始 
while @intcounter <= @intcountproperties 
begin 
	-- 取第一条记录 
	select @spid = spid,@bl = bl 
	from #tmp_lock_who where id = @intcounter 
	begin 
		if @spid =0 
      select '引起数据库死锁的是: '+ cast(@bl as varchar(10)) + '进程号,其执行的sql语法如下' 
		else 
      select '进程号spid：'+ cast(@spid as varchar(10))+ '被' + '进程号spid：'+ cast(@bl as varchar(10)) +'阻塞,其当前进程执行的sql语法如下' 
		dbcc inputbuffer (@bl ) 
	end 

	-- 循环指针下移 
	set @intcounter = @intcounter + 1 
end 

drop table #tmp_lock_who 

return 0 
end