PB中小写金额转换成大写金额(发票类型)

本文介绍了一种将小写金额数值转换为符合发票格式的大写金额字符串的方法。通过定义字符数组来映射数字和单位,并采用循环遍历的方式完成转换。

摘要生成于 C知道 ,由 DeepSeek-R1 满血版支持, 前往体验 >

 
PB中小写金额转换成大写金额
//=================================================================
// 功能:小写金额转换成大写金额
// 参数:    decimal     number  需要转换的金额
// 返回值:  string      ls_rc   大写金额字符串

string CN_NUM[10] = {"零","壹","贰","叁","肆","伍","陆","柒","捌","玖"}//大写0-9
string CN_CARRY[19] = {"分","角","","元","拾","佰","仟","万","拾","佰","仟","亿","拾","佰","仟","万","拾","佰","仟"}//单位
string ls_pos,ls_old,ls_number,ls_rc = ''
integer li_i,li_len //循环变量
string ls_zf = '' //正负符号
//参数格式化
if number < 0 then
 ls_zf = '负'
 number = (-1)*number
end if
ls_number = string(number,"0.00")
//参数的长度
li_len = Len(ls_number)
//转换为大写(发票格式),从右到左
for li_i = 1 to li_len
 ls_pos = Mid(ls_number,li_len - li_i + 1,1)
 if ls_pos = '.' then continue
 ls_rc = cn_num[1 + mod(integer(ls_pos),10)] + cn_carry[li_i] + ls_rc 
next
ls_rc = ls_zf + ls_rc
return ls_rc //返回结果
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值