ActiveX - OCX Crystal 9 en Progress.

Hola amigos, tengo un pequeño problema.
Mi plataforma de desarrollo es Progress y para realizar reportes lo hago con Crystal Reports, la versión de Crystal que siempre he utilizado es la 7, ahora al actualizar a la versión 9 del Crystal, tengo algunos problemas porque la forma de manejar el OCX ya no es el mismo.

Anteriormente tenia que crear un contenedor en la ventana para el OCX y dentro de ese contenedor mostrar el reporte, y se configuraba todo a través de código.

Mi problema es que el OCX del Crystal 9, no me acepta el mismo esquema..

alguien sabe como manejar los OCX de Crystal 9..

muchisimas gracias..

El siguiente codigo te permite utilizar el ocx

DEFINE VARIABLE cryaply28 AS COM-HANDLE NO-UNDO.
DEFINE VARIABLE cryrepor28 AS COM-HANDLE NO-UNDO.

CREATE "CrystalRuntime.Application" cryaply28.
CREATE "CrystalRuntime.Report" cryrepor28.
/*

ASSIGN
xfec = ((chCtrlFrame-2:DTPicker:VALUE))
*/

/* Set the report object */
ASSIGN
xfecini = ((chCtrlFrame-2:DTPicker:VALUE))
xfecfin = ((chCtrlFrame-3:DTPicker:VALUE))

cryrepor28 = cryaply28:OpenReport("C:/RegistroAsis/FteAsi/lisasipar.rpt").

/* cryrepor28:ParameterFields:ITEM(1):AddCurrentValue(xreg1).*/
cryrepor28:ParameterFields:ITEM(1):AddCurrentValue(xfecini).
cryrepor28:ParameterFields:ITEM(2):AddCurrentValue(xfecfin).



cryrepor28:VerifyOnEveryPrint = TRUE.

cryaply28:LogOnServer("pdsodbc.dll",
"nombre del odbc",
"",
"usuario de base de adatos",
"contraseña").

/* Enables the CRViewer's Navigation Controls */
chCtrlFrame:CRViewer9:EnableNavigationControls = TRUE.

/* Enables the CRViewer's Export button */
chCtrlFrame:CRViewer9:EnableExportButton = TRUE.

/* Disables the CRViewer's Search control */
chCtrlFrame:CRViewer9:EnableSearchControl = TRUE.

/* Set the report source */
chCtrlFrame:CRViewer9:ReportSource = cryrepor28.

/* View the report */
chCtrlFrame:CRViewer9:ViewReport().

RELEASE OBJECT cryaply28.
RELEASE OBJECT cryrepor28.