-- Удаление всех лишний процессов на SQL сервере.
-- Выполнять перед обслуживанием базы.
-- KtaK

DECLARE @SPID           smallint,           -- ID текущего процесса
        @DBName         VARCHAR(  128  ),    -- имя базы
        @loginame       VARCHAR(  128  ), 
        @hostname       VARCHAR(  128  ), 
        @program_name   VARCHAR(  128  ), 
        @status         VARCHAR(  128  ), 
        @cmd            VARCHAR(  128  ), 
        @gate_cmd       VARCHAR( 500 ),
        @message        VARCHAR( 500 ),
        @subject        VARCHAR( 500 ),
        @recipients     VARCHAR( 500 )

CREATE TABLE ##DroppedProcesses
(  id_com     DSIDENTIFIER IDENTITY,
   comment    varchar( 500 )
)

SELECT @DBName = 'mybasename'

-- Пройдемся по всем процессам, отбросив системные
DECLARE KillLeftProcesses CURSOR FOR
select spid, LTRIM(RTRIM(loginame)), LTRIM(RTRIM(hostname)), LTRIM(RTRIM(program_name)), LTRIM(RTRIM(status)), LTRIM(RTRIM(cmd))
  from master..sysprocesses
 where dbid = db_id(@DBName)
   and hostname not in ('serv1', 'serv2', 'serv3', 'serv4') -- хосты, с которых нельзя килять
   and (loginame not like '%SQLAdmin%') -- логины, которых нельзя килять
   and (program_name not like 'SQLBlocks%') -- программы, которые нельзя килять
   and (cmd not like 'LAZY WRITER%' and cmd not like 'LOG WRITER%' and cmd not like 'TASK MANAGER%' and cmd not like 'SIGNAL HANDLER%' and cmd not like 'LOCK MONITOR%'and cmd not like 'CHECKPOINT SLEEP%') -- команды, которые нельзя килять
 order by hostname, loginame

OPEN KillLeftProcesses
FETCH NEXT FROM KillLeftProcesses INTO @SPID, @loginame, @hostname, @program_name, @status, @cmd
WHILE @@FETCH_STATUS =  0 
BEGIN
  exec ('kill ' + @SPID) -- убьем текущий процесс 
--  PRINT 'KILLED PROCESS, SPID = ' + CONVERT(nvarchar(4), @SPID) + ', LOGIN =  ' + RTRIM(@loginame)  + ', HOST = ' +  RTRIM(@hostname)  + ', PROG = ' +  RTRIM(@program_name)  + ', STATUS = ' +  @status  + ', CMD =  ' +  @cmd
  INSERT INTO ##DroppedProcesses (comment)
  VALUES ('KILLED by KtaK, SPID = ' + CONVERT(nvarchar( 4 ), @SPID) + ', LOGIN =  ' + RTRIM(@loginame)  + ',	HOST = ' +  RTRIM(@hostname)  + ', PROG = ' +  RTRIM(@program_name)  + ', STATUS = ' +  @status  + ', CMD =  ' +  @cmd)
  
  FETCH NEXT FROM KillLeftProcesses INTO @SPID, @loginame, @hostname, @program_name, @status, @cmd
END
CLOSE KillLeftProcesses 
DEALLOCATE KillLeftProcesses

-- Отправим письмо с инфой об убитых процессах
  SET @gate_cmd = 'select comment from ##DroppedProcesses'
  SET @message = 'В приложении - убитые перед регламентными операциями, процессы'
  SET @subject = 'MS SQL Reports. Killed users.'
  SET @recipients = 'ktak@blabla.ru'
  EXEC msdb..sp_send_dbmail 
       @profile_name = 'default'
      ,@recipients = @recipients
      ,@subject = @subject
      ,@body = @message
      ,@body_format = 'TEXT'
      ,@query = @gate_cmd
      ,@execute_query_database = @DBName
      ,@attach_query_result_as_file  = 'TRUE'
      ,@query_result_header =  1 
      ,@query_result_width =  1000 

DROP TABLE ##DroppedProcesses