跟踪数据库中执行时间超过1.5秒的语句及SP，导入数据库

跟踪

--============================================================================
--新建两个目录 D:\InOut\TraceDB  D:\InOut\TraceLog\
--建数据库，建跟踪执行时间超过1.5秒的语句及SP
--建作业，每天在固定时间将跟踪文件导入数据库
--============================================================================
USE [master]
GO
/****** Object:  Database [TraceDB]    Script Date: 2017/2/15 11:16:02 ******/
CREATE DATABASE [TraceDB]
 CONTAINMENT = NONE
 ON  PRIMARY
( NAME = N'TraceDB', FILENAME = N'D:\inout\TraceDB\TraceDB.mdf' , SIZE = 102400KB , MAXSIZE = UNLIMITED, FILEGROWTH = 102400KB )
 LOG ON
( NAME = N'TraceDB_log', FILENAME = N'D:\inout\TraceDB\TraceDB_log.ldf' , SIZE = 20416KB , MAXSIZE = 2048GB , FILEGROWTH = 102400KB )
GO
--ALTER DATABASE [TraceDB] SET COMPATIBILITY_LEVEL = 120
--GO
IF (1 = FULLTEXTSERVICEPROPERTY('IsFullTextInstalled'))
begin
EXEC [TraceDB].[dbo].[sp_fulltext_database] @action = 'enable'
end
GO
ALTER DATABASE [TraceDB] SET ANSI_NULL_DEFAULT OFF
GO
ALTER DATABASE [TraceDB] SET ANSI_NULLS OFF
GO
ALTER DATABASE [TraceDB] SET ANSI_PADDING OFF
GO
ALTER DATABASE [TraceDB] SET ANSI_WARNINGS OFF
GO
ALTER DATABASE [TraceDB] SET ARITHABORT OFF
GO
ALTER DATABASE [TraceDB] SET AUTO_CLOSE OFF
GO
ALTER DATABASE [TraceDB] SET AUTO_SHRINK OFF
GO
ALTER DATABASE [TraceDB] SET AUTO_UPDATE_STATISTICS ON
GO
ALTER DATABASE [TraceDB] SET CURSOR_CLOSE_ON_COMMIT OFF
GO
ALTER DATABASE [TraceDB] SET CURSOR_DEFAULT  GLOBAL
GO
ALTER DATABASE [TraceDB] SET CONCAT_NULL_YIELDS_NULL OFF
GO
ALTER DATABASE [TraceDB] SET NUMERIC_ROUNDABORT OFF
GO
ALTER DATABASE [TraceDB] SET QUOTED_IDENTIFIER OFF
GO
ALTER DATABASE [TraceDB] SET RECURSIVE_TRIGGERS OFF
GO
ALTER DATABASE [TraceDB] SET  ENABLE_BROKER
GO
ALTER DATABASE [TraceDB] SET AUTO_UPDATE_STATISTICS_ASYNC OFF
GO
ALTER DATABASE [TraceDB] SET DATE_CORRELATION_OPTIMIZATION OFF
GO
ALTER DATABASE [TraceDB] SET TRUSTWORTHY OFF
GO
ALTER DATABASE [TraceDB] SET ALLOW_SNAPSHOT_ISOLATION OFF
GO
ALTER DATABASE [TraceDB] SET PARAMETERIZATION SIMPLE
GO
ALTER DATABASE [TraceDB] SET READ_COMMITTED_SNAPSHOT OFF
GO
ALTER DATABASE [TraceDB] SET HONOR_BROKER_PRIORITY OFF
GO
ALTER DATABASE [TraceDB] SET RECOVERY FULL
GO
ALTER DATABASE [TraceDB] SET  MULTI_USER
GO
ALTER DATABASE [TraceDB] SET PAGE_VERIFY CHECKSUM
GO
ALTER DATABASE [TraceDB] SET DB_CHAINING OFF
GO
ALTER DATABASE [TraceDB] SET FILESTREAM( NON_TRANSACTED_ACCESS = OFF )
GO
ALTER DATABASE [TraceDB] SET TARGET_RECOVERY_TIME = 0 SECONDS
GO
ALTER DATABASE [TraceDB] SET DELAYED_DURABILITY = DISABLED
GO
EXEC sys.sp_db_vardecimal_storage_format N'TraceDB', N'ON'
GO
USE [TraceDB]
GO
/****** Object:  UserDefinedFunction [dbo].[Split]    Script Date: 2017/2/15 11:16:02 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO

--表值函数用以截取字符串
--如果为其添加一列主键id,则其顺序就会固定了
create FUNCTION [dbo].[Split](@text NVARCHAR(max))
RETURNS @tempTable TABLE(value NVARCHAR(1000))
AS
BEGIN
     DECLARE @StartIndex INT                --开始查找的位置
     DECLARE @FindIndex INT                --找到的位置
     DECLARE @Content    VARCHAR(4000)    --找到的值
     --初始化一些变量
     SET @StartIndex = 1 --T-SQL中字符串的查找位置是从1开始的
     SET @FindIndex=0

     --开始循环查找字符串逗号
     WHILE(@StartIndex <= LEN(@Text))
     BEGIN
         --查找字符串函数 CHARINDEX 第一个参数是要找的字符串
         --                            第二个参数是在哪里查找这个字符串
         --                            第三个参数是开始查找的位置
         --返回值是找到字符串的位置
         SELECT @FindIndex = CHARINDEX(',' ,@Text,@StartIndex)
         --判断有没找到 没找到返回0
         IF(@FindIndex =0 OR @FindIndex IS NULL)
         BEGIN
             --如果没有找到就表示找完了
             SET @FindIndex = LEN(@Text)+1
         END
         --截取字符串函数 SUBSTRING 第一个参数是要截取的字符串
         --                            第二个参数是开始的位置
         --                            第三个参数是截取的长度
         SET @Content =SUBSTRING(@Text,@StartIndex,@FindIndex-@StartIndex)
         --初始化下次查找的位置
         SET @StartIndex = @FindIndex+1
         --把找的的值插入到要返回的Table类型中
         INSERT INTO @tempTable (Value) VALUES (@Content)
     END
     RETURN
END

GO
/****** Object:  Table [dbo].[CommandLog]    Script Date: 2017/2/15 11:16:02 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
SET ANSI_PADDING ON
GO
CREATE TABLE [dbo].[CommandLog](
    [ID] [int] IDENTITY(1,1) NOT NULL,
    [DatabaseName] [sysname] NULL,
    [SchemaName] [sysname] NULL,
    [ObjectName] [sysname] NULL,
    [ObjectType] [char](2) NULL,
    [IndexName] [sysname] NULL,
    [IndexType] [tinyint] NULL,
    [StatisticsName] [sysname] NULL,
    [PartitionNumber] [int] NULL,
    [ExtendedInfo] [xml] NULL,
    [Command] [nvarchar](max) NOT NULL,
    [CommandType] [nvarchar](60) NOT NULL,
    [StartTime] [datetime] NOT NULL,
    [EndTime] [datetime] NULL,
    [ErrorNumber] [int] NULL,
    [ErrorMessage] [nvarchar](max) NULL,
 CONSTRAINT [PK_CommandLog] PRIMARY KEY CLUSTERED
(
    [ID] ASC
)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
) ON [PRIMARY] TEXTIMAGE_ON [PRIMARY]

GO
SET ANSI_PADDING OFF
GO
/****** Object:  Table [dbo].[TraceLog]    Script Date: 2017/2/15 11:16:02 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE TABLE [dbo].[TraceLog](
    [RowNumber] [int] IDENTITY(0,1) NOT NULL,
    [EventClass] [int] NULL,
    [Duration] [bigint] NULL,
    [TextData] [ntext] NULL,
    [SPID] [int] NULL,
    [BinaryData] [image] NULL,
    [CPU] [int] NULL,
    [EndTime] [datetime] NULL,
    [ObjectName] [nvarchar](128) NULL,
    [StartTime] [datetime] NULL,
    [Reads] [bigint] NULL,
    [Writes] [bigint] NULL,
    [DataBaseName] [nvarchar](256) NULL,
    [ApplicationName] [nvarchar](256) NULL,
    [HostName] [nvarchar](256) NULL,
PRIMARY KEY CLUSTERED
(
    [RowNumber] ASC
)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
) ON [PRIMARY] TEXTIMAGE_ON [PRIMARY]

GO
/****** Object:  StoredProcedure [dbo].[CommandExecute]    Script Date: 2017/2/15 11:16:02 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO

CREATE PROCEDURE [dbo].[CommandExecute]

@Command nvarchar(max),
@CommandType nvarchar(max),
@Mode int,
@Comment nvarchar(max) = NULL,
@DatabaseName nvarchar(max) = NULL,
@SchemaName nvarchar(max) = NULL,
@ObjectName nvarchar(max) = NULL,
@ObjectType nvarchar(max) = NULL,
@IndexName nvarchar(max) = NULL,
@IndexType int = NULL,
@StatisticsName nvarchar(max) = NULL,
@PartitionNumber int = NULL,
@ExtendedInfo xml = NULL,
@LogToTable bit,
@Exec bit
AS
BEGIN

  SET NOCOUNT ON

  DECLARE @StartMessage nvarchar(max)
  DECLARE @EndMessage nvarchar(max)
  DECLARE @ErrorMessage nvarchar(max)
  DECLARE @ErrorMessageOriginal nvarchar(max)

  DECLARE @StartTime datetime
  DECLARE @EndTime datetime

  DECLARE @StartTimeSec datetime
  DECLARE @EndTimeSec datetime

  DECLARE @ID int

  DECLARE @Error int
  DECLARE @ReturnCode int

  SET @Error = 0
  SET @ReturnCode = 0

  ----------------------------------------------------------------------------------------------------
  --// Check core requirements                                                                    //--
  ----------------------------------------------------------------------------------------------------

  IF @LogToTable = 1 AND NOT EXISTS (SELECT * FROM sys.objects objects INNER JOIN sys.schemas schemas ON objects.[schema_id] = schemas.[schema_id] WHERE objects.[type] = 'U' AND schemas.[name] = 'dbo' AND objects.[name] = 'CommandLog')
  BEGIN
    SET @ErrorMessage = 'The table CommandLog is missing. Download https://ola.hallengren.com/scripts/CommandLog.sql.' + CHAR(13) + CHAR(10) + ' '
    RAISERROR(@ErrorMessage,16,1) WITH NOWAIT
    SET @Error = @@ERROR
  END

  IF @Error <> 0
  BEGIN
    SET @ReturnCode = @Error
    GOTO ReturnCode
  END

  ----------------------------------------------------------------------------------------------------
  --// Check input parameters                                                                     //--
  ----------------------------------------------------------------------------------------------------

  IF @Command IS NULL OR @Command = ''
  BEGIN
    SET @ErrorMessage = 'The value for the parameter @Command is not supported.' + CHAR(13) + CHAR(10) + ' '
    RAISERROR(@ErrorMessage,16,1) WITH NOWAIT
    SET @Error = @@ERROR
  END

  IF @CommandType IS NULL OR @CommandType = '' OR LEN(@CommandType) > 60
  BEGIN
    SET @ErrorMessage = 'The value for the parameter @CommandType is not supported.' + CHAR(13) + CHAR(10) + ' '
    RAISERROR(@ErrorMessage,16,1) WITH NOWAIT
    SET @Error = @@ERROR
  END

  IF @Mode NOT IN(1,2) OR @Mode IS NULL
  BEGIN
    SET @ErrorMessage = 'The value for the parameter @Mode is not supported.' + CHAR(13) + CHAR(10) + ' '
    RAISERROR(@ErrorMessage,16,1) WITH NOWAIT
    SET @Error = @@ERROR
  END

  IF @Error <> 0
  BEGIN
    SET @ReturnCode = @Error
    GOTO ReturnCode
  END

  ----------------------------------------------------------------------------------------------------
  --// Log initial information                                                                    //--
  ----------------------------------------------------------------------------------------------------

  SET @StartTime = GETDATE()
  SET @StartTimeSec = CONVERT(datetime,CONVERT(nvarchar,@StartTime,120),120)

  IF @LogToTable=0
  BEGIN
      SET @StartMessage = 'Date and time: ' + CONVERT(nvarchar,@StartTimeSec,120) + CHAR(13) + CHAR(10)
      SET @StartMessage = @StartMessage + 'Command: ' + @Command
      IF @Comment IS NOT NULL SET @StartMessage = @StartMessage + CHAR(13) + CHAR(10) + 'Comment: ' + @Comment
      SET @StartMessage = REPLACE(@StartMessage,'%','%%')
      RAISERROR(@StartMessage,10,1) WITH NOWAIT
  END
  IF @LogToTable = 1
  BEGIN
    INSERT INTO dbo.CommandLog (DatabaseName, SchemaName, ObjectName, ObjectType, IndexName, IndexType, StatisticsName, PartitionNumber, ExtendedInfo, CommandType, Command, StartTime)
    VALUES (@DatabaseName, @SchemaName, @ObjectName, @ObjectType, @IndexName, @IndexType, @StatisticsName, @PartitionNumber, @ExtendedInfo, @CommandType, @Command, @StartTime)
  END

  SET @ID = SCOPE_IDENTITY()

  ----------------------------------------------------------------------------------------------------
  --// Execute command                                                                            //--
  ----------------------------------------------------------------------------------------------------

  IF @Mode = 1 AND @Exec = 1
  BEGIN
    EXECUTE(@Command)
    SET @Error = @@ERROR
    SET @ReturnCode = @Error
  END

  IF @Mode = 2 AND @Exec =1
  BEGIN
    BEGIN TRY
      EXECUTE(@Command)
    END TRY
    BEGIN CATCH
      SET @Error = ERROR_NUMBER()
      SET @ReturnCode = @Error
      SET @ErrorMessageOriginal = ERROR_MESSAGE()
      SET @ErrorMessage = 'Msg ' + CAST(@Error AS nvarchar) + ', ' + ISNULL(@ErrorMessageOriginal,'')
      RAISERROR(@ErrorMessage,16,1) WITH NOWAIT
    END CATCH
  END

  ----------------------------------------------------------------------------------------------------
  --// Log completing information                                                                 //--
  ----------------------------------------------------------------------------------------------------

  SET @EndTime = GETDATE()
  SET @EndTimeSec = CONVERT(datetime,CONVERT(varchar,@EndTime,120),120)

  IF @LogToTable=0
  BEGIN
      SET @EndMessage = 'Outcome: ' + CASE WHEN @Exec = 0 THEN 'Not Executed' WHEN @Error = 0 THEN 'Succeeded' ELSE 'Failed' END + CHAR(13) + CHAR(10)
      SET @EndMessage = @EndMessage + 'Duration: ' + CASE WHEN DATEDIFF(ss,@StartTimeSec, @EndTimeSec)/(24*3600) > 0 THEN CAST(DATEDIFF(ss,@StartTimeSec, @EndTimeSec)/(24*3600) AS nvarchar) + '.' ELSE '' END + CONVERT(nvarchar,@EndTimeSec - @StartTimeSec,108) + CHAR(13) + CHAR(10)
      --SET @EndMessage = @EndMessage + 'Date and time: ' + CONVERT(nvarchar,@EndTimeSec,120) + CHAR(13) + CHAR(10) + ' '
      SET @EndMessage = REPLACE(@EndMessage,'%','%%')
      RAISERROR(@EndMessage,10,1) WITH NOWAIT
  END

  IF @LogToTable = 1
  BEGIN
    UPDATE dbo.CommandLog
    SET EndTime = @EndTime,
        ErrorNumber = CASE WHEN @Exec = 0 THEN NULL ELSE @Error END,
        ErrorMessage = @ErrorMessageOriginal
    WHERE ID = @ID
  END

  ReturnCode:
  IF @ReturnCode <> 0
  BEGIN
    RETURN @ReturnCode
  END

  ----------------------------------------------------------------------------------------------------

END

GO
/****** Object:  StoredProcedure [dbo].[DataBaseBackup]    Script Date: 2017/2/15 11:16:02 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO

/****** Object:  StoredProcedure [dbo].[DataBaseBackup]    Script Date: 2015/11/5 9:06:43 ******/
create PROCEDURE [dbo].[DataBaseBackup]
    @databases NVARCHAR(1000) ,
    @directory NVARCHAR(MAX) = 'X:\Backup' ,
    @BackupType NVARCHAR(MAX) ,/*FULL,DIFF,LOG*//*简写:D,I,L*/
    @Verify BIT = 1 ,
    @Compress BIT = 1 ,
    @copyOnly BIT = 0 ,
    @LogToTable BIT = 0,
    @exec BIT = 0
AS
BEGIN
    SET NOCOUNT ON;
    DECLARE @Description NVARCHAR(MAX) = NULL ,
        @NumberOfFiles INT = NULL ,
        @CheckSum BIT = 0 ,
        @OverrideBackupPreference NVARCHAR(MAX) = 0 ,
        @ReadWriteFileGroups NVARCHAR(MAX) = 0 ,
        @Threads INT = NULL ,
        @NoRecovery NVARCHAR(MAX) = 0;
-- 声明变量
    BEGIN
        DECLARE @Version NUMERIC(18, 10);
        DECLARE @Cluster NVARCHAR(MAX);

        DECLARE @StartMessage NVARCHAR(MAX);
        DECLARE @EndMessage NVARCHAR(MAX);
        DECLARE @DatabaseMessage NVARCHAR(MAX);
        DECLARE @ErrorMessage NVARCHAR(MAX);

        DECLARE @Error INT;
        DECLARE @ReturnCode INT;

        DECLARE @CurrentBackupSet TABLE
            (
              ID INT IDENTITY
                     PRIMARY KEY ,
              VerifyCompleted BIT ,
              VerifyOutput INT
            );

        DECLARE @CurrentFiles TABLE
            (
              [Type] NVARCHAR(MAX) ,
              FilePath NVARCHAR(MAX)
            );

        DECLARE @CurrentDirectories TABLE
            (
              ID INT PRIMARY KEY ,
              DirectoryPath NVARCHAR(MAX) ,
              CleanupDate DATETIME ,
              CleanupMode NVARCHAR(MAX) ,
              CreateCompleted BIT ,
              CleanupCompleted BIT ,
              CreateOutput INT ,
              CleanupOutput INT
            );

-- 存放选择的数据库
        DECLARE @SelectedDatabases TABLE
            (
              DatabaseName NVARCHAR(MAX) ,
              DatabaseType NVARCHAR(MAX) ,
              Selected BIT
            );

        DECLARE @DirectoryInfo TABLE
            (
              FileExists BIT ,
              FileIsADirectory BIT ,
              ParentDirectoryExists BIT
            );

-- 存放所有数据库
        DECLARE @tmpDatabases TABLE
            (
              ID INT IDENTITY ,
              DatabaseName NVARCHAR(MAX) ,
              DatabaseNameFS NVARCHAR(MAX) ,
              DatabaseType NVARCHAR(MAX) ,
              Selected BIT ,
              Completed BIT ,
              PRIMARY KEY ( Selected, Completed, ID )
            );

        -- 存放备份目录
        DECLARE @Directories TABLE
            (
              ID INT PRIMARY KEY ,
              DirectoryPath NVARCHAR(MAX) ,
              Mirror BIT ,
              Completed BIT
            );
        DECLARE @CurrentRootDirectoryID INT;
        DECLARE @CurrentRootDirectoryPath NVARCHAR(4000);

        DECLARE @CurrentDBID INT;
        DECLARE @CurrentDatabaseID INT;
        DECLARE @CurrentDatabaseName NVARCHAR(MAX);
        DECLARE @CurrentBackupType NVARCHAR(MAX);
        DECLARE @CurrentFileExtension NVARCHAR(MAX);
        DECLARE @CurrentFileNumber INT;
        -- 生成的文件名
        DECLARE @fileName NVARCHAR(MAX);
        DECLARE @CurrentDifferentialBaseLSN NUMERIC(25, 0);
        DECLARE @CurrentDifferentialBaseIsSnapshot BIT;
        DECLARE @CurrentLogLSN NUMERIC(25, 0);
        DECLARE @CurrentLatestBackup DATETIME;
        DECLARE @CurrentDatabaseNameFS NVARCHAR(MAX);
        DECLARE @CurrentDirectoryID INT;
        DECLARE @CurrentDirectoryPath NVARCHAR(MAX);
        DECLARE @CurrentFilePath NVARCHAR(MAX);
        DECLARE @CurrentDate DATETIME;
        DECLARE @CurrentCleanupDate DATETIME;
        DECLARE @CurrentIsDatabaseAccessible BIT;
        DECLARE @CurrentAvailabilityGroup NVARCHAR(MAX);
        DECLARE @CurrentAvailabilityGroupRole NVARCHAR(MAX);
        DECLARE @CurrentAvailabilityGroupBackupPreference NVARCHAR(MAX);
        DECLARE @CurrentIsPreferredBackupReplica BIT;
        DECLARE @CurrentDatabaseMirroringRole NVARCHAR(MAX);
        DECLARE @CurrentLogShippingRole NVARCHAR(MAX);
        DECLARE @CurrentBackupSetID INT;
        DECLARE @CurrentIsMirror BIT;

        DECLARE @CurrentCommand01 NVARCHAR(MAX);
        DECLARE @CurrentCommand03 NVARCHAR(MAX);
        DECLARE @CurrentCommand04 NVARCHAR(MAX);

        DECLARE @CurrentCommandOutput01 INT;
        DECLARE @CurrentCommandOutput03 INT;
        DECLARE @CurrentCommandOutput04 INT;        

        DECLARE @CurrentCommandType01 NVARCHAR(MAX);
        DECLARE @CurrentCommandType03 NVARCHAR(MAX);
        DECLARE @CurrentCommandType04 NVARCHAR(MAX);
    END; 

    SET @Version = CAST(LEFT(CAST(SERVERPROPERTY('ProductVersion') AS NVARCHAR(MAX)),
                             CHARINDEX('.', CAST(SERVERPROPERTY('ProductVersion') AS NVARCHAR(MAX))) - 1) + '.'
        + REPLACE(RIGHT(CAST(SERVERPROPERTY('ProductVersion') AS NVARCHAR(MAX)),
                        LEN(CAST(SERVERPROPERTY('ProductVersion') AS NVARCHAR(MAX))) - CHARINDEX('.',
                                                                                                 CAST(SERVERPROPERTY('ProductVersion') AS NVARCHAR(MAX)))),
                  '.', '') AS NUMERIC(18, 10));

    IF @Version >= 11
        BEGIN
            SELECT  @Cluster = cluster_name
            FROM    sys.dm_hadr_cluster;
        END;     

    WITH    db1 ( dbname )
              AS ( SELECT   value AS dbname
                   FROM     dbo.Split(@databases)
                 ),
            db2
              AS ( SELECT   CASE WHEN dbname LIKE '-%' THEN RIGHT(dbname, LEN(dbname) - 1)
                                 ELSE dbname
                            END AS dbname, CASE WHEN dbname LIKE '-%' THEN 0
                                                ELSE 1
                                           END AS selected
                   FROM     db1
                 ),
            db3
              AS ( SELECT   CASE WHEN dbname IN ( 'ALL_DATABASES', 'SYSTEM_DATABASES', 'USER_DATABASES' ) THEN '%'
                                 ELSE dbname
                            END AS dbname, CASE WHEN dbname = 'SYSTEM_DATABASES' THEN 'S'
                                                WHEN dbname = 'USER_DATABASES' THEN 'U'
                                                ELSE NULL
                                           END AS DatabaseType, selected
                   FROM     db2
                 )
        INSERT  INTO @SelectedDatabases ( DatabaseName, DatabaseType, Selected )
        SELECT  dbname, DatabaseType, selected
        FROM    db3
        OPTION  ( MAXRECURSION 0 );

    INSERT  INTO @tmpDatabases ( DatabaseName, DatabaseNameFS, DatabaseType, Selected, Completed )
    SELECT  [name] AS DatabaseName,
            REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE([name], '\', ''), '/', ''),
                                                                            ':', ''), '*', ''), '?', ''), '"', ''), '<',
                                            ''), '>', ''), '|', ''), ' ', '') AS DatabaseNameFS,
            CASE WHEN name IN ( 'master', 'msdb', 'model' ) THEN 'S'
                 ELSE 'U'
            END AS DatabaseType, 0 AS Selected, 0 AS Completed
    FROM    sys.databases
    WHERE   [name] <> 'tempdb'
            AND source_database_id IS NULL
    ORDER BY [name] ASC;

    -- 先添加要备份的数据库
    UPDATE  tmpDatabases
    SET     tmpDatabases.Selected = SelectedDatabases.Selected
    FROM    @tmpDatabases tmpDatabases
    INNER JOIN @SelectedDatabases SelectedDatabases ON tmpDatabases.DatabaseName LIKE REPLACE(SelectedDatabases.DatabaseName,
                                                                                              '_', '[_]')
                                                       AND ( tmpDatabases.DatabaseType = SelectedDatabases.DatabaseType
                                                             OR SelectedDatabases.DatabaseType IS NULL )
    WHERE   SelectedDatabases.Selected = 1;

    -- 再排除不要备份的数据库
    UPDATE  tmpDatabases
    SET     tmpDatabases.Selected = SelectedDatabases.Selected
    FROM    @tmpDatabases tmpDatabases
    INNER JOIN @SelectedDatabases SelectedDatabases ON tmpDatabases.DatabaseName LIKE REPLACE(SelectedDatabases.DatabaseName,
                                                                                              '_', '[_]')
                                                       AND ( tmpDatabases.DatabaseType = SelectedDatabases.DatabaseType
                                                             OR SelectedDatabases.DatabaseType IS NULL )
    WHERE   SelectedDatabases.Selected = 0;

    IF @databases IS NULL
        OR NOT EXISTS ( SELECT  *
                        FROM    @SelectedDatabases )
        OR EXISTS ( SELECT  *
                    FROM    @SelectedDatabases
                    WHERE   DatabaseName IS NULL
                            OR DatabaseName = '' )
        BEGIN
            SET @ErrorMessage = 'The value for the parameter @Databases is not supported.' + CHAR(13) + CHAR(10) + ' ';
            RAISERROR(@ErrorMessage,16,1) WITH NOWAIT;
            SET @Error = @@ERROR;
        END;

  ----------------------------------------------------------------------------------------------------
  --// Check database names                                                                       //--
  ----------------------------------------------------------------------------------------------------

    SET @ErrorMessage = '';
    SELECT  @ErrorMessage = @ErrorMessage + QUOTENAME(DatabaseName) + ', '
    FROM    @tmpDatabases
    WHERE   Selected = 1
            AND DatabaseNameFS = ''
    ORDER BY DatabaseName ASC;
    IF @@ROWCOUNT > 0
        BEGIN
            SET @ErrorMessage = 'The names of the following databases are not supported: ' + LEFT(@ErrorMessage,
                                                                                                  LEN(@ErrorMessage) - 1)
                + '.' + CHAR(13) + CHAR(10) + ' ';
            RAISERROR(@ErrorMessage,16,1) WITH NOWAIT;
            SET @Error = @@ERROR;
        END;

    SET @ErrorMessage = '';
    SELECT  @ErrorMessage = @ErrorMessage + QUOTENAME(DatabaseName) + ', '
    FROM    @tmpDatabases
    WHERE   UPPER(DatabaseNameFS) IN ( SELECT   UPPER(DatabaseNameFS)
                                       FROM     @tmpDatabases
                                       GROUP BY UPPER(DatabaseNameFS)
                                       HAVING   COUNT(*) > 1 )
            AND UPPER(DatabaseNameFS) IN ( SELECT   UPPER(DatabaseNameFS)
                                           FROM     @tmpDatabases
                                           WHERE    Selected = 1 )
            AND DatabaseNameFS <> ''
    ORDER BY DatabaseName ASC
    OPTION  ( RECOMPILE );

    IF @@ROWCOUNT > 0
        BEGIN
            SET @ErrorMessage = 'The names of the following databases are not unique in the file system: '
                + LEFT(@ErrorMessage, LEN(@ErrorMessage) - 1) + '.' + CHAR(13) + CHAR(10) + ' ';
            RAISERROR(@ErrorMessage,16,1) WITH NOWAIT;
            SET @Error = @@ERROR;
        END;

    INSERT  INTO @Directories ( ID, DirectoryPath, Completed )
    SELECT  ROW_NUMBER() OVER ( ORDER BY value ASC ) AS ID, value, 0
    FROM    dbo.Split(@directory)
    OPTION  ( MAXRECURSION 0 );

    IF EXISTS ( SELECT  *
                FROM    @Directories
                WHERE   ( NOT ( DirectoryPath LIKE '_:'
                                OR DirectoryPath LIKE '_:\%'
                                OR DirectoryPath LIKE '\\%\%' )
                          OR DirectoryPath IS NULL
                          OR LEFT(DirectoryPath, 1) = ' '
                          OR RIGHT(DirectoryPath, 1) = ' ' ) )
        BEGIN
            SET @ErrorMessage = 'The value for the parameter @Directory is not supported.' + CHAR(13) + CHAR(10) + ' ';
            RAISERROR(@ErrorMessage,16,1) WITH NOWAIT;
            SET @Error = @@ERROR;
        END;

-- 校验备份目录
    WHILE EXISTS ( SELECT   *
                   FROM     @Directories
                   WHERE    Completed = 0 )
        BEGIN
            SELECT TOP 1
                    @CurrentRootDirectoryID = ID, @CurrentRootDirectoryPath = DirectoryPath
            FROM    @Directories
            WHERE   Completed = 0
            ORDER BY ID ASC;

            INSERT  INTO @DirectoryInfo ( FileExists, FileIsADirectory, ParentDirectoryExists )
                    EXECUTE [master].dbo.xp_fileexist @CurrentRootDirectoryPath;

            IF NOT EXISTS ( SELECT  *
                            FROM    @DirectoryInfo
                            WHERE   FileExists = 0
                                    AND FileIsADirectory = 1
                                    AND ParentDirectoryExists = 1 )
                BEGIN
                    SET @ErrorMessage = 'The directory ' + @CurrentRootDirectoryPath + ' does not exist.' + CHAR(13)
                        + CHAR(10) + ' ';
                    RAISERROR(@ErrorMessage,16,1) WITH NOWAIT;
                    SET @Error = @@ERROR;
                END;

            UPDATE  @Directories
            SET     Completed = 1
            WHERE   ID = @CurrentRootDirectoryID;

            SET @CurrentRootDirectoryID = NULL;
            SET @CurrentRootDirectoryPath = NULL;

            DELETE  FROM @DirectoryInfo;
        END;

    IF @Compress IS NULL
        BEGIN
            SELECT  @Compress = CASE WHEN EXISTS ( SELECT   *
                                                   FROM     sys.configurations
                                                   WHERE    name = 'backup compression default'
                                                            AND value_in_use = 1 ) THEN 1
                                     ELSE 0
                                END;
        END;

    IF @NumberOfFiles IS NULL
        BEGIN
            SELECT  @NumberOfFiles = ( SELECT COUNT (*) FROM @Directories
                                     );
        END;

    IF @BackupType NOT IN ( 'FULL', 'DIFF', 'LOG' )
        OR @BackupType IS NULL
        BEGIN
            SET @ErrorMessage = 'The value for the parameter @BackupType is not supported.' + CHAR(13) + CHAR(10) + ' ';
            RAISERROR(@ErrorMessage,16,1) WITH NOWAIT;
            SET @Error = @@ERROR;
        END;

    IF @Error <> 0
        BEGIN
    --SET @ErrorMessage = 'The documentation is available at https://ola.hallengren.com/sql-server-backup.html.' + CHAR(13) + CHAR(10) + ' '
    --RAISERROR(@ErrorMessage,16,1) WITH NOWAIT
            SET @ReturnCode = @Error;
            GOTO Logging;
        END;

    WHILE EXISTS ( SELECT   *
                   FROM     @tmpDatabases
                   WHERE    Selected = 1
                            AND Completed = 0 )
        BEGIN
            SELECT TOP 1
                    @CurrentDBID = ID, @CurrentDatabaseName = DatabaseName, @CurrentDatabaseNameFS = DatabaseNameFS
            FROM    @tmpDatabases
            WHERE   Selected = 1
                    AND Completed = 0
            ORDER BY ID ASC;

            SET @CurrentDatabaseID = DB_ID(@CurrentDatabaseName);

            IF DATABASEPROPERTYEX(@CurrentDatabaseName, 'Status') = 'ONLINE'
                BEGIN
                    IF EXISTS ( SELECT  *
                                FROM    sys.database_recovery_status
                                WHERE   database_id = @CurrentDatabaseID
                                        AND database_guid IS NOT NULL )
                        BEGIN
                            SET @CurrentIsDatabaseAccessible = 1;
                        END;
                    ELSE
                        BEGIN
                            SET @CurrentIsDatabaseAccessible = 0;
                        END;
                END;

            SELECT  @CurrentDifferentialBaseLSN = differential_base_lsn
            FROM    sys.master_files
            WHERE   database_id = @CurrentDatabaseID
                    AND [type] = 0
                    AND [file_id] = 1;

            IF DATABASEPROPERTYEX(@CurrentDatabaseName, 'Status') = 'ONLINE'
                BEGIN
                    SELECT  @CurrentLogLSN = last_log_backup_lsn
                    FROM    sys.database_recovery_status
                    WHERE   database_id = @CurrentDatabaseID;
                END;

            SET @CurrentBackupType = @BackupType;
            IF @Version >= 11
                AND @Cluster IS NOT NULL
                BEGIN
                    SELECT  @CurrentAvailabilityGroup = availability_groups.name,
                            @CurrentAvailabilityGroupRole = dm_hadr_availability_replica_states.role_desc,
                            @CurrentAvailabilityGroupBackupPreference = UPPER(availability_groups.automated_backup_preference_desc)
                    FROM    sys.databases databases
                    INNER JOIN sys.availability_databases_cluster availability_databases_cluster ON databases.group_database_id = availability_databases_cluster.group_database_id
                    INNER JOIN sys.availability_groups availability_groups ON availability_databases_cluster.group_id = availability_groups.group_id
                    INNER JOIN sys.dm_hadr_availability_replica_states dm_hadr_availability_replica_states ON availability_groups.group_id = dm_hadr_availability_replica_states.group_id
                                                                                                        AND databases.replica_id = dm_hadr_availability_replica_states.replica_id
                    WHERE   databases.name = @CurrentDatabaseName;
                END;

            IF @Version >= 11
                AND @Cluster IS NOT NULL
                AND @CurrentAvailabilityGroup IS NOT NULL
                BEGIN
                    SELECT  @CurrentIsPreferredBackupReplica = sys.fn_hadr_backup_is_preferred_replica(@CurrentDatabaseName);
                END;

            SELECT  @CurrentDatabaseMirroringRole = UPPER(mirroring_role_desc)
            FROM    sys.database_mirroring
            WHERE   database_id = @CurrentDatabaseID;

            IF EXISTS ( SELECT  *
                        FROM    msdb.dbo.log_shipping_primary_databases
                        WHERE   primary_database = @CurrentDatabaseName )
                BEGIN
                    SET @CurrentLogShippingRole = 'PRIMARY';
                END;
            ELSE
                IF EXISTS ( SELECT  *
                            FROM    msdb.dbo.log_shipping_secondary_databases
                            WHERE   secondary_database = @CurrentDatabaseName )
                    BEGIN
                        SET @CurrentLogShippingRole = 'SECONDARY';
                    END; 

    IF @LogToTable=0 begin
    -- Set database message
            SET @DatabaseMessage = 'Date and time: ' + CONVERT(NVARCHAR, GETDATE(), 120) + CHAR(13) + CHAR(10);
            SET @DatabaseMessage = @DatabaseMessage + 'Database: ' + QUOTENAME(@CurrentDatabaseName) + CHAR(13)
                + CHAR(10);
            SET @DatabaseMessage = @DatabaseMessage + 'Status: '
                + CAST(DATABASEPROPERTYEX(@CurrentDatabaseName, 'Status') AS NVARCHAR) + CHAR(13) + CHAR(10);
            SET @DatabaseMessage = @DatabaseMessage + 'Standby: '
                + CASE WHEN DATABASEPROPERTYEX(@CurrentDatabaseName, 'IsInStandBy') = 1 THEN 'Yes'
                       ELSE 'No'
                  END + CHAR(13) + CHAR(10);
            SET @DatabaseMessage = @DatabaseMessage + 'Updateability: '
                + CAST(DATABASEPROPERTYEX(@CurrentDatabaseName, 'Updateability') AS NVARCHAR) + CHAR(13) + CHAR(10);
            SET @DatabaseMessage = @DatabaseMessage + 'User access: '
                + CAST(DATABASEPROPERTYEX(@CurrentDatabaseName, 'UserAccess') AS NVARCHAR) + CHAR(13) + CHAR(10);
            IF @CurrentIsDatabaseAccessible IS NOT NULL
                SET @DatabaseMessage = @DatabaseMessage + 'Is accessible: '
                    + CASE WHEN @CurrentIsDatabaseAccessible = 1 THEN 'Yes'
                           ELSE 'No'
                      END + CHAR(13) + CHAR(10);
            SET @DatabaseMessage = @DatabaseMessage + 'Recovery model: '
                + CAST(DATABASEPROPERTYEX(@CurrentDatabaseName, 'Recovery') AS NVARCHAR) + CHAR(13) + CHAR(10);
            IF @CurrentAvailabilityGroup IS NOT NULL
                SET @DatabaseMessage = @DatabaseMessage + 'Availability group: ' + @CurrentAvailabilityGroup + CHAR(13)
                    + CHAR(10);
            IF @CurrentAvailabilityGroup IS NOT NULL
                SET @DatabaseMessage = @DatabaseMessage + 'Availability group role: ' + @CurrentAvailabilityGroupRole
                    + CHAR(13) + CHAR(10);
            IF @CurrentAvailabilityGroup IS NOT NULL
                SET @DatabaseMessage = @DatabaseMessage + 'Availability group backup preference: '
                    + @CurrentAvailabilityGroupBackupPreference + CHAR(13) + CHAR(10);
            IF @CurrentAvailabilityGroup IS NOT NULL
                SET @DatabaseMessage = @DatabaseMessage + 'Is preferred backup replica: '
                    + CASE WHEN @CurrentIsPreferredBackupReplica = 1 THEN 'Yes'
                           WHEN @CurrentIsPreferredBackupReplica = 0 THEN 'No'
                           ELSE 'N/A'
                      END + CHAR(13) + CHAR(10);
            IF @CurrentDatabaseMirroringRole IS NOT NULL
                SET @DatabaseMessage = @DatabaseMessage + 'Database mirroring role: ' + @CurrentDatabaseMirroringRole
                    + CHAR(13) + CHAR(10);
            IF @CurrentLogShippingRole IS NOT NULL
                SET @DatabaseMessage = @DatabaseMessage + 'Log shipping role: ' + @CurrentLogShippingRole + CHAR(13)
                    + CHAR(10);
            IF @CurrentBackupType = 'DIFF'
                SET @DatabaseMessage = @DatabaseMessage + 'Differential base is snapshot: '
                    + CASE WHEN @CurrentDifferentialBaseIsSnapshot = 1 THEN 'Yes'
                           WHEN @CurrentDifferentialBaseIsSnapshot = 0 THEN 'No'
                           ELSE 'N/A'
                      END + CHAR(13) + CHAR(10);
            SET @DatabaseMessage = REPLACE(@DatabaseMessage, '%', '%%') + ' ';
            RAISERROR(@DatabaseMessage,10,1) WITH NOWAIT;

    END

    /*-- 需要满足以下条件
    *    数据库状态为在线
    *    数据库允许访问
    *    数据库不是备库
    *    不是简单恢复模式下的日志备份
    *    不是无基准的差异备份
    *    不是对master库做差异或日志备份
    *    如果在可用性组中，不对辅助副本做常规备份(仅支持复制备份)，且需要备份首选项允许备份，
    *    不对日志传输的主库做日志备份(会截断日志)
    *
    */
            IF DATABASEPROPERTYEX(@CurrentDatabaseName, 'Status') <> 'ONLINE'
                OR ( @CurrentIsDatabaseAccessible IS NOT NULL
                     AND @CurrentIsDatabaseAccessible <> 1 )
                OR @BackupType IS NULL
                BEGIN
                    SET @DatabaseMessage = 'database ' + @CurrentDatabaseName + ' is not accessible.' + CHAR(13)
                        + CHAR(10) + ' ';
                    RAISERROR(@DatabaseMessage,10,1) WITH NOWAIT;
                END;
            IF DATABASEPROPERTYEX(@CurrentDatabaseName, 'IsInStandBy') = 1
                OR @BackupType IS NULL
                BEGIN
                    SET @DatabaseMessage = 'database ' + @CurrentDatabaseName + ' is in Standby.' + CHAR(13) + CHAR(10)
                        + ' ';
                    RAISERROR(@DatabaseMessage,10,1) WITH NOWAIT;
                END;
            IF @CurrentBackupType = 'LOG' AND @CurrentLogLSN IS NULL
                BEGIN
                    SET @DatabaseMessage = 'database ' + @CurrentDatabaseName
                        + '  never full backup.' + CHAR(13) + CHAR(10) + ' ';
                    RAISERROR(@DatabaseMessage,10,1) WITH NOWAIT;
                END;

            IF @CurrentBackupType = 'LOG' AND ( DATABASEPROPERTYEX(@CurrentDatabaseName, 'Recovery') = 'SIMPLE')
                BEGIN
                    SET @DatabaseMessage = 'database ' + @CurrentDatabaseName
                        + ' Recovery mode is SIMPLE ,it''s can''t backup log.' + CHAR(13) + CHAR(10) + ' ';
                    RAISERROR(@DatabaseMessage,10,1) WITH NOWAIT;
                END;
            IF @CurrentBackupType = 'DIFF' AND @CurrentDifferentialBaseLSN IS NULL
                BEGIN
                    SET @DatabaseMessage = 'database ' + @CurrentDatabaseName
                        + ' backup type is DIFF but never backup database full.' + CHAR(13) + CHAR(10) + ' ';
                    RAISERROR(@DatabaseMessage,10,1) WITH NOWAIT;
                END;

            IF @CurrentBackupType IN ( 'DIFF', 'LOG' ) AND @CurrentDatabaseName = 'master'
                BEGIN
                    SET @DatabaseMessage = 'database is master,it is support full backup type only.' + CHAR(13)
                        + CHAR(10) + ' ';
                    RAISERROR(@DatabaseMessage,10,1) WITH NOWAIT;
                END;

            IF @CurrentAvailabilityGroup IS NOT NULL
                AND @CurrentBackupType = 'FULL'
                AND @copyOnly = 0
                AND ( @CurrentAvailabilityGroupRole <> 'PRIMARY'
                      OR @CurrentAvailabilityGroupRole IS NULL )
                BEGIN
                    SET @DatabaseMessage = 'database ' + @CurrentDatabaseName
                        + ' is in Availability Group and it''s not Primary,it is support full backup type copy only.'
                        + CHAR(13) + CHAR(10) + ' ';
                    RAISERROR(@DatabaseMessage,10,1) WITH NOWAIT;
                END;

            IF @CurrentAvailabilityGroup IS NOT NULL
                AND @CurrentBackupType = 'FULL'
                AND @copyOnly = 1
                AND ( @CurrentIsPreferredBackupReplica <> 1
                      OR @CurrentIsPreferredBackupReplica IS NULL )
                AND @OverrideBackupPreference = 0
                BEGIN
                    SET @DatabaseMessage = 'database ' + @CurrentDatabaseName
                        + ' is in Availability Group ,but it''s not preferred backup replica and @OverrideBackupPreference is not.'
                        + CHAR(13) + CHAR(10) + ' ';
                    RAISERROR(@DatabaseMessage,10,1) WITH NOWAIT;
                END;

            IF @CurrentAvailabilityGroup IS NOT NULL
                AND @CurrentBackupType = 'DIFF'
                AND ( @CurrentAvailabilityGroupRole <> 'PRIMARY'
                      OR @CurrentAvailabilityGroupRole IS NULL )
                BEGIN
                    SET @DatabaseMessage = 'database ' + @CurrentDatabaseName
                        + ' is in Availability Group and it''s not Primary,it''s not support diff backup type.'
                        + CHAR(13) + CHAR(10) + ' ';
                    RAISERROR(@DatabaseMessage,10,1) WITH NOWAIT;
                END;

            IF @CurrentAvailabilityGroup IS NOT NULL
                AND @CurrentBackupType = 'LOG'
                AND @copyOnly = 0
                AND ( @CurrentIsPreferredBackupReplica <> 1
                      OR @CurrentIsPreferredBackupReplica IS NULL )
                AND @OverrideBackupPreference = 0
                BEGIN
                    SET @DatabaseMessage = 'database ' + @CurrentDatabaseName
                        + ' is in Availability Group ,but it''s not preferred backup replica and @OverrideBackupPreference is not.'
                        + CHAR(13) + CHAR(10) + ' ';
                    RAISERROR(@DatabaseMessage,10,1) WITH NOWAIT;
                END;

            IF ( @CurrentLogShippingRole = 'PRIMARY'
                 AND @CurrentLogShippingRole IS NOT NULL )
                AND @CurrentBackupType = 'LOG'
                BEGIN
                    SET @DatabaseMessage = 'database ' + @CurrentDatabaseName
                        + ' is in log shipping role ,and it''s Primary,it''s not support backup log.' + CHAR(13)
                        + CHAR(10) + ' ';
                    RAISERROR(@DatabaseMessage,10,1) WITH NOWAIT;
                END;

            IF @CurrentAvailabilityGroup IS NOT NULL
                AND @CurrentBackupType = 'LOG'
                AND @copyOnly = 1
                AND ( @CurrentAvailabilityGroupRole <> 'PRIMARY'
                      OR @CurrentAvailabilityGroupRole IS NULL )
                BEGIN
                    SET @DatabaseMessage = 'database ' + @CurrentDatabaseName
                        + ' is in Availability Group ,and it''s not Primary,it is support backup copy only.' + CHAR(13)
                        + CHAR(10) + ' ';
                    RAISERROR(@DatabaseMessage,10,1) WITH NOWAIT;
                END;

            IF DATABASEPROPERTYEX(@CurrentDatabaseName, 'Status') = 'ONLINE'
                AND ( @CurrentIsDatabaseAccessible = 1
                      OR @CurrentIsDatabaseAccessible IS NULL )
                AND DATABASEPROPERTYEX(@CurrentDatabaseName, 'IsInStandBy') = 0
                AND NOT ( @CurrentBackupType = 'LOG'
                          AND ( DATABASEPROPERTYEX(@CurrentDatabaseName, 'Recovery') = 'SIMPLE'
                                OR @CurrentLogLSN IS NULL ) )
                AND NOT ( @CurrentBackupType = 'DIFF'
                          AND @CurrentDifferentialBaseLSN IS NULL )
                AND NOT ( @CurrentBackupType IN ( 'DIFF', 'LOG' )
                          AND @CurrentDatabaseName = 'master' )
                AND NOT ( @CurrentAvailabilityGroup IS NOT NULL
                          AND @CurrentBackupType = 'FULL'
                          AND @copyOnly = 0
                          AND ( @CurrentAvailabilityGroupRole <> 'PRIMARY'
                                OR @CurrentAvailabilityGroupRole IS NULL ) )
                AND NOT ( @CurrentAvailabilityGroup IS NOT NULL
                          AND @CurrentBackupType = 'FULL'
                          AND @copyOnly = 1
                          AND ( @CurrentIsPreferredBackupReplica <> 1
                                OR @CurrentIsPreferredBackupReplica IS NULL )
                          AND @OverrideBackupPreference = 0 )
                AND NOT ( @CurrentAvailabilityGroup IS NOT NULL
                          AND @CurrentBackupType = 'DIFF'
                          AND ( @CurrentAvailabilityGroupRole <> 'PRIMARY'
                                OR @CurrentAvailabilityGroupRole IS NULL ) )
                AND NOT ( @CurrentAvailabilityGroup IS NOT NULL
                          AND @CurrentBackupType = 'LOG'
                          AND @copyOnly = 0
                          AND ( @CurrentIsPreferredBackupReplica <> 1
                                OR @CurrentIsPreferredBackupReplica IS NULL )
                          AND @OverrideBackupPreference = 0 )
                AND NOT ( @CurrentAvailabilityGroup IS NOT NULL
                          AND @CurrentBackupType = 'LOG'
                          AND @copyOnly = 1
                          AND ( @CurrentAvailabilityGroupRole <> 'PRIMARY'
                                OR @CurrentAvailabilityGroupRole IS NULL ) )
                AND NOT ( ( @CurrentLogShippingRole = 'PRIMARY'
                            AND @CurrentLogShippingRole IS NOT NULL )
                          AND @CurrentBackupType = 'LOG' )
                BEGIN
                    SET @CurrentDate = GETDATE();
                    SELECT  @CurrentFileExtension = CASE WHEN @CurrentBackupType = 'FULL' THEN 'bak'
                                                         WHEN @CurrentBackupType = 'DIFF' THEN 'bak'
                                                         WHEN @CurrentBackupType = 'LOG' THEN 'trn'
                                                    END;

                    INSERT  INTO @CurrentDirectories ( ID, DirectoryPath, CreateCompleted, CleanupCompleted )
                    SELECT  ROW_NUMBER() OVER ( ORDER BY ID ),
                            DirectoryPath + '\' + ( @CurrentBackupType )
                            + CASE WHEN RIGHT(DirectoryPath, 1) = '\' THEN ''
                                   ELSE '\'
                              END + @CurrentDatabaseNameFS + CASE WHEN @BackupType = 'LOG'
                                                                        THEN '\' + REPLACE(CONVERT(VARCHAR(7), GETDATE(), 120),
                                                                                           '-', '')
                                                                        ELSE ''
                                                                   END, 0, 0
                    FROM    @Directories
                    ORDER BY ID ASC;

                    IF EXISTS ( SELECT  *
                                FROM    @CurrentDirectories )
                        BEGIN
                            SET @CurrentFileNumber = 0;

                            WHILE @CurrentFileNumber < @NumberOfFiles
                                BEGIN
                                    SET @CurrentFileNumber = @CurrentFileNumber + 1;

                                    SELECT  @CurrentDirectoryPath = DirectoryPath
                                    FROM    @CurrentDirectories
                                    WHERE   @CurrentFileNumber >= 1
                                            AND @CurrentFileNumber <= ( SELECT @NumberOfFiles / COUNT (*)
                                                                                FROM @CurrentDirectories
                                                                      );          

                                        SET @fileName =     CASE WHEN @CurrentAvailabilityGroup IS NOT NULL THEN UPPER(@Cluster)
                                        --+ '$' + @CurrentAvailabilityGroup
                                        ELSE REPLACE(CAST(SERVERPROPERTY('servername') AS nvarchar),'\','$') END + '_' + @CurrentDatabaseNameFS + '_'
                                            + UPPER(@CurrentBackupType) + CASE WHEN @copyOnly = 1 THEN '_COPY_ONLY'
                                                                               ELSE ''
                                                                          END + '_'
                                            + REPLACE(REPLACE(REPLACE(( CONVERT(NVARCHAR, @CurrentDate, 120) ), '-', ''),
                                                              ' ', '_'), ':', '')
                                            + CASE WHEN @NumberOfFiles > 1
                                                        AND @NumberOfFiles <= 9
                                                   THEN '_' + CAST(@CurrentFileNumber AS NVARCHAR)
                                                   WHEN @NumberOfFiles >= 10
                                                   THEN '_' + RIGHT('' + CAST(@CurrentFileNumber AS NVARCHAR), 2)
                                                   ELSE ''
                                              END + '.' + @CurrentFileExtension;

                                    SET @CurrentFilePath = @CurrentDirectoryPath + '\' + @fileName;
                                    INSERT  INTO @CurrentFiles ( [Type], FilePath )
                                    SELECT  'DISK', @CurrentFilePath;

                                    SET @CurrentDirectoryPath = NULL;
                                    SET @CurrentFilePath = NULL;
                                END;

                            INSERT  INTO @CurrentBackupSet ( VerifyCompleted )
                            SELECT  0;
                        END;

      -- Create directory
                    WHILE EXISTS ( SELECT   *
                                   FROM     @CurrentDirectories
                                   WHERE    CreateCompleted = 0 )
                        BEGIN
                            SELECT TOP 1
                                    @CurrentDirectoryID = ID, @CurrentDirectoryPath = DirectoryPath
                            FROM    @CurrentDirectories
                            WHERE   CreateCompleted = 0
                            ORDER BY ID ASC;

                            SET @CurrentCommandType01 = 'xp_create_subdir';
                            SET @CurrentCommand01 = 'DECLARE @ReturnCode int EXECUTE @ReturnCode = [master].dbo.xp_create_subdir N'''
                                + REPLACE(@CurrentDirectoryPath, '''', '''''')
                                + ''' IF @ReturnCode <> 0 RAISERROR(''Error creating directory.'', 16, 1)';

                            EXECUTE @CurrentCommandOutput01 = [dbo].[CommandExecute] @Command = @CurrentCommand01,
                                @CommandType = @CurrentCommandType01, @Mode = 1, @DatabaseName = @CurrentDatabaseName,
                                @LogToTable = @LogToTable, @Exec = @exec;

                            SET @Error = @@ERROR;
                            IF @Error <> 0
                                SET @CurrentCommandOutput01 = @Error;
                            IF @CurrentCommandOutput01 <> 0
                                SET @ReturnCode = @CurrentCommandOutput01;

                            UPDATE  @CurrentDirectories
                            SET     CreateCompleted = 1, CreateOutput = @CurrentCommandOutput01
                            WHERE   ID = @CurrentDirectoryID;                             

                            SET @CurrentDirectoryID = NULL;
                            SET @CurrentDirectoryPath = NULL;

                            SET @CurrentCommand01 = NULL;

                            SET @CurrentCommandOutput01 = NULL;

                            SET @CurrentCommandType01 = NULL;
                        END;    

                        -- Perform a backup
                    IF NOT EXISTS ( SELECT  *
                                    FROM    @CurrentDirectories
                                    WHERE   CreateOutput <> 0
                                            OR CreateOutput IS NULL )
                        BEGIN
                            SELECT  @CurrentCommandType03 = CASE WHEN @CurrentBackupType IN ( 'DIFF', 'FULL' )
                                                                 THEN 'BACKUP_DATABASE'
                                                                 WHEN @CurrentBackupType = 'LOG' THEN 'BACKUP_LOG'
                                                            END;

                            SELECT  @CurrentCommand03 = CASE WHEN @CurrentBackupType IN ( 'DIFF', 'FULL' )
                                                             THEN 'BACKUP DATABASE ' + QUOTENAME(@CurrentDatabaseName)
                                                             WHEN @CurrentBackupType = 'LOG'
                                                             THEN 'BACKUP LOG ' + QUOTENAME(@CurrentDatabaseName)
                                                        END;

                            IF @ReadWriteFileGroups = 1
                                AND @CurrentDatabaseName <> 'master'
                                SET @CurrentCommand03 = @CurrentCommand03 + ' READ_WRITE_FILEGROUPS';

                            SET @CurrentCommand03 = @CurrentCommand03 + ' TO';

                            SELECT  @CurrentCommand03 = @CurrentCommand03 + ' ' + [Type] + ' = N''' + REPLACE(FilePath,
                                                                                                        '''', '''''')
                                    + ''''
                                    + CASE WHEN ROW_NUMBER() OVER ( ORDER BY FilePath ASC ) <> @NumberOfFiles THEN ','
                                           ELSE ''
                                      END
                            FROM    @CurrentFiles
                            ORDER BY FilePath ASC;

                            SET @CurrentCommand03 = @CurrentCommand03 + ' WITH ';
                            IF @CheckSum = 1
                                SET @CurrentCommand03 = @CurrentCommand03 + 'CHECKSUM';
                            IF @CheckSum = 0
                                SET @CurrentCommand03 = @CurrentCommand03 + 'NO_CHECKSUM';
                            IF @Compress = 1
                                SET @CurrentCommand03 = @CurrentCommand03 + ', COMPRESSION';
                            IF @Compress = 0
                                AND @Version >= 10
                                SET @CurrentCommand03 = @CurrentCommand03 + ', NO_COMPRESSION';
                            IF @CurrentBackupType = 'DIFF'
                                SET @CurrentCommand03 = @CurrentCommand03 + ', DIFFERENTIAL';

                            IF @copyOnly = 1
                                SET @CurrentCommand03 = @CurrentCommand03 + ', COPY_ONLY';
                            IF @NoRecovery = 1
                                AND @CurrentBackupType = 'LOG'
                                SET @CurrentCommand03 = @CurrentCommand03 + ', NORECOVERY';
                            IF @Description IS NOT NULL
                                SET @CurrentCommand03 = @CurrentCommand03 + ', DESCRIPTION = N''' + REPLACE(@Description,
                                                                                                        '''', '''''')
                                    + '''';
                            IF @CurrentCommand03 IS NULL
                                SELECT  @CurrentCommand03;
                            EXECUTE @CurrentCommandOutput03 = [dbo].[CommandExecute] @Command = @CurrentCommand03,
                                @CommandType = @CurrentCommandType03, @Mode = 1, @DatabaseName = @CurrentDatabaseName,
                                @LogToTable = @LogToTable, @Exec = @Exec;
                            SET @Error = @@ERROR;
                            IF @Error <> 0
                                SET @CurrentCommandOutput03 = @Error;
                            IF @CurrentCommandOutput03 <> 0
                                SET @ReturnCode = @CurrentCommandOutput03;
                        END;

      -- Verify the backup
                    IF @CurrentCommandOutput03 = 0
                        AND @Verify = 1
                        BEGIN
                            WHILE EXISTS ( SELECT   *
                                           FROM     @CurrentBackupSet
                                           WHERE    VerifyCompleted = 0 )
                                BEGIN
                                    SELECT TOP 1
                                            @CurrentBackupSetID = ID
                                    FROM    @CurrentBackupSet
                                    WHERE   VerifyCompleted = 0
                                    ORDER BY ID ASC;

                                    SET @CurrentCommandType04 = 'RESTORE_VERIFYONLY';

                                    SET @CurrentCommand04 = 'RESTORE VERIFYONLY FROM';

                                    SELECT  @CurrentCommand04 = @CurrentCommand04 + ' ' + [Type] + ' = N'''
                                            + REPLACE(FilePath, '''', '''''') + ''''
                                            + CASE WHEN ROW_NUMBER() OVER ( ORDER BY FilePath ASC ) <> @NumberOfFiles
                                                   THEN ','
                                                   ELSE ''
                                              END
                                    FROM    @CurrentFiles
                                    ORDER BY FilePath ASC;

                                    SET @CurrentCommand04 = @CurrentCommand04 + ' WITH ';
                                    IF @CheckSum = 1
                                        SET @CurrentCommand04 = @CurrentCommand04 + 'CHECKSUM';
                                    IF @CheckSum = 0
                                        SET @CurrentCommand04 = @CurrentCommand04 + 'NO_CHECKSUM';
                                    EXECUTE @CurrentCommandOutput04 = [dbo].[CommandExecute] @Command = @CurrentCommand04,
                                        @CommandType = @CurrentCommandType04, @Mode = 1,
                                        @DatabaseName = @CurrentDatabaseName, @LogToTable = @LogToTable, @Exec = @Exec;
                                    SET @Error = @@ERROR;
                                    IF @Error <> 0
                                        SET @CurrentCommandOutput04 = @Error;
                                    IF @CurrentCommandOutput04 <> 0
                                        SET @ReturnCode = @CurrentCommandOutput04;

                                    UPDATE  @CurrentBackupSet
                                    SET     VerifyCompleted = 1, VerifyOutput = @CurrentCommandOutput04
                                    WHERE   ID = @CurrentBackupSetID;

                                    SET @CurrentBackupSetID = NULL;
                                    SET @CurrentIsMirror = NULL;

                                    SET @CurrentCommand04 = NULL;
                                    SET @CurrentCommandOutput04 = NULL;
                                    SET @CurrentCommandType04 = NULL;
                                END;
                        END;
                END;

    -- Update that the database is completed
            UPDATE  @tmpDatabases
            SET     Completed = 1
            WHERE   Selected = 1
                    AND Completed = 0
                    AND ID = @CurrentDBID;

    -- Clear variables
            SET @CurrentDBID = NULL;
            SET @CurrentDatabaseID = NULL;
            SET @CurrentDatabaseName = NULL;
            SET @CurrentBackupType = NULL;
            SET @CurrentFileExtension = NULL;
            SET @CurrentFileNumber = NULL;
            SET @CurrentDifferentialBaseLSN = NULL;
            SET @CurrentDifferentialBaseIsSnapshot = NULL;
            SET @CurrentLogLSN = NULL;
            SET @CurrentLatestBackup = NULL;
            SET @CurrentDatabaseNameFS = NULL;
            SET @CurrentDate = NULL;
            SET @CurrentCleanupDate = NULL;
            SET @CurrentIsDatabaseAccessible = NULL;
            SET @CurrentAvailabilityGroup = NULL;
            SET @CurrentAvailabilityGroupRole = NULL;
            SET @CurrentAvailabilityGroupBackupPreference = NULL;
            SET @CurrentIsPreferredBackupReplica = NULL;
            SET @CurrentDatabaseMirroringRole = NULL;
            SET @CurrentLogShippingRole = NULL;

            SET @CurrentCommand03 = NULL;
            SET @CurrentCommandOutput03 = NULL;
            SET @CurrentCommandType03 = NULL;

            DELETE  FROM @CurrentDirectories;
            DELETE  FROM @CurrentFiles;
            DELETE  FROM @CurrentBackupSet;
        END;

  ----------------------------------------------------------------------------------------------------
  --// Log completing information                                                                 //--
  ----------------------------------------------------------------------------------------------------

    Logging:
    IF @LogToTable = 0
    BEGIN
        SET @EndMessage = 'Date and time: ' + CONVERT(NVARCHAR, GETDATE(), 120);
        SET @EndMessage = REPLACE(@EndMessage, '%', '%%');
        RAISERROR(@EndMessage,10,1) WITH NOWAIT;
    END
    IF @ReturnCode <> 0
        BEGIN
            RETURN @ReturnCode;
        END;
END;

GO
/****** Object:  StoredProcedure [dbo].[sp_MGR_trace_SetStatus]    Script Date: 2017/2/15 11:16:02 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO

-- =============================================
-- Author:    hcc
-- Create date: 2015-9-19
-- Description:    自动生成跟踪. 只跟踪超过1500ms的sql和过程,
--                会自动将上一个跟踪导入到TraceLog表,并启用新的跟踪.使用Job定时调用该过程

-- Parameters
-- @rootPath:   跟踪文件存放目录
-- @status:        是否启用跟踪.1为启用,0为关闭
-- @path        手动写入某跟踪文件到表.要求为全路径
-- =============================================
CREATE PROC [dbo].[sp_MGR_trace_SetStatus]
    @rootPath NVARCHAR(200) = 'D:\InOut\TraceLog\' ,--
    @status BIT = 1 ,
    @path NVARCHAR(200) = NULL
AS
    BEGIN
        DECLARE @rc INT;
        DECLARE @TraceID INT ,
            @curid INT;
        DECLARE @maxfilesize BIGINT;
        DECLARE @DateTime DATETIME;

-- 先关闭已打开的自定义跟踪
        IF @path IS NULL
            OR LEN(@path) = 0
            SELECT  @curid = id,
                    @path = CASE WHEN CHARINDEX('_', [path]) > 0
                                 THEN LEFT([path], CHARINDEX('_', [path]) - 1)
                                      + '.trc'
                                 ELSE [path]
                            END
            FROM    sys.traces
            WHERE   id > 1
                    AND path IS NOT NULL
                    AND path LIKE @rootPath + '%'
                    AND status = 1;            

        IF @path IS NULL
            OR LEN(@path) = 0
            GOTO CreateNew;

        DECLARE @table TABLE ( filePath VARCHAR(500) );

        EXEC sp_configure 'show advanced options', 1;
        RECONFIGURE;
        EXEC sp_configure 'xp_cmdshell', 1;
        RECONFIGURE;

        DECLARE @dir VARCHAR(500);

        SET @dir = 'dir /b/s /o:d ' + REPLACE(@path, '.trc', '*.trc'); 

        INSERT  INTO @table ( filePath )
                EXEC master..xp_cmdshell @dir;

        EXEC sp_configure 'xp_cmdshell', 0;
        RECONFIGURE;
        EXEC sp_configure 'show advanced options', 0;
        RECONFIGURE;        

        DELETE  FROM @table
        WHERE   filePath IS NULL
                OR filePath = '系统找不到指定的文件。'
                OR filePath = '找不到文件'
                OR filePath = '系统找不到指定的路径。';

        IF (
             SELECT COUNT(1)
             FROM   @table
           ) > 1
            BEGIN
                DECLARE multiTraceFile CURSOR LOCAL FORWARD_ONLY FAST_FORWARD READ_ONLY
                FOR
                    SELECT  filePath
                    FROM    @table;

                OPEN multiTraceFile;

                FETCH NEXT FROM multiTraceFile INTO @path;
                WHILE ( @@fetch_status = 0 )
                    BEGIN
                        INSERT  INTO TraceDB.dbo.tracelog ( [EventClass], [Duration],
                                                    [TextData], [SPID],
                                                    [BinaryData], [CPU],
                                                    [EndTime], [ObjectName],
                                                    [StartTime],Reads,Writes ,databaseName,ApplicationName,HostName )
                                SELECT  [EventClass], [Duration], [TextData],
                                        [SPID], [BinaryData], [CPU], [EndTime],
                                        [ObjectName], [StartTime],Reads,Writes,databaseName,ApplicationName,HostName
                                FROM    ::
                                        fn_trace_gettable(@path, DEFAULT) a
                                WHERE   a.EventClass IN ( 10, 12 );

                        -- PRINT @path;
                        FETCH NEXT FROM multiTraceFile INTO @path;
                    END; 

                CLOSE multiTraceFile;
                DEALLOCATE multiTraceFile; 

            END;
        ELSE
            INSERT  INTO TraceDB.dbo.tracelog ( [EventClass], [Duration],
                                                    [TextData], [SPID],
                                                    [BinaryData], [CPU],
                                                    [EndTime], [ObjectName],
                                                    [StartTime],Reads,Writes,databaseName,ApplicationName,HostName  )
                                SELECT  [EventClass], [Duration], [TextData],
                                        [SPID], [BinaryData], [CPU], [EndTime],
                                        [ObjectName], [StartTime],Reads,Writes,databaseName,ApplicationName,HostName
                    FROM    ::
                            fn_trace_gettable(@path, DEFAULT) a
                    WHERE   a.EventClass IN ( 10, 12 );

        IF ( @curid IS NOT NULL )
            BEGIN
                EXEC sp_trace_setstatus @curid, 0;
                EXEC sp_trace_setstatus @curid, 2;
            END;

        CreateNew:

        IF @status = 0
            GOTO finish;

        SET @maxfilesize = 20;
        SET @path = @rootPath + CONVERT(VARCHAR(6), GETDATE(), 112) + '\';

        EXECUTE master.dbo.xp_create_subdir @path;

        SET @path = @rootPath + CONVERT(VARCHAR(6), GETDATE(), 112) + '\'
            + REPLACE(REPLACE(REPLACE(CONVERT(VARCHAR, GETDATE(), 120), '-',
                                      ''), ' ', ''), ':', '');

        EXEC @rc = sp_trace_create @TraceID OUTPUT, 2, @path, @maxfilesize,
            NULL;
        IF ( @rc != 0 )
            GOTO error;

-- Set the events
        DECLARE @on BIT;
        SET @on = 1;
        EXEC sp_trace_setevent @TraceID, 10, 2, @on;
        EXEC sp_trace_setevent @TraceID, 10, 8, @on;
        EXEC sp_trace_setevent @TraceID, 10, 10, @on;
        EXEC sp_trace_setevent @TraceID, 10, 12, @on;
        EXEC sp_trace_setevent @TraceID, 10, 13, @on;
        EXEC sp_trace_setevent @TraceID, 10, 14, @on;
        EXEC sp_trace_setevent @TraceID, 10, 15, @on;
        exec sp_trace_setevent @TraceID, 10, 16, @on
        exec sp_trace_setevent @TraceID, 10, 17, @on
        EXEC sp_trace_setevent @TraceID, 10, 18, @on;
        EXEC sp_trace_setevent @TraceID, 10, 34, @on;
        exec sp_trace_setevent @TraceID, 10, 35, @on;

        EXEC sp_trace_setevent @TraceID, 12, 1, @on;
        EXEC sp_trace_setevent @TraceID, 12, 8, @on;
        EXEC sp_trace_setevent @TraceID, 12, 10, @on;
        EXEC sp_trace_setevent @TraceID, 12, 12, @on;
        EXEC sp_trace_setevent @TraceID, 12, 13, @on;
        EXEC sp_trace_setevent @TraceID, 12, 14, @on;
        EXEC sp_trace_setevent @TraceID, 12, 15, @on;
        exec sp_trace_setevent @TraceID, 12, 16, @on
        exec sp_trace_setevent @TraceID, 12, 17, @on
        EXEC sp_trace_setevent @TraceID, 12, 18, @on;
        exec sp_trace_setevent @TraceID, 12, 35, @on;

-- Set the Filters
        DECLARE @intfilter INT;
        DECLARE @bigintfilter BIGINT;

-- 1500毫秒即1500000微秒
        SET @bigintfilter = 1500000;
        EXEC sp_trace_setfilter @TraceID, 13, 0, 4, @bigintfilter;

         -- 排除空值
        SET @bigintfilter = NULL;
        EXEC sp_trace_setfilter @TraceID, 13, 0, 1, @bigintfilter;

-- Set the trace status to start
        EXEC sp_trace_setstatus @TraceID, 1;

-- display trace id for future references
-- SELECT  TraceID = @TraceID;
        SELECT  *
        FROM    sys.traces
        WHERE   id = @TraceID;

        GOTO finish;

        error:
        SELECT  ErrorCode = @rc;

    END;

    finish:; 

GO
USE [master]
GO
ALTER DATABASE [TraceDB] SET  READ_WRITE
GO

作业

USE [msdb]
GO

/****** Object:  Job [Admin_Add_Trace]    Script Date: 2017/2/15 11:34:28 ******/
BEGIN TRANSACTION
DECLARE @ReturnCode INT
SELECT @ReturnCode = 0
/****** Object:  JobCategory [[Uncategorized (Local)]]    Script Date: 2017/2/15 11:34:28 ******/
IF NOT EXISTS (SELECT name FROM msdb.dbo.syscategories WHERE name=N'[Uncategorized (Local)]' AND category_class=1)
BEGIN
EXEC @ReturnCode = msdb.dbo.sp_add_category @class=N'JOB', @type=N'LOCAL', @name=N'[Uncategorized (Local)]'
IF (@@ERROR <> 0 OR @ReturnCode <> 0) GOTO QuitWithRollback

END

DECLARE @jobId BINARY(16)
EXEC @ReturnCode =  msdb.dbo.sp_add_job @job_name=N'Admin_Add_Trace',
        @enabled=1,
        @notify_level_eventlog=0,
        @notify_level_email=0,
        @notify_level_netsend=0,
        @notify_level_page=0,
        @delete_level=0,
        @description=N'无描述。',
        @category_name=N'[Uncategorized (Local)]',
        @owner_login_name=N'sa', @job_id = @jobId OUTPUT
IF (@@ERROR <> 0 OR @ReturnCode <> 0) GOTO QuitWithRollback
/****** Object:  Step [job1]    Script Date: 2017/2/15 11:34:28 ******/
EXEC @ReturnCode = msdb.dbo.sp_add_jobstep @job_id=@jobId, @step_name=N'job1',
        @step_id=1,
        @cmdexec_success_code=0,
        @on_success_action=1,
        @on_success_step_id=0,
        @on_fail_action=2,
        @on_fail_step_id=0,
        @retry_attempts=0,
        @retry_interval=0,
        @os_run_priority=0, @subsystem=N'TSQL',
        @command=N'exec [sp_MGR_trace_SetStatus]',
        @database_name=N'TraceDB',
        @flags=0
IF (@@ERROR <> 0 OR @ReturnCode <> 0) GOTO QuitWithRollback
EXEC @ReturnCode = msdb.dbo.sp_update_job @job_id = @jobId, @start_step_id = 1
IF (@@ERROR <> 0 OR @ReturnCode <> 0) GOTO QuitWithRollback
EXEC @ReturnCode = msdb.dbo.sp_add_jobschedule @job_id=@jobId, @name=N'job2',
        @enabled=1,
        @freq_type=4,
        @freq_interval=1,
        @freq_subday_type=1,
        @freq_subday_interval=0,
        @freq_relative_interval=0,
        @freq_recurrence_factor=0,
        @active_start_date=20170215,
        @active_end_date=99991231,
        @active_start_time=500,
        @active_end_time=235959,
        @schedule_uid=N'2f9ebad5-d3f4-42d6-98e8-19b3433d6eb3'
IF (@@ERROR <> 0 OR @ReturnCode <> 0) GOTO QuitWithRollback
EXEC @ReturnCode = msdb.dbo.sp_add_jobserver @job_id = @jobId, @server_name = N'(local)'
IF (@@ERROR <> 0 OR @ReturnCode <> 0) GOTO QuitWithRollback
COMMIT TRANSACTION
GOTO EndSave
QuitWithRollback:
    IF (@@TRANCOUNT > 0) ROLLBACK TRANSACTION
EndSave:

GO