readme.txt

小写金额转大写

用户对象 u_ncs_conv 只提供一个函数:

uf_conversion( decimal ad_number) return string

用于将小写金额转换成大写金额,使用时,将convert.pbl放入应用的库搜索路径中 

程序示例如下:

u_ncs_conv lu_conv

lu_conv = create u_ncs_conv
sle_1.text = lu_conv.uf_conversion( 123456789012.12 )
destroy lu_conv

数值范围最大到仟亿元,如果应用程序中数额超出此范围, 该函数返回一个空串.

本函数所返回的大写金额不会出现"零角零分"之类多余的字符,非常适合财务报表打印的需要.

希望这个小工具会对您有所帮助

我的竹叶:  http://pbheaven.yeah.net