Auto-Create Select from TVF 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 Tables in a database, generate TSQL templates to SELECT from each table valued function

Code

SELECT '/* '+qualifiedName+' */'+CHAR(13)+CHAR(10)+REPLACE(REPLACE(REPLACE(REPLACE(STUFF(TVFScript, /*delete final comma line-terminator*/LEN(TVFScript)-CHARINDEX('|,|',REVERSE(TVFScript)+'|')-1,3,'')+'\n ('+COALESCE(STUFF(TVFScriptParams, /*delete final comma line-terminator*/LEN(TVFScriptParams)-CHARINDEX('|,|',REVERSE(TVFScriptParams)+'|')-1,3,''),'')+'\n )','\n',CHAR(13)+CHAR(10)),'|,|',',') /*put in new-lines and convert token to comma*/,'&lt;','<'),'&gt;','>') AS TemplateFROM(SELECTso.name AS Name,OBJECT_SCHEMA_NAME(so.object_ID)+'.'+so.name AS qualifiedName,'SELECT '+REPLACE(COALESCE((SELECT '\n '+QUOTENAME(sp.name)+'|,|'+COALESCE(' /*'+CONVERT(VARCHAR(MAX),value)+'*/','')FROM sys.columns spLEFT OUTER JOIN sys.extended_properties epON sp.object_id = ep.major_IDAND sp.column_ID = minor_ID AND class=1WHERE sp.object_ID=so.object_IDAND column_ID>0ORDER BY column_IDFOR XML PATH('')),'|,|'),',||', '')+'\nFROM '+QUOTENAME(OBJECT_SCHEMA_NAME(so.object_ID))+'.'+QUOTENAME(so.name)+COALESCE(' /*' +CONVERT(VARCHAR(300), value)+'*/', '')AS [TVFScript],REPLACE(COALESCE((SELECT REPLACE ('\n |delim;<'+REPLACE(COALESCE(CONVERT(VARCHAR(MAX),value),REPLACE(sp.name,'@','')),',','')+','+t.name+','+'>|delim;'+'|,|'+COALESCE(' /*'+CONVERT(VARCHAR(MAX),value)+'*/',''),'|delim;',CASE WHEN t.name IN ('char', 'varchar','nchar','nvarchar','text','ntext','datetime','date') THEN ''''WHEN t.precision=0 THEN '''' ELSE '' END)FROM sys.parameters spINNER JOIN sys.types t ON sp.user_Type_ID=t.user_Type_IDLEFT OUTER JOIN sys.extended_properties epON ep.name LIKE 'MS_Description'AND sp.object_id = ep.major_IDAND sp.parameter_ID = minor_ID AND class=2WHERE sp.object_ID=so.object_IDAND parameter_ID>0ORDER BY parameter_IDFOR XML PATH('')),'1'),',||', '') [TVFScriptParams]FROMsys.objects soLEFT OUTER JOIN sys.extended_properties ep/* get any extended properties */ON ep.name LIKE 'MS_Description'AND major_ID=so.object_IDAND minor_ID=0WHEREOBJECTPROPERTY(object_id, 'IsTableFunction')<>0)f