>For I = 1 to FCOUNT() > lcField = forceext(ALIAS(), FIELD(m.I)) > If not EMPTY(eval(m.lcField)) > .... > Endif >EndFor >Interesting. I wouldn't have thought of using force extension to make the field the extension of the alias. How about this:
m.lcAlias = ALIAS() + "."
For I = 1 to FCOUNT()
If not EMPTY(eval(m.lcAlias + FIELD(m.I)))
....
Endif
EndFor