MSSQL 生成拼音码

MSSQL 生成拼音码

/*==============================================================================
名称：fn_Get_Pin
功能：生成拼音码
创建：XXX
时间：2009年2月23日
==============================================================================*/
CREATE function [dbo].[fn_Get_Pin](@Str varchar(500)='')
returns varchar(500)
as
begin
declare @strlen int,@return varchar(500),@ii int
declare @n int,@c char(1),@chn nchar(1)

select @strlen=len(@str),@return='',@ii=0
set @ii=0
while (@ii<@strlen)
begin
    select @ii=@ii+1,@n=63,@chn=substring(@str,@ii,1)
    if @chn>'z'
    select @n = @n +1
        ,@c = case chn when @chn then char(@n) else @c end
        from(
        select top 27 *
        from (
        select chn = '吖'
        union all select '八'
        union all select '嚓'
        union all select '咑'
        union all select '妸'
        union all select '发'
        union all select '旮'
        union all select '铪'
        union all select '丌' --because have no 'i'
        union all select '丌'
        union all select '咔'
        union all select '垃'
        union all select '嘸'
        union all select '拏'
        union all select '噢'
        union all select '妑'
        union all select '七'
        union all select '呥'
        union all select '仨'
        union all select '他'
        union all select '屲' --no 'u'
        union all select '屲' --no 'v'
        union all select '屲'
        union all select '夕'
        union all select '丫'
        union all select '帀'
        union all select @chn) as a
        order by chn COLLATE Chinese_PRC_CI_AS
        ) as b
else set @c=upper(@chn)
set @return=@return+@c
end
return(@return)
end

GO