Xailer & OZ Software

Entendido y gracias por la respuesta del post del dí­a 28/04/2012!
Pregunto de nuevo José, necesito instanciar otras clases.
Hacerlo como en el New() de mas abajo serí­a correcto? tengo que poner oParent o puede faltar?
Muchas gracias.
#include "Xailer.ch"
//---------------------------------------------------------- --------------------
CLASS Entidadesturno From TComponent
METHOD DevolverPorID( ID )
METHOD Actualizar()
METHOD Agregar()
METHOD Eliminar()
METHOD CargarTipo(identidadturno)
PROPERTY identidadturno INIT 0
PROPERTY idpersonajsucursal INIT 0
PROPERTY codigo INIT ""
PROPERTY descripcion INIT ""

DATA oProfesionalentidad INIT NIL
METHOD New(oParent)
ENDCLASS
//---------------------------------------------------------- --------------------
METHOD New(oParent) CLASS Entidadesturno
::oProfesionalentidad := Profesionalentidad():New( Self )
::identidadturno := 0
::idpersonajsucursal := 0
::codigo := ''
::descripcion := ''
RETURN Self
//---------------------------------------------------------- --------------------
--