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 
 
-- 找到臨時(shí)表的記錄數(shù) 
select @intCountProperties = Count(*),@intCounter = 1 
from #tmp_lock_who 

IF @@ERROR<>0 RETURN @@ERROR 

if @intCountProperties=0 
	select '現(xiàn)在沒(méi)有阻塞和死鎖信息' as message 

-- 循環(huán)開(kāi)始 
while @intCounter <= @intCountProperties 
begin 
	-- 取第一條記錄 
	select @spid = spid,@bl = bl 
	from #tmp_lock_who where Id = @intCounter 
	begin 
		if @spid =0 
      select '引起數(shù)據(jù)庫(kù)死鎖的是: '+ CAST(@bl AS VARCHAR(10)) + '進(jìn)程號(hào),其執(zhí)行的SQL語(yǔ)法如下' 
		else 
      select '進(jìn)程號(hào)SPID：'+ CAST(@spid AS VARCHAR(10))+ '被' + '進(jìn)程號(hào)SPID：'+ CAST(@bl AS VARCHAR(10)) +'阻塞,其當(dāng)前進(jìn)程執(zhí)行的SQL語(yǔ)法如下' 
		DBCC INPUTBUFFER (@bl ) 
	end 

	-- 循環(huán)指針下移 
	set @intCounter = @intCounter + 1 
end 

drop table #tmp_lock_who 

return 0 
end