Credits:
Description
Code
USE [master] GO SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO IF EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N'[dbo].[usp_DailyBackupCheck]') AND type in (N'P', N'PC')) DROP PROCEDURE [dbo].[usp_DailyBackupCheck] GO CREATE PROC [dbo].[usp_DailyBackupCheck] AS /*************************************************************************** Purpose: To create a list of backups that are overdue. Full, Differential and Log backups are considered. An overdue status would be: 1a. Full Backup not taken for 24 hours where there is no Differential backup 1b. Full backup not taken for 7 days where there is has been Differential Backup within the last 24 hours 2. Differential backup not taken for the last 24 hours 3. Log backup not taken for the past 6 hours This script will only work automatically for backup schemes that have performed at least one successful backup of each type required This is an acceptable limitation, as when setting up/changing backups, one should manually check the first few cycles anyway Author: ChillyDBA History: 10 May 2012 - Initial Issue ****************************************************************************/ CREATE TABLE #BackupList1 ( DatabaseName SYSNAME, BackupType CHAR, LastBackupTaken DATETIME, UserName VARCHAR(100) ) CREATE TABLE #BackupList2 ( DatabaseName SYSNAME, LastFullBackupTaken DATETIME, LastDiffBackupTaken DATETIME, LastLogBackupTaken DATETIME, FullOverdue BIT DEFAULT 0, DiffOverdue BIT DEFAULT 0, LogOverdue BIT DEFAULT 0 ) CREATE TABLE ##MailBody ( LineID INT IDENTITY(1,1), LineText VARCHAR(1000) ) DECLARE @Now DATETIME, @Cmd VARCHAR(1000) SELECT @Now = GETDATE(), @Cmd = '' -- get raw backup details, but only consider the past 2 months. -- if it has been worng for longer, then tough! -- THis screens out DBs that might have changed backup type some time ago INSERT #BackupList1 ( DatabaseName, BackupType, LastBackupTaken, UserName ) SELECT T1.Name as DatabaseName, t2.type, MAX(T2.backup_finish_date) as LastBackUpTaken, MAX(T2.user_name)as UserName FROM sys.databases T1 LEFT OUTER JOIN msdb.dbo.backupset T2 ON T2.database_name = T1.name WHERE T1.state_desc = 'ONLINE' AND backup_finish_date > DATEADD(mm, -2, GETDATE()) GROUP BY T1.Name, t2.type ORDER BY T1.Name, t2.type INSERT #BackupList2 ( DatabaseName, LastFullBackupTaken, LastDiffBackupTaken, LastLogBackupTaken ) SELECT x.DatabaseName, MAX(x.LastFullBackupTaken), MAX(x.LastDiffBackupTaken), MAX(x.LastLogBackupTaken) FROM ( SELECT DatabaseName AS DatabaseName, LastBackupTaken AS LastFullBackupTaken, NULL AS LastDiffBackupTaken, NULL AS LastLogBackupTaken FROM #BackupList1 WHERE BackupType = 'D' UNION SELECT DatabaseName AS DatabaseName, NULL AS LastFullBackupTaken, LastBackupTaken AS LastDiffBackupTaken, NULL AS LastLogBackupTaken FROM #BackupList1 WHERE BackupType = 'I' UNION SELECT DatabaseName AS DatabaseName, NULL AS LastFullBackupTaken, NULL AS LastDiffBackupTaken, LastBackupTaken AS LastLogBackupTaken FROM #BackupList1 WHERE BackupType = 'L' ) as x GROUP BY x.DatabaseName -- Identify states 1a and 1b UPDATE #BackupList2 SET FullOverdue = 1 WHERE ( ((DATEDIFF(hh, LastFullBackupTaken, @Now) > 24) AND (LastDiffBackupTaken IS NULL)) OR ((DATEDIFF(hh, LastFullBackupTaken, @Now) > 168) AND (DATEDIFF(hh, LastDiffBackupTaken, @Now) <= 24)) ) -- Identify state 2 UPDATE #BackupList2 SET DiffOverdue = 1 WHERE ( (DATEDIFF(hh, LastDiffBackupTaken, @Now) > 24) ) -- Identify state 3 UPDATE #BackupList2 SET LogOverdue = 1 WHERE ( (DATEDIFF(hh, LastLogBackupTaken, @Now) > 6) ) /* --Some test broken backups update #BackupList2 set fulloverdue = 1 where databasename = 'aac' update #BackupList2 set diffoverdue = 1 where databasename = 'Cognos_10_P_Motio' update #BackupList2 set logoverdue = 1 where databasename = 'BESMgmt5QA' update #BackupList2 set fulloverdue = 1 , logoverdue = 1 where databasename = 'Cognos_83' update #BackupList2 set fulloverdue = 1 , diffoverdue = 1, logoverdue = 1 where databasename = 'fest' */ INSERT ##MailBody(LineText) VALUES ('The following database backups are overdue:') ; INSERT ##MailBody(LineText) VALUES ('') ; INSERT ##MailBody(LineText) SELECT CHAR(9) + CHAR(9) + DatabaseName + REPLICATE(CHAR(9), (50 - DATALENGTH(DatabaseName) + 4)/8) + ' ==> ::' + CASE WHEN FullOverdue = 1 THEN ' FULL ::' ELSE '' END + CASE WHEN DiffOverdue = 1 THEN ' DIFF ::' ELSE '' END + CASE WHEN LogOverdue = 1 THEN ' LOG ::' ELSE '' END + ' <==' FROM #BackupList2 WHERE CAST(FullOverdue AS INT) + CAST(DiffOverdue AS INT) + CAST(LogOverdue AS INT) > 0 --SET @cmd = 'SELECT LineText FROM ##MailBody ORDER By LineID' ; --IF (SELECT COUNT(*) FROM ##MailBody) > 2 --BEGIN ----select 'send mail' -- EXEC msdb.dbo.sp_send_dbmail -- @profile_name = N'myprofile', -- @recipients = N'myemail@mycompany.ca', -- @subject = 'Server: [' + @@SERVERNAME + N'] - Daily Backup Status Check ' , -- @query = @cmd, -- @query_result_header = 0 SELECT * FROM #BackupList1 SELECT * FROM #BackupList2 SELECT * FROM ##MailBody END DROP TABLE #BackupList1 DROP TABLE #BackupList2 DROP TABLE ##MailBody |