自定义一个变量如下: ( {@TotalWithTax} 是要显示成人民币大写金额的变量 )
________________________________________________
Global StringVar Array PreDotUnit;
Global StringVar Array ChineseDollar;
Global StringVar Array ResultPreDot;
Global StringVar Array ResultAftDot;
Global StringVar number := ToText(ToNumber({@TotalWithTax}));
// Kill thousand mark
number := Replace (number, ",", "");
ChineseDollar := ["零","壹","貳","叁","肆","伍","陸","柒","捌","玖"];
PreDotUnit := ["元","拾","佰","仟","萬","拾","佰","仟","億",&