SQL Server 获取汉语拼音简码

alter   FUNCTION  FB_GetChineseSpell
(
     @Str     varchar ( 500 ) = ''
)
RETURNS    varchar ( 500 )
as    
   begin    
     declare   @strLen   int
     declare   @index   int
     declare   @VChControl   char ( 2 )
     DECLARE   @VChSpell   VARCHAR ( 30 )
     declare   @return   varchar ( 500 )
     set   @return = ''
     set   @strlen = len ( @str )
     set   @index = 1
     while   @index <= @strlen
     begin
         select   @VChControl = substring ( @str , @index , 1 )
          IF   @VChControl > ' 啊 '   AND   @VChControl < ' 芭 '  
             SELECT   @VChSpell = ' A '
         ELSE   IF   @VChControl >= ' 芭 '   AND   @VChControl < ' 擦 '  
             SELECT   @VChSpell = ' B '
         ELSE   IF   @VChControl >= ' 擦 '   AND   @VChControl < ' 搭 '  
             SELECT   @VChSpell = ' C '
         ELSE   IF   @VChControl >= ' 搭 '   AND   @VChControl < ' 娥 '  
             SELECT   @VChSpell = ' D '
         ELSE   IF   @VChControl >= ' 娥 '   AND   @VChControl < ' 发 '  
             SELECT   @VChSpell = ' E '
         ELSE   IF   @VChControl >= ' 发 '   AND   @VChControl <= ' 嘎 '
             SELECT   @VChSpell = ' F '
         ELSE   IF   @VChControl > ' 嘎 '   AND   @VChControl < ' 哈 '  
             SELECT   @VChSpell = ' G '
         ELSE   IF   @VChControl >= ' 哈 '   AND   @VChControl < ' 击 '  
             SELECT   @VChSpell = ' H '
         ELSE   IF   @VChControl >= ' 击 '   AND   @VChControl < ' 喀 '
             SELECT   @VChSpell = ' J '
         ELSE   IF   @VChControl >= ' 喀 '   AND   @VChControl < ' 垃 '  
             SELECT   @VChSpell = ' K '
         ELSE   IF   @VChControl >= ' 垃 '   AND   @VChControl < ' 妈 '  
             SELECT   @VChSpell = ' L '
         ELSE   IF   @VChControl >= ' 妈 '   AND   @VChControl < ' 拿 '  
             SELECT   @VChSpell = ' M '
         ELSE   IF   @VChControl >= ' 拿 '   AND   @VChControl < ' 哦 '  
             SELECT   @VChSpell = ' N '
         ELSE   IF   @VChControl >= ' 哦 '   AND   @VChControl < ' 啪 '  
             SELECT   @VChSpell = ' O '
         ELSE   IF   @VChControl >= ' 啪 '   AND   @VChControl < ' 期 '
             SELECT   @VChSpell = ' P '
         ELSE   IF   @VChControl >= ' 期 '   AND   @VChControl < ' 然 '  
             SELECT   @VChSpell = ' Q '
         ELSE   IF   @VChControl >= ' 然 '   AND   @VChControl < ' 撒 '  
             SELECT   @VChSpell = ' R '
         ELSE   IF   @VChControl >= ' 撒 '   AND   @VChControl < ' 塌 '  
             SELECT   @VChSpell = ' S '
         ELSE   IF   @VChControl >= ' 塌 '   AND   @VChControl < ' 挖 '
             SELECT   @VChSpell = ' T '
         ELSE   IF   @VChControl >= ' 挖 '   AND   @VChControl < ' 昔 '  
             SELECT   @VChSpell = ' W '
         ELSE   IF   @VChControl >= ' 昔 '   AND   @VChControl < ' 压 '
             SELECT   @VChSpell = ' X '
         ELSE   IF   @VChControl >= ' 压 '   AND   @VChControl < ' 匝 '  
             SELECT   @VChSpell = ' Y '
         ELSE   IF   @VChControl >= ' 匝 '   AND   @VChControl <= ' 座 '  
             SELECT   @VChSpell = ' Z '
         ELSE
             SELECT   @VChSpell = @VChControl

         SELECT   @return = @return   +   RTRIM ( UPPER ( @VChSpell ))
         set   @index = @index + 1
     end
   return ( @return )   
   end

转载于:https://www.cnblogs.com/cpine/archive/2011/08/01/2123969.html