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字

上传中....