create function usf_chinesecost
(
@cost float
)
returns varchar(50)
as
----大写钱数----
begin
declare @returnstr varchar(50)
if (@cost >= 1000000000)
begin
set @returnstr = '##########'
return @returnstr
end
set @returnstr = '00000000000'
set @returnstr = right(@returnstr convert(varchar,convert(decimal(11,2),round(@cost,2))),12)
set @returnstr = replace(@returnstr,'0','零')
set @returnstr = replace(@returnstr,'1','壹')
set @returnstr = replace(@returnstr,'2','贰')
set @returnstr = replace(@returnstr,'3','叁')
set @returnstr = replace(@returnstr,'4','肆')
set @returnstr = replace(@returnstr,'5','伍')
set @returnstr = replace(@returnstr,'6','陆')
set @returnstr = replace(@returnstr,'7','柒')
set @returnstr = replace(@returnstr,'8','捌')
set @returnstr = replace(@returnstr,'9','玖')
set @returnstr = @returnstr '分'
set @returnstr = stuff(@returnstr,len(@returnstr)-1,0,'角')
set @returnstr = replace(@returnstr,'.','元')
set @returnstr = stuff(@returnstr,len(@returnstr)-5,0,'拾')
set @returnstr = stuff(@returnstr,len(@returnstr)-7,0,'百')
set @returnstr = stuff(@returnstr,len(@returnstr)-9,0,'千')
set @returnstr = stuff(@returnstr,len(@returnstr)-11,0,'万')
set @returnstr = stuff(@returnstr,len(@returnstr)-13,0,'拾')
set @returnstr = stuff(@returnstr,len(@returnstr)-15,0,'百')
set @returnstr = stuff(@returnstr,len(@returnstr)-17,0,'千')
set @returnstr = stuff(@returnstr,len(@returnstr)-19,0,'亿')
set @returnstr = replace(@returnstr,'零亿','零')
set @returnstr = replace(@returnstr,'零千','零')
set @returnstr = replace(@returnstr,'零百','零')
set @returnstr = replace(@returnstr,'零拾','零')
set @returnstr = replace(@returnstr,'零零零','零')
set @returnstr = replace(@returnstr,'零零','零')
set @returnstr = replace(@returnstr,'零万','万')
set @returnstr = replace(@returnstr,'零元','元')
set @returnstr = replace(@returnstr,'零角','零')
set @returnstr = replace(@returnstr,'零分','')
while left(@returnstr,1) = '零'
begin
set @returnstr = right(@returnstr,len(@returnstr)-1)
end
if ((left(@returnstr,1)='万'))
begin
set @returnstr = right(@returnstr,len(@returnstr)-1)
end
if ((left(@returnstr,1)='元'))
begin
set @returnstr = right(@returnstr,len(@returnstr)-1)
end
while left(@returnstr,1) = '零'
begin
set @returnstr = right(@returnstr,len(@returnstr)-1)
end
while right(@returnstr,1) = '零'
begin
set @returnstr = left(@returnstr,len(@returnstr)-1)
end
set @returnstr = replace(@returnstr,'亿万','亿零')
set @returnstr = replace(@returnstr,'零元','元')
set @returnstr = replace(@returnstr,'零零零','零')
set @returnstr = replace(@returnstr,'零零','零')
if (@returnstr='')
begin
set @returnstr = '零元'
end
if ((right(@returnstr,1)='元'))
begin
set @returnstr = @returnstr '整'
end
return @returnstr
end
用户登录
还没有账号?立即注册
用户注册
投稿取消
| 文章分类: |
|
还能输入300字
上传中....
风轻云淡288