Power Builder - ayda urgente dato excel

Como hago para pescar un dato desde excel e importar a power builder.

ejemplo en la celda A1 de excel tengo almacenado la fecha. 01/01/2010

solo necesito guardar en una variable que almacene el valor de esta fecha

Prueba con algo como esto a ver si te funciona.

ole1=CREATE OLEObject
li_estatus=ole1.ConnectToNewObject("Excel.Application")

oleChild=CREATE OLEObject
rs=oleChild.SetAutomationPointer(ole1)

If (li_estatus = 0) Then
oleChild.workbooks.Open(as_nom_archivo, linemode!) //Abrir el archivo
oleChild.Sheets.Item(1).Activate //Selecciomar la hoja 1 del archivo, que contiene los valores.

ldt_fecha=Date(oleChild.cells(1, 1).value)
oleChild.Quit()
oleChild.DisConnectObject()
End If
DESTROY oleChild

Prueba con algo como esto a ver si te funciona.

ole1=CREATE OLEObject
li_estatus=ole1.ConnectToNewObject("Excel.Application")

oleChild=CREATE OLEObject
li_estatus=oleChild.SetAutomationPointer(ole1)

If (li_estatus = 0) Then
oleChild.workbooks.Open(as_nom_archivo, linemode!) //Abrir el archivo
oleChild.Sheets.Item(1).Activate //Selecciomar la hoja 1 del archivo, que contiene los valores.

ldt_fecha=Date(oleChild.cells(1, 1).value)
oleChild.Quit()
oleChild.DisConnectObject()
End If
DESTROY oleChild