>loParent = THIS >llGotParent = .F. > >DO WHILE .T. > IF TYPE("loParent.PARENT") = "O" > loParent = loParent.PARENT > llGotParent = .T. > ELSE > *-- Top most parent > EXIT > ENDIF >ENDDO > >IF llGotParent > ?loParent.NAME >ENDIF >This is what I was looking for.