-- ================================================
-- 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,重建出現(xiàn)碎片的索引>
-- =============================================
ALTER PROCEDURE USP_IMS_DEFRAGMENT_INDEXES
AS
--聲明變量
SET NOCOUNT ON
DECLARE @TABLENAME VARCHAR (128) --表名稱（已發(fā)生索引碎片）
DECLARE @EXECSTR VARCHAR (255) --執(zhí)行重建索引的語(yǔ)句
DECLARE @INDEXNAME CHAR(255) --索引名稱
DECLARE @DBNAME SYSNAME --數(shù)據(jù)庫(kù)名稱
DECLARE @DBNAMECHAR VARCHAR(20) --數(shù)據(jù)庫(kù)名稱
DECLARE @TABLEIDCHAR VARCHAR(255) --表名稱（用于遍歷索引碎片）

--檢查是否在用戶數(shù)據(jù)庫(kù)里運(yùn)行
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階段:檢測(cè)碎片
--聲明游標(biāo)
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

-- 創(chuàng)建一個(gè)臨時(shí)表來(lái)存儲(chǔ)碎片信息
CREATE TABLE #FRAGLIST (
TABLENAME CHAR (255),
INDEXNAME CHAR (255))

--打開(kāi)游標(biāo)
OPEN TABLES

-- 對(duì)數(shù)據(jù)庫(kù)的所有表循環(huán)執(zhí)行DBCC SHOWCONTIG命令
FETCH NEXT
FROM TABLES
INTO @TABLEIDCHAR

WHILE @@FETCH_STATUS = 0
BEGIN
--對(duì)表的所有索引進(jìn)行統(tǒng)計(jì)
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

-- 關(guān)閉釋放游標(biāo)
CLOSE TABLES
DEALLOCATE TABLES

-- 為了檢查，報(bào)告統(tǒng)計(jì)結(jié)果
SELECT * FROM #FRAGLIST

--第2階段: (整理碎片) 為每一個(gè)要整理碎片的索引聲明游標(biāo)
DECLARE INDEXES CURSOR FOR
SELECT TABLENAME, INDEXNAME
FROM #FRAGLIST
-- 輸出開(kāi)始時(shí)間
SELECT 'STARTED DEFRAGMENTING INDEXES AT ' + CONVERT(VARCHAR,GETDATE())
--打開(kāi)游標(biāo)
OPEN INDEXES
--循環(huán)所有的索引
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
-- 關(guān)閉釋放游標(biāo)
CLOSE INDEXES
DEALLOCATE INDEXES

-- 報(bào)告結(jié)束時(shí)間
SELECT 'FINISHED DEFRAGMENTING INDEXES AT ' + CONVERT(VARCHAR,GETDATE())

-- 刪除臨時(shí)表
DROP TABLE #FRAGLIST
GO

GO

USE [DBNAME]

GO

EXEC [dbo].[USP_IMS_DEFRAGMENT_INDEXES]