sync

DBG - find ssrs reports send via emails with dest.sql

@@ -0,0 +1,103 @@
+USE [ReportServer$PGCREP]
+
+   ;
+   WITH subscriptionXmL
+          AS (
+               SELECT
+                SubscriptionID ,
+                OwnerID ,
+                Report_OID ,
+                Locale ,
+                InactiveFlags ,
+                ExtensionSettings ,
+                CONVERT(XML, ExtensionSettings) AS ExtensionSettingsXML ,
+                ModifiedByID ,
+                ModifiedDate ,
+                Description ,
+                LastStatus ,
+                EventType ,
+                MatchData ,
+                LastRunTime ,
+                Parameters ,
+                DeliveryExtension ,
+                Version
+               FROM
+                dbo.Subscriptions
+             ),
+                 -- Get the settings as pairs
+        SettingsCTE
+          AS (
+               SELECT
+                SubscriptionID ,
+                ExtensionSettings ,
+    -- include other fields if you need them.
+                ISNULL(Settings.value('(./*:Name/text())[1]', 'nvarchar(1024)'),
+                       'Value') AS SettingName ,
+                Settings.value('(./*:Value/text())[1]', 'nvarchar(max)') AS SettingValue
+               FROM
+                subscriptionXmL
+                CROSS APPLY subscriptionXmL.ExtensionSettingsXML.nodes('//*:ParameterValue') Queries ( Settings )
+             )
+    SELECT
+        *
+    FROM
+        SettingsCTE
+    WHERE
+        settingName IN ( 'TO', 'CC', 'BCC' )
+        AND (
+            settingValue LIKE '%dorion%'
+            OR settingValue LIKE '%florentin%'
+        )
+
+
+SELECT
+c.Name AS ReportName,
+'Next Run Date' = CASE next_run_date
+WHEN 0 THEN null
+ELSE
+substring(convert(varchar(15),next_run_date),1,4) + '/' +
+substring(convert(varchar(15),next_run_date),5,2) + '/' +
+substring(convert(varchar(15),next_run_date),7,2)
+END,
+'Next Run Time' = isnull(CASE len(next_run_time)
+WHEN 3 THEN cast('00:0'
++ Left(right(next_run_time,3),1)
++':' + right(next_run_time,2) as char (8))
+WHEN 4 THEN cast('00:'
++ Left(right(next_run_time,4),2)
++':' + right(next_run_time,2) as char (8))
+WHEN 5 THEN cast('0' + Left(right(next_run_time,5),1)
++':' + Left(right(next_run_time,4),2)
++':' + right(next_run_time,2) as char (8))
+WHEN 6 THEN cast(Left(right(next_run_time,6),2)
++':' + Left(right(next_run_time,4),2)
++':' + right(next_run_time,2) as char (8))
+END,'NA'),
+Convert(XML,[ExtensionSettings]).value('(//ParameterValue/Value[../Name="TO"])[1]','nvarchar(50)') as [To]
+,Convert(XML,[ExtensionSettings]).value('(//ParameterValue/Value[../Name="CC"])[1]','nvarchar(50)') as [CC]
+,Convert(XML,[ExtensionSettings]).value('(//ParameterValue/Value[../Name="RenderFormat"])[1]','nvarchar(50)') as [Render Format]
+,Convert(XML,[ExtensionSettings]).value('(//ParameterValue/Value[../Name="Subject"])[1]','nvarchar(50)') as [Subject]
+---Example report parameters: StartDateMacro, EndDateMacro & Currency.
+,Convert(XML,[Parameters]).value('(//ParameterValue/Value[../Name="StartDateMacro"])[1]','nvarchar(50)') as [Start Date]
+,Convert(XML,[Parameters]).value('(//ParameterValue/Value[../Name="EndDateMacro"])[1]','nvarchar(50)') as [End Date]
+,Convert(XML,[Parameters]).value('(//ParameterValue/Value[../Name="Currency"])[1]','nvarchar(50)') as [Currency]
+,[LastStatus]
+,[EventType]
+,[LastRunTime]
+,[DeliveryExtension]
+,[Version]
+FROM 
+ dbo.[Catalog] c
+INNER JOIN dbo.[Subscriptions] S ON c.ItemID = S.Report_OID
+INNER JOIN dbo.ReportSchedule R ON S.SubscriptionID = R.SubscriptionID
+INNER JOIN msdb.dbo.sysjobs J ON Convert(nvarchar(128),R.ScheduleID) = J.name
+INNER JOIN msdb.dbo.sysjobschedules JS ON J.job_id = JS.job_id
+WHERE 1=1
+AND (
+    CONVERT(XML,[ExtensionSettings]).value('(//ParameterValue/Value[../Name="TO"])[1]','nvarchar(50)') LIKE '%dorion%'
+    OR Convert(XML,[ExtensionSettings]).value('(//ParameterValue/Value[../Name="TO"])[1]','nvarchar(50)') LIKE '%florentin%'
+)
+OR (
+    CONVERT(XML,[ExtensionSettings]).value('(//ParameterValue/Value[../Name="CC"])[1]','nvarchar(50)') LIKE '%dorion%'
+    OR Convert(XML,[ExtensionSettings]).value('(//ParameterValue/Value[../Name="CC"])[1]','nvarchar(50)') LIKE '%florentin%'
+)