IF OBJECT_ID('fn_GetFormatMoney', N'FN') IS NOT NULL
DROP FUNCTION fn_GetFormatMoney
GO
CREATE FUNCTION dbo.fn_GetFormatMoney (@money numeric(14,2))
RETURNS NVARCHAR(32) AS
BEGIN
DECLARE @money_num NVARCHAR(20) --存储金额的字符形式
, @money_chn NVARCHAR(32) --存储金额的中文大写形式
, @n_chn NVARCHAR(1), @i INT --临时变量
SELECT @money_chn=CASE WHEN @money>=0 THEN '' ELSE '(负)' END
, @money=ABS(@money)
, @money_num=STUFF(STR(@money, 15, 2), 13, 1, '') --加前置空格补齐到14位(去掉小数点)
, @i=PATINDEX('%[1-9]%', @money_num) --找到金额最高位
WHILE @i>=1 and @i<=14
BEGIN
SET @n_chn=SUBSTRING(@money_num, @i, 1)
IF @n_chn<>'0' or (SUBSTRING(@money_num,@i+1,1)<>'0' and @i not in(4, 8, 12, 14)) --转换阿拉伯数字为中文大写形式
SET @money_chn=@money_chn+SUBSTRING('零壹贰叁肆伍陆柒捌玖', @n_chn+1, 1)
IF @n_chn<>'0' or @i in(4, 8, 12) --添加中文单位
SET @money_chn=@money_chn+SUBSTRING('仟佰拾亿仟佰拾万仟佰拾圆角分',@i,1)
SET @i=@i+1
END
SET @money_chn=REPLACE(@money_chn, '亿万', '亿') --当金额为X亿零万时去掉万
IF @money=0 SET @money_chn='零圆整' --当金额为零时返回'零圆整'
IF @n_chn='0' SET @money_chn=@money_chn+'整' --当金额末尾为零分时以'整'结尾
RETURN @money_chn --返回大写金额
END
GO
DROP FUNCTION fn_GetFormatMoney
GO
CREATE FUNCTION dbo.fn_GetFormatMoney (@money numeric(14,2))
RETURNS NVARCHAR(32) AS
BEGIN
DECLARE @money_num NVARCHAR(20) --存储金额的字符形式
, @money_chn NVARCHAR(32) --存储金额的中文大写形式
, @n_chn NVARCHAR(1), @i INT --临时变量
SELECT @money_chn=CASE WHEN @money>=0 THEN '' ELSE '(负)' END
, @money=ABS(@money)
, @money_num=STUFF(STR(@money, 15, 2), 13, 1, '') --加前置空格补齐到14位(去掉小数点)
, @i=PATINDEX('%[1-9]%', @money_num) --找到金额最高位
WHILE @i>=1 and @i<=14
BEGIN
SET @n_chn=SUBSTRING(@money_num, @i, 1)
IF @n_chn<>'0' or (SUBSTRING(@money_num,@i+1,1)<>'0' and @i not in(4, 8, 12, 14)) --转换阿拉伯数字为中文大写形式
SET @money_chn=@money_chn+SUBSTRING('零壹贰叁肆伍陆柒捌玖', @n_chn+1, 1)
IF @n_chn<>'0' or @i in(4, 8, 12) --添加中文单位
SET @money_chn=@money_chn+SUBSTRING('仟佰拾亿仟佰拾万仟佰拾圆角分',@i,1)
SET @i=@i+1
END
SET @money_chn=REPLACE(@money_chn, '亿万', '亿') --当金额为X亿零万时去掉万
IF @money=0 SET @money_chn='零圆整' --当金额为零时返回'零圆整'
IF @n_chn='0' SET @money_chn=@money_chn+'整' --当金额末尾为零分时以'整'结尾
RETURN @money_chn --返回大写金额
END
GO
测试:
GO CREATE TABLE tb_money(id INT IDENTITY(1,1) PRIMARY KEY, m NUMERIC(14,2)) INSERT tb_money SELECT 0 UNION ALL SELECT 0.01 UNION ALL SELECT 0.2 UNION ALL SELECT 0.35 UNION ALL SELECT 230 UNION ALL SELECT 10000.2 UNION ALL SELECT 10020.3 UNION ALL SELECT 10300.45 UNION ALL SELECT -10304.07 UNION ALL SELECT 30210020 UNION ALL SELECT -3020000 UNION ALL SELECT 3020400 UNION ALL SELECT 302040000000 UNION ALL SELECT 302004000000.1 select m as '小写金额', dbo.fn_GetFormatMoney(m) as '大写金额' from tb_money /* 小写金额 大写金额 --------------------------------------- -------------------------------- 0.00 零圆整 0.01 壹分 0.20 贰角整 0.35 叁角伍分 230.00 贰佰叁拾圆整 10000.20 壹万圆贰角整 10020.30 壹万零贰拾圆叁角整 10300.45 壹万零叁佰圆肆角伍分 -10304.07 (负)壹万零叁佰零肆圆零柒分 30210020.00 叁仟零贰拾壹万零贰拾圆整 -3020000.00 (负)叁佰零贰万圆整 3020400.00 叁佰零贰万零肆佰圆整 302040000000.00 叁仟零贰拾亿肆仟万圆整 302004000000.10 叁仟零贰拾亿零肆佰万圆壹角整 (14 row(s) affected) */ DROP TABLE tb_money
,如需转载请自行联系原作者