SQL 查看死鎖情況的存儲過程

if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[sp_who_lock]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)  
  drop procedure [dbo].[sp_who_lock]  
  GO  
  /***************************************************************************  
  // 創建 :  
  // 日期 :
  // 修改 :   
  // 說明 : 查看數據庫裏阻塞和死鎖情況  
  ***************************************************************************/  
  use master  
  go  
  create procedure 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