一个可靠的小写金额转大写函数

这里提供一个我行已使用了近5年的小写金额转大写函数,供同行参考。该函数具有转换金额范围宽、简练可靠等特点。有些税务、邮电等单位使用的打印发票、清单系统的大写金额就不够规范,如把2,001.00元简单转换为“贰仟零佰零拾壹元零角零分”。本模块则可以很规范地完成转换。调用格式为:“xt(小写金额)”。所用程序在FOXBASE2.0以上,FOXPRO、VFP各版本均已通过。