> If PemStatus(This, lcCheckProp, 5)
> lcProperty = 'This.' + lcProperty
> luReturn = &lcProperty
> Else
> If Type('This.Parent') == T_OBJECT
> luReturn = This.Parent.muGetValue(lcProperty)
> Else
> luReturn = NULL
> EndIf
> EndIf

Since your oChild is the same class as the oParent your code is always reading the property from oChild in the code above.