I made function for money number convert to Chinese words

I made function for money number convert to Chinese words

Hi

I'm exciting made the function for money number convert to Chinese words.
I want to say ZC it's powerful so let me share the code and get  your further  help for  optimize  the code  more..

  1. string sz.num2rmb(float je)
  2. {
  3.     vzf = {"0-零", "1-壹", "2-贰", "3-叁", "4-肆", "5-伍", "6-陆", "7-柒", "8-捌", "9-玖"};
  4.     
  5.     vws = "万仟佰拾亿仟佰拾万仟佰拾元角分";   
  6.     
  7.     rdw  =  formqj  [cat == "小写大写"];

  8.     vje = ((input.je  *  100).round(0)).toString();   
  9.    
  10.     vcd = (vje).length();

  11.     vwszf = (vws).subString((15  -  vcd));

  12.     zf2 = (vje).subString(rdw.sz1,(rdw.sz1  +  1));

  13.     for each rzf in vzf
  14.  
  15.     {
  16.         if (rzf.contains(zf2))
  17.         {
  18.             zf = rzf.getSuffix("-");
  19.         }
  20.     }

  21.     rdw.zf1 = rdw.zf1 + zf + (vwszf).subString(rdw.sz2,(rdw.sz2  +  1));

  22.     rdw.zf1 = (rdw.zf1).replaceFirst("零零","零");
  23.     rdw.zf1 = (rdw.zf1).replaceFirst("零亿","亿");
  24.     rdw.zf1 = (rdw.zf1).replaceFirst("亿万","亿");
  25.     rdw.zf1 = (rdw.zf1).replaceFirst("零万","万");
  26.     rdw.zf1 = (rdw.zf1).replaceFirst("零仟","零");
  27.     rdw.zf1 = (rdw.zf1).replaceFirst("零佰","零");
  28.     rdw.zf1 = (rdw.zf1).replaceFirst("零拾","零");
  29.     rdw.zf1 = (rdw.zf1).replaceFirst("零元","元");
  30.     rdw.zf1 = (rdw.zf1).replaceFirst("零角","零");
  31.     rdw.zf1 = (rdw.zf1).replaceFirst("零分","");

  32.     rdw.sz1 = (rdw.sz1  +  1);
  33.     rdw.sz2 = (rdw.sz2  +  1);

  34.     if (rdw.sz1  <  vcd)
  35.     {
  36.         thisapp.sz.num2rmb(input.je);
  37.     }

  38.     if ((rdw.zf1.endsWith("分"))  ||  (rdw.zf1.endsWith("角")))
  39.    
  40.     {
  41.         rdw.zf1 = rdw.zf1 + "";
  42.     }
  43.     else
  44.     {
  45.         rdw.zf1 = rdw.zf1 + "整";
  46.     }

  47.    info rdw.zf1; 
  48.    rdw.sz1 = 0;
  49.     rdw.sz2 = 0;
  50.     vdxx = rdw.zf1; 
  51.     rdw.zf1 = "";  
  52.    return vdxx;
  53.    
  54.    
  55. }
  56.  // code end


Thank you for your consistent help and support!
Stanleyguo
2011-7-5