首页 > 代码库 > 数字转人民币大写(SQL SERVER)

数字转人民币大写(SQL SERVER)

--数字转人民币大写NumToRMB ---新建方法
create  FUNCTION dbo.NumToRMB (@num numeric(14,5))  
RETURNS varchar(100) WITH ENCRYPTION  
AS  
BEGIN  
  DECLARE @n_data VARCHAR(20),@c_data VARCHAR(100),@n_str VARCHAR(10),@i int  
  SET @n_data=http://www.mamicode.com/RIGHT(SPACE(14)+CAST(CAST(ABS(@num*100) AS bigint) AS varchar(20)),14)
  SET @c_data=http://www.mamicode.com/‘‘
  SET @i=1  
  WHILE @i<=14  
  BEGIN  
    SET @n_str=SUBSTRING(@n_data,@i,1)  
    IF @n_str<>‘ ‘  
    BEGIN  
       IF not ((SUBSTRING(@n_data,@i,2)=‘00‘) or  
         ((@n_str=‘0‘) and ((@i=4) or (@i=8) or (@i=12) or (@i=14))))  
        SET @c_data=http://www.mamicode.com/@c_data+SUBSTRING(‘零壹贰叁肆伍陆柒捌玖‘,CAST(@n_str AS int)+1,1)
       IF not ((@n_str=‘0‘) and (@i<>4) and (@i<>8) and (@i<>12))  
        SET @c_data=http://www.mamicode.com/@c_data+SUBSTRING(‘仟佰拾亿仟佰拾万仟佰拾圆角分‘,@i,1)
       IF SUBSTRING(@c_data,LEN(@c_data)-1,2)=‘亿万‘  
        SET @c_data=http://www.mamicode.com/SUBSTRING(@c_data,1,LEN(@c_data)-1)
    END  
    SET @i=@i+1  
  END  
   IF @num<0  
    SET @c_data=http://www.mamicode.com/‘(负数)‘+@c_data
   IF @num=0  
    SET @c_data=http://www.mamicode.com/‘零圆‘
   IF @n_str=‘0‘  
    SET @c_data=http://www.mamicode.com/@c_data+‘整‘
  RETURN(@c_data)  
END

-- SELECT dbo.NumToRMB(20)

数字转人民币大写(SQL SERVER)