>loCountries = NewObject('SqlTable','SQL.vcx')>
***================================== DEFINE CLASS yourClass AS Custom ***================================== ** Which would include this method as a member *************************** FUNCTION WhatVarAmIKnownAs *************************** LOCAL i, lcRet, loi LOCAL ARRAY aI[1] * lcRet = "" * AINSTANCE(aI, This.Class) * FOR i = 1 TO ALEN(aI) loi = EVALUATE("m." + aI[m.i]) IF m.loi = This lcRet = aI[m.i] EXIT ENDIF ENDFOR RETURN (m.lcRet) ENDDEFINE