adm_DocumentTables2_old.sql

-- 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;