全角数字变成半角数字的存储过程

Declare  @p  nvarchar(200)  
Declare  @idx  int  
Declare  @ret  varchar(200)    
set  @p=N'１２３４５６７。８９０'  
SET  @ret=''  
Set  @idx=1  
WHILE  SUBSTRING(@p,@idx,1)<>''    
       BEGIN    
               SET  @ret=@ret+NCHAR(UNICODE(SUBSTRING(@p,@idx,1))-CASE  WHEN  SUBSTRING(@p,@idx,1)='。'  THEN  12244  ELSE    65248  END  )  
               SET  @idx=@Idx+1  
         END  
SELECT  @ret