use master go if exists (select * from [Link] where id = object_id('dbo.sp_who3 ') ) Drop Procedure dbo.

sp_who3 go /*==================================================================== -- Mircea Anton Nita - 2010 -- [Link] ======================================================================*/ Create Procedure dbo.sp_who3 @dbname sysname = null, @loginame sysname = null as set nocount on declare @retcode int ,@sidlow varbinary(85) ,@sidhigh varbinary(85) ,@sid1 varbinary(85) ,@spidlow int ,@spidhigh int ,@seldbid varchar(10) ,@charMaxLenLoginName varchar(24) ,@charMaxLenDBName varchar(24) ,@charMaxLenCPUTime varchar(10) ,@charMaxLenDiskIO varchar(10) ,@charMaxLenHostName varchar(24) ,@charMaxLenProgramName varchar(10) ,@charMaxLenLastBatch varchar(10) ,@charMaxLenCommand varchar(10) ,@charsidlow varchar(85) ,@charsidhigh varchar(85) ,@charspidlow varchar(11) ,@charspidhigh varchar(11) ,@command varchar(8000) -- set defaults set @retcode = 0 set @sidlow = convert(varbinary(85), (replicate(char(0), 85))) set @sidhigh = convert(varbinary(85), (replicate(char(1), 85))) set @spidlow = 0 set @spidhigh = 32767 if (@dbname IS NOT NULL) and ((select top 1 name from [Link] wi th (nolock) where name like '%'+@dbname+'%') IS NULL) begin print '-- No database could be located for filter "%'+@dbname+'%". Ignoring the parameter...' print '' select @dbname = null -- invalid @dbname passed as parameter is ignored end if (@loginame IS NULL) -- Simply default to all LoginNames. GOTO LABEL_PARAM select @sid1 = null if exists(select * from [Link] where loginname = @loginame)

select @sid1 = sid from [Link] where loginname = @loginame if (@sid1 IS NOT NULL) -- The parameter is a recognized login name. begin select @sidlow = suser_sid(@loginame) ,@sidhigh = suser_sid(@loginame) GOTO LABEL_PARAM end if (lower(@loginame collate Latin1_General_CI_AS) IN ('active')) -- Special acti on, not sleeping. begin select @loginame = lower(@loginame collate Latin1_General_CI_AS) GOTO LABEL_PARAM end if (patindex ('%[^0-9]%' , isnull(@loginame,'z')) = 0) -- Is a number. begin select @spidlow = convert(int, @loginame) ,@spidhigh = convert(int, @loginame) GOTO LABEL_PARAM end raiserror(15007,-1,-1,@loginame) select @retcode = 1 GOTO LABEL_RETURN LABEL_PARAM: -------------------- Capture consistent sysprocesses. ------------------select spid ,status ,sid ,hostname ,program_name ,cmd ,cpu ,physical_io ,blocked ,dbid ,convert(sysname, rtrim(loginame)) as loginname ,spid as 'spid_sort' , substring( convert(varchar,last_batch,111) ,6 ,5 ) + ' ' + substring( convert(varchar,last_batch,113) ,13 ,8 ) as 'last_batch_char' ,db_name(dbid) as 'dbname' into #tb1_sysprocesses from [Link] with (nolock) if @@error <> 0 begin select @retcode = @@error GOTO LABEL_RETURN end

if (@loginame in ('active')) delete #tb1_sysprocesses where lower(status) = 'sleeping' and upper(cmd) in ( 'AWAITING COMMAND' ,'LAZY WRITER' ,'CHECKPOINT SLEEP' ) and blocked = 0 and dbid not in (select dbid from [Link] with (nolock) where n ame like '%'+@dbname+'%') -- Prepare to dynamically optimize column widths. select @charsidlow = convert(varchar(85),@sidlow) ,@charsidhigh = convert(varchar(85),@sidhigh) ,@charspidlow = convert(varchar,@spidlow) ,@charspidhigh = convert(varchar,@spidhigh) select @charMaxLenLoginName = convert( varchar ,isnull( max( datalength(loginname)) ,16) ) ,@charMaxLenDBName = convert( varchar ,isnull( max( datalength( rtrim(convert(varchar(128),db_name(dbid))))) ,20) ) ,@charMaxLenCPUTime = convert( varchar ,isnull( max( datalength( rtrim(convert(varchar(128),cpu)))) ,7) ) ,@charMaxLenDiskIO = convert( varchar ,isnull( max( datalength( rtrim(convert(varchar(128),physical_io)))) ,6) ) ,@charMaxLenCommand = convert( varchar ,isnull( max( datalength( rtrim(convert(varchar(128),cmd)))) ,7) ) ,@charMaxLenHostName = convert( varchar ,isnull( max( datalength( rtrim(convert(varchar(128),hostname)))) ,16) ) ,@charMaxLenProgramName = convert( varchar ,isnull( max( datalength( rtrim(convert(varchar(128),program_name)))) ,11) ) ,@charMaxLenLastBatch = convert( varchar ,isnull( max( datalength( rtrim(convert(varchar(128),last_batch_char)))) ,9) )

from #tb1_sysprocesses where spid >= @spidlow and spid <= @spidhigh -- Output the report. set @command = ' SET nocount off SELECT SPID = convert(char(5),spid) ,Status = CASE lower(status) When ''sleeping'' Then lower(status) Else upper(status) END ,Login = substring(loginname,1,' + @charMaxLenLoginName + ') ,HostName = CASE hostname When Null Then '' .'' When '' '' Then '' .'' Else substring(hostname,1,' + @charMaxLenHostName + ') END ,BlkBy = CASE isnull(convert(char(5),blocked),''0'') When ''0'' Then '' .'' Else isnull(convert(char(5),blocked),''0'') END ,DBName = substring(case when dbid = 0 then null when dbid <> 0 then db_name(db id) end,1,' + @charMaxLenDBName + ') ,Command = substring(cmd,1,' + @charMaxLenCommand + ') ,CPUTime = substring(convert(varchar,cpu),1,' + @charMaxLenCPUTime + ') ,DiskIO = substring(convert(varchar,physical_io),1,' + @charMaxLenDiskIO + ') ,LastBatch = substring(last_batch_char,1,' + @charMaxLenLastBatch + ') ,ProgramName = substring(program_name,1,' + @charMaxLenProgramName + ') ,SPID = convert(char(5),spid) -- Handy extra for right-scrolling users. from #tb1_sysprocesses where spid >= ' + @charspidlow + ' and spid <= ' + @charspidhigh + ' ' if (@dbname is not null) set @command = @command + ' and dbname like ''%' + @dbname + '%'' ' set @command = @command + ' order by spid_sort

set nocount on ' exec (@command) LABEL_RETURN: if (object_id('[Link].#tb1_sysprocesses') is not null) drop table #tb1_syspr ocesses return @retcode -- sp_who3 go if exists (select * from sysobjects where id = object_id('dbo.sp_who3') and sysstat & 0xf = 4) grant exec on dbo.sp_who3 to public go