首页 | 登录 | 注册 | 会员中心 | 网站地图
  当前位置:首页 >> 网管 >> 数据库 >> SQL Server >> 使用扩展属性快速创建SQL Server数据字典
使用扩展属性快速创建SQL Server数据字典
来源:IT专家网 作者: 发布时间:2008-09-19

  问题

  我需要一个创建能够保持最新数据字典的方法。我对数据库做了很多更改,而我花费于数据库文档更新的时间多于数据库管理的时间。

  专家解答

  如果你将元数据存储为扩展属性,那么你可以使用SQL Server 2005在几秒之内为一个数据库创建一个数据字典。SQL Server 2005 AdventureWorks示例数据库包含了众多扩展属性,所以这个数据库是一个很好的示例。在这篇文章里,我们将介绍两个核心内容。首先是一组脚本示例,它为表和字段添加扩展属性。其次是生成HTML格式数据字典的T-SQL代码。

  示例脚本——sys.sp_addextendedproperty

  下面是一个示例脚本,它添加扩展属性到这个数据库上。

  为表和字段添加扩展属性


  /**********
  The following extended properties already exist in the AdventureWorks database. There is no need to run the script against the database in order for the remaining samples to work.
  **********/
  USE [AdventureWorks]
  GO
  --Script to add an Extended Property to the Table
  EXEC sys.sp_addextendedproperty
  @name=N'MS_Description',
  @value=N'Street address information for customers, employees, and vendors.' ,
  @level0type=N'SCHEMA',
  @level0name=N'Person', --Schema Name
  @level1type=N'TABLE',
  @level1name=N'Address' --Table Name
  GO
  --Script to add an Extended Property to a column
  EXEC sys.sp_addextendedproperty
  @name=N'MS_Description',
  @value=N'First street address line.' ,
  @level0type=N'SCHEMA',
  @level0name=N'Person', --Schema Name
  @level1type=N'TABLE',
  @level1name=N'Address',--Table Name
  @level2type=N'COLUMN',
  @level2name=N'AddressLine1'--Column Name
  GO

  还可以通过右键单击SSMS中的对象并选择属性来查看扩展属性,如下图所示:

快速创建SQL Server数据字典

  如果你的数据库在扩展属性中有数据,那么你可以运行查询来提取这个数据。在SQL Server管理套件中,选择Tools | Options,并在Results to Text中不选“Include column headers in the result set”(在结果集中包含字段头)选项。这将使显示在每个字段名称下面的结果集都不包含字段头。

快速创建SQL Server数据字典

  HTML格式的数据字典

  运行下面的脚本来生成数据字典,并保存结果到一个扩展名为“.htm”的文件中。

  生成数据字典的示例T-SQL脚本

Set nocount on

DECLARE @TableName nvarchar(35)

DECLARE Tbls CURSOR
FOR

Select distinct Table_name
FROM INFORMATION_SCHEMA.COLUMNS
--put any exclusions here
--where table_name not like '%old'
order by Table_name

OPEN Tbls

PRINT '<HTML><body>'

FETCH NEXT FROM Tbls
INTO @TableName

WHILE @@FETCH_STATUS = 0
BEGIN

PRINT '</br>'
PRINT '<table border="1">'
Print '<B>' + @TableName + '</B>'
PRINT '</br>'
--Get the Description of the table
--Characters 1-250
Select substring(cast(Value as varchar(1000)),1,250) FROM
sys.extended_properties A
WHERE A.major_id = OBJECT_ID(@TableName)
and name = 'MS_Description' and minor_id = 0

--Characters 251-500
Select substring(cast(Value as varchar(1000)),251, 250) FROM
sys.extended_properties A
WHERE A.major_id = OBJECT_ID(@TableName)
and name = 'MS_Description' and minor_id = 0

PRINT '<tr><b>'
--Set up the Column Headers for the Table
PRINT '<td><b>Column Name</b></td>'
PRINT '<td><b>Description</b></td>'
PRINT '<td><b>InPrimaryKey</b></td>'
PRINT '<td><b>IsForeignKey</b></td>'
PRINT '<td><b>DataType</b></td>'
PRINT '<td><b>Length</b></td>'
PRINT '<td><b>Numeric Precision</b></td>'
PRINT '<td><b>Numeric Scale</b></td>'
PRINT '<td><b>Nullable</b></td>'
PRINT '<td><b>Computed</b></td>'
PRINT '<td><b>Identity</b></td>'
PRINT '<td><b>Default Value</b></td>'

--Get the Table Data
SELECT '</b></tr>',
'<tr>',
'<td>' + CAST(clmns.name AS VARCHAR(35)) + '</td>',
'<td>' + substring(ISNULL(CAST(exprop.value AS VARCHAR(255)),''),1,250),
substring(ISNULL(CAST(exprop.value AS VARCHAR(500)),''),251,250) + '</td>',
'<td>' + CAST(ISNULL(idxcol.index_column_id, 0)AS VARCHAR(20)) + '</td>',
'<td>' + CAST(ISNULL(
(SELECT TOP 1 1
FROM sys.foreign_key_columns AS fkclmn
WHERE fkclmn.parent_column_id = clmns.column_id
AND fkclmn.parent_object_id = clmns.object_id
), 0) AS VARCHAR(20)) + '</td>',
'<td>' + CAST(udt.name AS CHAR(15)) + '</td>' ,
'<td>' + CAST(CAST(CASE WHEN typ.name IN (N'nchar', N'nvarchar') AND clmns.max_length <> -1
THEN clmns.max_length/2
ELSE clmns.max_length END AS INT) AS VARCHAR(20)) + '</td>',
'<td>' + CAST(CAST(clmns.precision AS INT) AS VARCHAR(20)) + '</td>',
'<td>' + CAST(CAST(clmns.scale AS INT) AS VARCHAR(20)) + '</td>',
'<td>' + CAST(clmns.is_nullable AS VARCHAR(20)) + '</td>' ,
'<td>' + CAST(clmns.is_computed AS VARCHAR(20)) + '</td>' ,
'<td>' + CAST(clmns.is_identity AS VARCHAR(20)) + '</td>' ,
'<td>' + isnull(CAST(cnstr.definition AS VARCHAR(20)),'') + '</td>'
FROM sys.tables AS tbl
INNER JOIN sys.all_columns AS clmns
ON clmns.object_id=tbl.object_id
LEFT OUTER JOIN sys.indexes AS idx
ON idx.object_id = clmns.object_id
AND 1 =idx.is_primary_key
LEFT OUTER JOIN sys.index_columns AS idxcol
ON idxcol.index_id = idx.index_id
AND idxcol.column_id = clmns.column_id
AND idxcol.object_id = clmns.object_id
AND 0 = idxcol.is_included_column
LEFT OUTER JOIN sys.types AS udt
ON udt.user_type_id = clmns.user_type_id
LEFT OUTER JOIN sys.types AS typ
ON typ.user_type_id = clmns.system_type_id
AND typ.user_type_id = typ.system_type_id
LEFT JOIN sys.default_constraints AS cnstr
ON cnstr.object_id=clmns.default_object_id
LEFT OUTER JOIN sys.extended_properties exprop
ON exprop.major_id = clmns.object_id
AND exprop.minor_id = clmns.column_id
AND exprop.name = 'MS_Description'
WHERE (tbl.name = @TableName and
exprop.class = 1) --I don't wand to include comments on indexes
ORDER BY clmns.column_id ASC


PRINT '</tr></table>'

FETCH NEXT FROM Tbls
INTO @TableName
END


PRINT '</body></HTML>'

CLOSE Tbls
DEALLOCATE Tbls


  •   这个脚本将被安排作为一个工作来运行,所以你不需要担心要手动更新文档。
  •   因为你将文档存储在数据库中,所以你不必担心拥有多个拷贝并指出哪个是最新的。它还会与数据库一起备份。
  •   这个脚本不会添加扩展属性,但是显然你将丢失这些描述,所以花些时间将这些信息添加到你的环境中。
(责任编辑:IORI)
网友评论
评论加载中…
快速检索
推荐专题
漏洞扫描全搜索
Solaris 基础知识入门——专题
注册表 入门基础及修改技巧
网络故障排除专题
友情链接 | 欢迎投稿 | 杂志发行 | 广告报价 | 人才招聘 | 服务条款 | 免责声明 | 隐私保护 | 关于网管员世界
CopyRight © 2001-2008 [网管员世界 www.365master.com] All Rights Reserved.
《网管员世界》杂志,专为网管服务的刊物!