Crystal Report Formula Convert Amount into Words

 numbervar x := {OINV.DocTotal};

numbervar ipart;

numberVar decpart;

ipart := int(x);

decpart := x - ipart;

Propercase(Replace(towords(ipart)," and xx / 100",""))& " Ringgit" &

if decpart = 0 then "" else " and "&Propercase(Replace(towords(decpart*100)," and xx / 100","")) &" sen";