>O= CREATEOBJECT([myclass])
>   WITH m.o.mytableproperty
>     FOR iProp=1 to AMEMBERS(aProperties,.mytableproperty)
>       ? EVAL("."+aProperties[m.iProp])
>     ENDFOR
>   ENDWITH
>
>