sqlserver 導出表結構（數據字典）

SELECT
         d.name 表名,
        a.colorder 字段序號,
        a.name 字段名,
        (case when COLUMNPROPERTY( a.id,a.name,'IsIdentity')=1 then '√'else '' end) 標識,
       (case when (SELECT count(*)
        FROM [OrnamentERP_New_XAMGZS-83336442].[dbo].sysobjects
        WHERE (name in
                (SELECT name
                FROM [OrnamentERP_New_XAMGZS-83336442].[dbo].sysindexes
                WHERE (id = a.id) AND (indid in
                         (SELECT indid
                        FROM [OrnamentERP_New_XAMGZS-83336442].[dbo].sysindexkeys
                        WHERE (id = a.id) AND (colid in
                                  (SELECT colid
                                 FROM [OrnamentERP_New_XAMGZS-83336442].[dbo].syscolumns
                                 WHERE (id = a.id) AND (name = a.name))))))) AND
            (xtype = 'PK'))>0 then '√' else '' end) 主鍵,
       b.name 類型,
       a.length 佔用字節數,
      --COLUMNPROPERTY(a.id,a.name,'PRECISION') as 長度,
      isnull(COLUMNPROPERTY(a.id,a.name,'Scale'),0) as 小數位數,
      (case when a.isnullable=1 then '√'else '' end) 容許空,
      isnull(e.text,'') 默認值,
      isnull(g.[value],'') AS 字段說明
FROM  [OrnamentERP_New_XAMGZS-83336442].[dbo].syscolumns  a left join [OrnamentERP_New_XAMGZS-83336442].[dbo].systypes b
on  a.xtype=b.xusertype
inner join [OrnamentERP_New_XAMGZS-83336442].[dbo].sysobjects d
on a.id=d.id  and  d.xtype='U' and  d.name<>'dtproperties'
left join [OrnamentERP_New_XAMGZS-83336442].[dbo].syscomments e
on a.cdefault=e.id
left join [OrnamentERP_New_XAMGZS-83336442].sys.extended_properties g
on a.id=g.major_id AND a.colid = g.minor_id AND g.name='MS_Description'
order by 表名,a.id,a.colorder

 

 

表說明：

SELECT 表名 = case when a.colorder = 1 then d.name 
                   else '' end, 
       表說明 = case when a.colorder = 1 then isnull(f.value, '') 
                     else '' end
FROM [OrnamentERP_New_XAMGZS-83336442].[dbo].syscolumns a 
       inner join [OrnamentERP_New_XAMGZS-83336442].[dbo].sysobjects d 
          on a.id = d.id 
             and d.xtype = 'U' 
             and d.name <> 'sys.extended_properties'
       left join [OrnamentERP_New_XAMGZS-83336442].sys.extended_properties   f 
         on a.id = f.major_id 
            and f.minor_id = 0
Where (case when a.colorder = 1 then d.name else '' end) <>''