请问：在报表里，我想报表自动计算一个小于999999.99数字，把它每一位都变成汉字大写存入一个8个的数组里
如：输入123456.78 存入数组A(8) ，A(1)=壹、A(2)=贰。。。。A(8)=捌
如：输入12345.67 存入数组A(8)，A(1)=币、A(2)=壹。。。。A(8)=柒
如：输入1234.56 存入数组A(8)，A(1)=' '、A(2)=币、A(4)=壹、A(8)=陆
请各位狐友告诉我在报表里怎么实现以上程序

写一个程序,是转换大写的,在运行报表时用set proc to js(程序名),在报表内用变量储存要转换的值,如js(aa),就可以了.