>>The code does not convert correctly numbers over 100 ending on 11, 12 and 13.
>>See http://www.berezniker.com/content/pages/visual-foxpro/ordinal-numbers
>
>Thanks for the code!
>
>To make this a 'freestanding' function in a VFP7 .PRG, I added a PARAmeters statement.
>
>Also enhanced the RETURN like so: TRANSFORM(tiNumber) + lcOrdinalNumber -- makes the calling code cleaner.

Hi Randy,

Thanks for your comments. I implemented all of them. Please check updated version.