This is done using stranded code taken from Report-1401-Check.
Modification done mainly to get the Cents value from text. And includes some other formatting options.
Call the function "FormatNoText" with following parameters
"NoText" Text(80) array length of 3 which returns the text.
"No" Amount or the number needs to be converted.
"CurrencyCode" Currency Code if any, if not keep it blank.
"IsUpperCase" if "TRUE" text will return in UPPERCASE, if "FALSE" first letter of each word in UPPERCASE.
"StartStar" if "TRUE", "***" will print at the begin.
"EndStar" if "TRUE", "***" will print at the end.
This funtion use "AddToNoText" & "GetAmtDecimalPosition" local functions.
Complete Code is given bellow