Alexander,
You can pass a classname to PEMStatus(,,4) to see if the method is overridden at the class level. You can traverse the inheritance hierarchy at runtime you'll need to use the GetPEM().
ox = createobject( "leveltwo" )
? ox.ParentClass && levelone
? getpem( ox.ParentClass, "ParentClass" ) && container
? pemstatus( getpem( ox.ParentClass, "ParentClass" ), "methodname", 4 )
>>try PEMSTATUS(oObjectName , cMethod, 6)
>
>No, that won't help: I'm not interested, if the method is inherited or not, I'm interested, if the method of the object contains some "own" code not defined in the same method of the object's class.