MSSQL自动重建出现碎片的索引的方法分享

-- ================================================
-- TEMPLATE GENERATED FROM TEMPLATE EXPLORER USING:
-- CREATE PROCEDURE (NEW MENU).SQL
--
-- USE THE SPECIFY VALUES FOR TEMPLATE PARAMETERS
-- COMMAND (CTRL-SHIFT-M) TO FILL IN THE PARAMETER
-- VALUES BELOW.
--
-- THIS BLOCK OF COMMENTS WILL NOT BE INCLUDED IN
-- THE DEFINITION OF THE PROCEDURE.
-- ================================================
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- =============================================
-- AUTHOR:  <AUTHOR,,WUXIANGQIAN>
-- CREATE DATE: <CREATE DATE,2014-05-16>
-- DESCRIPTION: <DESCRIPTION,重建出现碎片的索引>
-- =============================================
ALTER PROCEDURE USP_IMS_DEFRAGMENT_INDEXES
AS
--声明变量
SET NOCOUNT ON
DECLARE @TABLENAME VARCHAR (128) --表名称（已发生索引碎片）
DECLARE @EXECSTR VARCHAR (255) --执行重建索引的语句
DECLARE @INDEXNAME CHAR(255) --索引名称
DECLARE @DBNAME SYSNAME --数据库名称
DECLARE @DBNAMECHAR VARCHAR(20) --数据库名称
DECLARE @TABLEIDCHAR VARCHAR(255) --表名称（用于遍历索引碎片）

--检查是否在用户数据库里运行
SELECT @DBNAME = DB_NAME()
IF @DBNAME IN ('master', 'msdb', 'model', 'tempdb')
BEGIN
PRINT 'THIS PROCEDURE SHOULD NOT BE RUN IN SYSTEM DATABASES.'
RETURN
END ELSE
BEGIN
SET @DBNAMECHAR = 'DBNAME'
END

--第1阶段:检测碎片
--声明游标
DECLARE TABLES CURSOR FOR
SELECT CONVERT(VARCHAR,SO.ID)
FROM SYSOBJECTS SO
JOIN SYSINDEXES SI
ON SO.ID = SI.ID
WHERE SO.TYPE ='U'
AND SI.INDID < 2
AND SI.ROWS > 0

-- 创建一个临时表来存储碎片信息
CREATE TABLE #FRAGLIST (
TABLENAME CHAR (255),
INDEXNAME CHAR (255))

--打开游标
OPEN TABLES

-- 对数据库的所有表循环执行DBCC SHOWCONTIG命令
FETCH NEXT
FROM TABLES
INTO @TABLEIDCHAR

WHILE @@FETCH_STATUS = 0
BEGIN
--对表的所有索引进行统计
INSERT INTO #FRAGLIST

EXEC ('SELECT OBJECT_NAME(DT.OBJECT_ID) AS TABLENAME,SI.NAME AS INDEXNAME FROM '+
' (SELECT OBJECT_ID,INDEX_ID,AVG_FRAGMENTATION_IN_PERCENT,AVG_PAGE_SPACE_USED_IN_PERCENT '+
' FROM SYS.DM_DB_INDEX_PHYSICAL_STATS(DB_ID('''+@DBNAMECHAR+'''),object_id('''+@TABLEIDCHAR+''')'+
',NULL,NULL,''DETAILED'') WHERE INDEX_ID<>0)AS DT INNER JOIN SYS.INDEXES SI'+
' ON SI.OBJECT_ID=DT.OBJECT_ID AND SI.INDEX_ID=DT.INDEX_ID AND '+
' DT.AVG_FRAGMENTATION_IN_PERCENT>10'+
' AND DT.AVG_PAGE_SPACE_USED_IN_PERCENT<75 ORDER BY DT.AVG_FRAGMENTATION_IN_PERCENT DESC')
FETCH NEXT
FROM TABLES
INTO @TABLEIDCHAR
END

-- 关闭释放游标
CLOSE TABLES
DEALLOCATE TABLES

-- 为了检查，报告统计结果
SELECT FROM #FRAGLIST

--第2阶段: (整理碎片) 为每一个要整理碎片的索引声明游标
DECLARE INDEXES CURSOR FOR
SELECT TABLENAME, INDEXNAME
FROM #FRAGLIST
-- 输出开始时间
SELECT 'STARTED DEFRAGMENTING INDEXES AT ' + CONVERT(VARCHAR,GETDATE())
--打开游标
OPEN INDEXES
--循环所有的索引
FETCH NEXT
FROM INDEXES
INTO @TABLENAME, @INDEXNAME
WHILE @@FETCH_STATUS = 0
BEGIN
SET QUOTED_IDENTIFIER ON
SELECT @EXECSTR = 'ALTER INDEX '+@INDEXNAME+' ON '+@TABLENAME+' REBUILD WITH(FILLFACTOR=90,ONLINE=ON)'

SELECT 'Now executing: '
SELECT(@EXECSTR)
EXEC (@EXECSTR)
SET QUOTED_IDENTIFIER OFF
FETCH NEXT
FROM INDEXES
INTO @TABLENAME, @INDEXNAME
END
-- 关闭释放游标
CLOSE INDEXES
DEALLOCATE INDEXES

-- 报告结束时间
SELECT 'FINISHED DEFRAGMENTING INDEXES AT ' + CONVERT(VARCHAR,GETDATE())

-- 删除临时表
DROP TABLE #FRAGLIST
GO

GO

USE [DBNAME]

GO

EXEC [dbo].[USP_IMS_DEFRAGMENT_INDEXES]