SET QUOTED_IDENTIFIER ON

GOSET ANSI_NULLS ON GOALTER procedure sp_who_lockasbegindeclare @spid int,@bl int,@intTransactionCountOnEntry int, @intRowcount int, @intCountProperties int, @intCounter intcreate table #tmp_lock_who (id int identity(1,1),spid smallint,bl smallint)IF @@ERROR<>0 RETURN @@ERRORinsert into #tmp_lock_who(spid,bl) select 0 ,blockedfrom (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>0IF @@ERROR<>0 RETURN @@ERROR-- 找到臨時(shí)表的記錄數(shù)select @intCountProperties = Count(*),@intCounter = 1from #tmp_lock_whoIF @@ERROR<>0 RETURN @@ERRORif @intCountProperties=0select N'現(xiàn)在沒(méi)有阻塞和死鎖信息' as message-- 循環(huán)開(kāi)始while @intCounter <= @intCountPropertiesbegin-- 取第一條記錄select @spid = spid,@bl = blfrom #tmp_lock_who where Id = @intCounter beginif @spid =0 select N'引起數(shù)據(jù)庫(kù)死鎖的是: '+ CAST(@bl AS VARCHAR(10)) + N'進(jìn)程號(hào),其執(zhí)行的SQL語(yǔ)法如下'else select N'進(jìn)程號(hào)SPID：'+ CAST(@spid AS VARCHAR(10))+ N'被' + N'進(jìn)程號(hào)SPID：'+ CAST(@bl AS VARCHAR(10)) +N'阻塞,其當(dāng)前進(jìn)程執(zhí)行的SQL語(yǔ)法如下'DBCC INPUTBUFFER (@bl )end-- 循環(huán)指針下移set @intCounter = @intCounter + 1enddrop table #tmp_lock_whoreturn 0endGOSET QUOTED_IDENTIFIER OFF GOSET ANSI_NULLS ON GO