SQL取拼音首字母函数

/**//*--获得汉字字符串的首字母--*/ 
-- 取拼音首字母函数 
create function GetPinYinFromWord(@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='a' 
        set @return=@return+@c 
    end 
    return(@return) 
end 

--测试 
--Select dbo.GetPinYinFromWord('黎摄文') 
--结果 
--LSW