-- Desc: Document tables and columns in a SQL Server database
-- License: ShoutOutWare - give me a shout out on Twitter @bdill if this script helped you. :)
-- Auth: Brian Dill 2021-03-05
-- Script home: https://pastebin.com/xLBJktdQ
-- Other useful files: https://pastebin.com/u/bdill (scripts, data files, etc.) 
CREATE OR ALTER PROCEDURE dbo.adm_DocumentTables2
    @TableNameLike VARCHAR(200) = '%%'
  , @ColumnNameLike VARCHAR(200) = '%%'
AS
BEGIN
	IF OBJECT_ID('tempdb..#tmpKeys') IS NOT NULL 
		DROP TABLE #tmpKeys 

	CREATE TABLE #tmpKeys (
	  SchemaName VARCHAR(100) NOT NULL
	, TableName VARCHAR(200) NOT NULL
	, ColumnName VARCHAR(200) NOT NULL
	, ConstraintType VARCHAR(100) NOT NULL
	)
	INSERT INTO #tmpKeys(SchemaName, TableName, ColumnName, ConstraintType)
	SELECT CCU.TABLE_SCHEMA, CCU.TABLE_NAME, CCU.COLUMN_NAME, TC.CONSTRAINT_TYPE 
	FROM INFORMATION_SCHEMA.TABLE_CONSTRAINTS AS TC 
	JOIN INFORMATION_SCHEMA.CONSTRAINT_COLUMN_USAGE AS CCU ON CCU.CONSTRAINT_NAME = TC.CONSTRAINT_NAME

	SELECT 
		  S.name AS SchemaName
		, T.name AS TableName
		, C.name AS ColumnName
		, CASE 
		  WHEN Y.name IN ('varchar', 'nvarchar') AND C.max_length = -1 THEN UPPER(Y.name) + '(MAX)'
		  WHEN Y.name IN ('char', 'varchar', 'datetime2') THEN UPPER(Y.name) + '(' + CONVERT(VARCHAR(10), C.max_length) + ')'
		  WHEN Y.name IN ('nvarchar', 'nchar') THEN UPPER(Y.name) + '(' + CONVERT(VARCHAR(10), C.max_length/2) + ')'
		  WHEN Y.name IN ('float', 'numeric', 'decimal') THEN UPPER(Y.name) + '(' + CONVERT(VARCHAR(10), C.precision) + ', ' + CONVERT(VARCHAR(10), C.scale) + ')'
		  ELSE UPPER(Y.name) END AS DataTypeSpec
		, CASE C.is_nullable WHEN 0 THEN 'NOT NULL' ELSE 'NULL' END AS Nullable
		, CASE C.is_identity WHEN 1 THEN 'IDENTITY' ELSE '' END AS [Identity]
		, CASE WHEN DC.name IS NULL THEN ''
		  --ELSE 'CONSTRAINT ' + DC.name + ' DEFAULT ' + SUBSTRING(DC.definition, 2, LEN(DC.definition)-2 ) END AS [Default] 
		  ELSE SUBSTRING(DC.definition, 2, LEN(DC.definition)-2 ) END AS [Default] 
		, CASE WHEN K.ConstraintType = 'PRIMARY KEY' THEN 'PK' 
			   WHEN K.ConstraintType = 'FOREIGN KEY' THEN 'FK' ELSE '' END AS [Key]
		, ISNULL(refT.name + '.' + refC.name, '') AS RefersTo
		, C.column_id
		--, '--' AS Divider, Y.name AS DataType, C.max_length, C.precision, C.scale, C.system_type_id, C.user_type_id
	FROM sys.tables AS T
	JOIN sys.schemas AS S ON S.schema_id = T.schema_id
	JOIN sys.columns AS C ON C.object_id = T.object_id
	JOIN sys.types AS Y ON Y.user_type_id = C.user_type_id
	LEFT OUTER JOIN sys.default_constraints AS DC ON DC.parent_object_id = T.object_id AND DC.parent_column_id = C.column_id
	LEFT OUTER JOIN sys.foreign_key_columns AS FKC ON FKC.parent_object_id = C.object_id AND FKC.parent_column_id = C.column_id
	LEFT OUTER JOIN sys.tables AS refT ON refT.object_id = FKC.referenced_object_id
	LEFT OUTER JOIN sys.columns AS refC ON refC.object_id = FKC.referenced_object_id AND FKC.referenced_column_id = refC.column_id
	LEFT OUTER JOIN #tmpKeys AS K ON K.SchemaName = S.name AND K.TableName = T.name AND K.ColumnName = C.name
	WHERE T.name <> 'sysdiagrams'
	AND T.name LIKE @TableNameLike
	AND C.name LIKE @ColumnNameLike
	ORDER BY S.name, T.name, C.column_id
END;