List emails from SSRS Subscription

Get Email Subscriptions from SSRS

with Cte as
(select CONVERT(XML, ExtensionSettings) x
FROM
ReportServer.dbo.Subscriptions a
inner join
Catalog c on a.Report_OID = c.ItemID
where c.Name = ''
)
select
cast(x.query('/ParameterValues/ParameterValue[1]/Value/text()') as varchar(max)) ToEmails,
cast(x.query('/ParameterValues/ParameterValue[4]/Value/text()') as varchar(max)) Subject
from cte