Auto-Create Call SP TSQL Templates
Applicability:
SQL Server 2000: N/A
SQL Server 2005: Tested
SQL Server 2008: Tested
SQL Server 2008R2: Tested
SQL Server 2012: Tested
SQL Server 2014: Tested
SQL Server 2016: Tested
SQL Server 2017: Tested
Credits:
Author: Unknown
Date: 10 Jun 2020
Description
For all Stored Procedures in a database, generate TSQL templates to invoke each SP
Code
SELECT '/* '+qualifiedName+' */'
+CHAR(13)+CHAR(10)+REPLACE(
REPLACE(
REPLACE(
REPLACE(
STUFF(ExecuteScript, /*delete final comma line-terminator*/
LEN(ExecuteScript)-CHARINDEX('|,|',
REVERSE(ExecuteScript)+'|')-1,3
,'')
,'\n',CHAR(13)+CHAR(10))
,'|,|',',') /*put in new-lines and convert token to comma*/
,'<','<')
,'>','>') AS Template
FROM
(SELECT
so.name AS Name,
OBJECT_SCHEMA_NAME(so.object_ID)+'.'+so.name AS qualifiedName,
'EXEC '+QUOTENAME(OBJECT_SCHEMA_NAME(so.object_ID))
+'.'+QUOTENAME(so.name)
+COALESCE(' /*' +CONVERT(VARCHAR(300), value)+'*/', '')
+REPLACE(COALESCE(
(
SELECT REPLACE ('\n '+sp.name+' = '+'''<'
+REPLACE(
COALESCE(
CONVERT(VARCHAR(MAX),value)
,REPLACE(sp.name,'@','')
)
,',','')
+','+t.name+','+'>'''+'|,|'
+COALESCE(' /*'+CONVERT(VARCHAR(MAX),value)+'*/',''),'''',
CASE WHEN t.name IN ('char', 'varchar','nchar'
,'nvarchar','text','ntext'
,'datetime','date') THEN ''''
WHEN t.precision=0 THEN '''' ELSE '' END)
FROM sys.parameters sp
INNER JOIN sys.types t ON sp.user_Type_ID=t.user_Type_ID
LEFT OUTER JOIN sys.extended_properties ep
ON sp.object_id = ep.major_ID
AND sp.parameter_ID = minor_ID
WHERE sp.object_ID=so.object_ID
AND parameter_ID>0
ORDER BY parameter_ID
FOR XML PATH('')
),'|,|')
,',||', '') [ExecuteScript]
FROM
sys.objects so
LEFT OUTER JOIN sys.extended_properties ep
/* get any extended properties */
ON ep.name LIKE 'MS_Description'
AND major_ID=so.object_ID
AND minor_ID=0
WHERE
OBJECTPROPERTY(object_id, 'IsProcedure')<>0)f
ORDER BY Name