SQL 读取数据库中所有数据表的所有约束类型名称和默认值

--设计初衷:转换简体版本的数据表到繁体版本
--使用游标查询所有用户数据表
Declare @CurrentTableName nvarchar(250)
Declare UserTableCursor Cursor For    --声明游标
Select name From sysobjects   where   xtype='U' and category='2561' order by name
Open UserTableCursor    --打开游标
FETCH NEXT From UserTableCursor    --获取游标的下一行
--使变量获得当前游标指定行的Name
into @CurrentTableName
While @@FETCH_STATUS = 0    --FETCH语句执行成功
BEGIN
--查询当前数据表中所有的约束
print N'当前数据表名'+@CurrentTableName
 --使用游标查询指定用户数据表中的约束
 Declare @ConstraintType nvarchar(250)
 Declare @ConstraintName nvarchar(250)
 Declare @ConstraintValue nvarchar(250)
 Declare ConstraintCursor Cursor For Select a.xtype as 约束类型,a.name as 约束名称,isnull(b.text,N'NULL') as 默认值 From sysobjects a left outer join syscomments b on a.id = b.id where (OBJECTPROPERTY(a.id, N'IsMSShipped') = 0) and a.parent_obj=(Select id From sysobjects where name = @CurrentTableName)
 Open ConstraintCursor    --打开游标
 FETCH NEXT From ConstraintCursor    --获取游标的下一行
 --使变量获得当前游标指定行的Name
 into @ConstraintType,@ConstraintName,@ConstraintValue
 While @@FETCH_STATUS = 0    --FETCH语句执行成功
 BEGIN
 --查询当前数据表中所有的约束
 print N'当前数据表名'+@CurrentTableName+N'约束类型'+@ConstraintType+N'约束名称'+@ConstraintName+N'默认值'+@ConstraintValue

 FETCH NEXT From ConstraintCursor    --获取游标的下一行
 --使变量获得当前游标指定行的Name,CycleBeginTime，CycleEndTime
 into @ConstraintType,@ConstraintName,@ConstraintValue
 END
 CLOSE ConstraintCursor    --关闭游标
 DEALLOCATE ConstraintCursor    --释放游标

FETCH NEXT From UserTableCursor    --获取游标的下一行
--使变量获得当前游标指定行的Name,CycleBeginTime，CycleEndTime
into @CurrentTableName
END
CLOSE UserTableCursor    --关闭游标
DEALLOCATE UserTableCursor    --释放游标