按照规则重命名所有外键名称

以前用PD设计数据库时，或者直接在企业管理器设计表结构时，总想将外键手工按规则命名，而不是使用系统自动产生的随机名称。但是手工命名一段时间后，就觉得太累，啰嗦，很烦，慢慢的就不了了之了。不过，平心而论我们还是希望所有对象的命名是规范的，这样做不但看着舒服、显得好看专业，而且在着急调整某个外键时可以根据规则直接写出其名称，不需要先去查看到底其名称是什么。

今天痛下决心，写了个sql，按规则重命名所有外键信息。呵呵，挺好，能够懒点的话，还是懒点好！

CREATE　　　　PROC　proc_Rename_Fkeys
AS　
/*************************************************************************
创建时间：2010-01-21　10:31
创建人员：王召冠
功能说明：按照规则重命名所有外键名称。
　　　　　　　　　　　　命名规则：fk__FkTableName__FkColumnName__PkTableName__PkColumnName
注意事项：
业务注释：
--------------------------------------------------------------------------
修改时间：2010-01-21　13:42
修改人员：王召冠
修改说明：增加对多字段主外键关联情况的支持
**************************************************************************/
DECLARE　@vTableName　NVARCHAR(50),　　　　　　　　--用户表名称
　　　　　　　　@vPkTableName　NVARCHAR(50),　　　　　　　　--主键表名称
　　　　　　　　@vPkColumnName　NVARCHAR(50),　　　　--主键字段名称
　　　　　　　　@vFkTableName　NVARCHAR(50),　　　　　　　　--外键表名称
　　　　　　　　@vFkColumnName　NVARCHAR(50),　　　　--外键字段名称
　　　　　　　　@vFkName　NVARCHAR(500),　　　　　　　　　　　　--原外键名称
　　　　　　　　@vFkNewName　NVARCHAR(500)　　　　　　　　--按照规则产生的新外键名称
--　循环所有用户表
DECLARE　table_cursor　CURSOR　FOR　
SELECT　　　　NAME
FROM　　　　sysobjects
WHERE　　　　TYPE　=　'U'
OPEN　table_cursor
FETCH　NEXT　FROM　table_cursor　INTO　@vTableName
WHILE　@@FETCH_STATUS　=　0
BEGIN
　　　　--　定义暂存关联表，用来存储当前表的所有关联外键信息（当前表为主键表）
　　　　CREATE　table　#fkeysout
　　　　(　　
　　　　　　　　OID　INT　IDENTITY,
　　　　　　　　PKTABLE_QUALIFIER　sysname　collate　database_default　NULL,　　
　　　　　　　　PKTABLE_OWNER　sysname　collate　database_default　NULL,　　
　　　　　　　　PKTABLE_NAME　sysname　collate　database_default　NOT　NULL,　　
　　　　　　　　PKCOLUMN_NAME　sysname　collate　database_default　NOT　NULL,　　
　　　　　　　　FKTABLE_QUALIFIER　sysname　collate　database_default　NULL,　　
　　　　　　　　FKTABLE_OWNER　sysname　collate　database_default　NULL,　　
　　　　　　　　FKTABLE_NAME　sysname　collate　database_default　NOT　NULL,　　
　　　　　　　　FKCOLUMN_NAME　sysname　collate　database_default　NOT　NULL,　　
　　　　　　　　KEY_SEQ　smallint　NOT　NULL,　　
　　　　　　　　UPDATE_RULE　smallint　NULL,　　
　　　　　　　　DELETE_RULE　smallint　NULL,　　
　　　　　　　　FK_NAME　sysname　collate　database_default　NULL,　　
　　　　　　　　PK_NAME　sysname　collate　database_default　NULL,　　
　　　　　　　　DEFERRABILITY　smallint　NULL
　　　　)　　
　　　　
　　　　--　取得当前表的关联外键信息
　　　　INSERT　INTO　#fkeysout　(
　　　　　　　　PKTABLE_QUALIFIER,
　　　　　　　　PKTABLE_OWNER,
　　　　　　　　PKTABLE_NAME,
　　　　　　　　PKCOLUMN_NAME,
　　　　　　　　FKTABLE_QUALIFIER,
　　　　　　　　FKTABLE_OWNER,
　　　　　　　　FKTABLE_NAME,
　　　　　　　　FKCOLUMN_NAME,
　　　　　　　　KEY_SEQ,
　　　　　　　　UPDATE_RULE,
　　　　　　　　DELETE_RULE,
　　　　　　　　FK_NAME,
　　　　　　　　PK_NAME,
　　　　　　　　DEFERRABILITY
　　　　)　
　　　　EXEC　sp_fkeys　@vTableName
　　　　--　取得正确的，应该修改的外键信息，暂存（因为存在相同的外键，却创建了两个外键约束）
　　　　SELECT　　　　MIN(OID)　AS　OID
　　　　　　　　　　　　INTO　#tmp1
　　　　FROM　　　　#fkeysout
　　　　GROUP　BY　PKTABLE_NAME,　PKCOLUMN_NAME,　FKTABLE_NAME,　FKCOLUMN_NAME,　KEY_SEQ
　　　　
　　　　--　取得重复的外键信息
　　　　SELECT　　　　FKTABLE_NAME,　FK_NAME,　OID
　　　　　　　　　　　　INTO　#tmp2
　　　　FROM　　　　#fkeysout
　　　　WHERE　　　　OID　NOT　IN　(SELECT　OID　FROM　#tmp1)
　　　　/*----------------重命名外键信息-------------------*/
　　　　DECLARE　fkRename_cursor　CURSOR　FOR　
　　　　SELECT　　　　PKTABLE_NAME,　FKTABLE_NAME,　FK_NAME　
　　　　FROM　　　　#fkeysout
　　　　WHERE　　　　OID　IN　(SELECT　OID　FROM　#tmp1)
　　　　GROUP　BY　PKTABLE_NAME,　FKTABLE_NAME,　FK_NAME
　　　　OPEN　fkRename_cursor
　　　　FETCH　NEXT　FROM　fkRename_cursor　
　　　　INTO　@vPkTableName,　@vFkTableName,　@vFkName
　　　　WHILE　@@FETCH_STATUS　=　0
　　　　BEGIN
　　　　　　　　--　处理多个字段为主外键的情况
　　　　　　　　SET　@vFkColumnName　=　''
　　　　　　　　SET　@vPkColumnName　=　''
　　　　　　　　SELECT　　　　@vFkColumnName　=　@vFkColumnName　+　'__'　+　FKCOLUMN_NAME,
　　　　　　　　　　　　　　　　@vPkColumnName　=　@vPkColumnName　+　'__'　+　PKCOLUMN_NAME
　　　　　　　　FROM　　　　#fkeysout
　　　　　　　　WHERE　　　　FK_NAME　=　@vFkName
　　　　　　　　ORDER　BY　KEY_SEQ
　　　　　　　　
　　　　　　　　SET　@vFkNewName　=　'fk__'　+　@vFkTableName　+　@vFkColumnName　+　'__'　+　@vPkTableName　+　@vPkColumnName
　　　　　　　　EXEC　sp_rename　@vFkName,　@vFkNewName
　　　　　　　　FETCH　NEXT　FROM　fkRename_cursor　
　　　　　　　　INTO　@vPkTableName,　@vFkTableName,　@vFkName
　　　　END
　　　　CLOSE　fkRename_cursor
　　　　DEALLOCATE　fkRename_cursor
　　　　/*--------------------重命名完成--------------------*/
　　　　/*----重复的外键定义需要删除（即，除了外键名称外其余信息完全相同）----*/
　　　　DECLARE　fkFault_cursor　CURSOR　FOR　
　　　　SELECT　FKTABLE_NAME,　FK_NAME
　　　　FROM　#tmp2
　　　　OPEN　fkFault_cursor
　　　　FETCH　NEXT　FROM　fkFault_cursor　
　　　　INTO　@vFkTableName,　@vFkName
　　　　WHILE　@@FETCH_STATUS　=　0
　　　　BEGIN
　　　　　　　　--ALTER　TABLE　RM_tToolApply　DROP　CONSTRAINT　
　　　　　　　　EXEC('ALTER　TABLE　'　+　@vFkTableName　+　'　DROP　CONSTRAINT　'　+　@vFkName)
　　　　　　　　FETCH　NEXT　FROM　fkFault_cursor　
　　　　　　　　INTO　　@vFkTableName,　@vFkName
　　　　END
　　　　CLOSE　fkFault_cursor
　　　　DEALLOCATE　fkFault_cursor
　　　　/*---------------　删除重复的外键　结束　-------------------------*/
　　　　DROP　TABLE　#tmp1
　　　　DROP　TABLE　#tmp2
　　　　DROP　TABLE　#fkeysout
　　　　--　操作下一个用户表的外键信息
　　　　FETCH　NEXT　FROM　table_cursor　INTO　@vTableName
END
CLOSE　table_cursor
DEALLOCATE　table_cursor