SQL自定义主键

SqlServer数据库字符型主键生成过程参考  

此过程生成类型为char(x)型，x为char字串的长度，如果为表Document生成主键则调用方法为：
exec p_my_GetTableNextID 'Document','D',10,@DocumentID output
产生的主键如：D000000001、D000000002,前辍为“D”总长度为10。
具体过程如下：
CREATE PROCEDURE dbo.p_my_GetTableNextID
(
    @TableName varchar(50),--表名
    @prefix varchar(5),--前辍
    @length smallint,--长度
    @strResult varchar(20) OUTPUT--输出
)
as
begin
    declare @strSQL varchar(200)
    declare @intTemp int
    set @strSQL='select top 1 id from ' + @TableName
    exec (@strSQL)
    if @@rowcount=0
        set @intTemp=0
    else
        set @intTemp=IDENT_CURRENT(@TableName)
    set @intTemp=@intTemp+1
    set @strResult=@intTemp
    while len(@strResult)<@length-len(@prefix)
        set @strResult='0' + @strResult
        set @strResult=@prefix+@strResult
    end