Power Builder - Guardar datos del excel al datawindow

Hola a todos y pues nuevamente realizando preguntas..en este caso les agradezco por anticipado por sus posibles respuestas....bueno la pregunta es la siguiente...como hago para realizar el traslado de datos que estan en el excel a un datawindow..es posible realizar ello..bueno espero que me contesten un saludo a todos desde Puerto Maldonado-Madre de Dios Perú.....

Hola

Debes tener la dw que recibira los datos exactamente igual que
el excel que importaras es decir las mismas columnas.

OLEObject excel
Integer li_RetValue, li_rtn
Boolean lb_sheet_rtn
Long ll_cnt

excel = create OLEObject

li_rtn = excel.ConnectToNewObject("excel.application")
IF li_rtn <> 0 THEN
MessageBox('Excel error','No puede conectarse a Excel')
DESTROY excel
RETURN 0
END IF

excel.WorkBooks.Open( "c:miarchivo.xls" )
excel.Application.Visible = false
excel.windowstate = 2 // 1 : Normal, 2 : Minimize, 3 : Maximize

// Si se desea asignarle un Nombre -- excel.Worksheets( 'Gastos' )
lb_sheet_rtn = excel.worksheets(2).Activate
excel.Worksheets(2).Range("A1:E5000").Copy // copiar al clipboard

//Copiar desde la segunda fila de Excel

ll_cnt = dw_1.importclipboard(2)
IF ll_cnt <= 1 THEN
Messagebox("Info", "No se encontró")
END IF

excel.Worksheets(2).Range("A10000:A10000").Copy //reset clipboard
excel.Application.Quit
excel.DisConnectObject()
DESTROY excel

Saludos

hola cheka mi blog alli deje un peqeuño ejemplo decomo enviar del excel a un dw saludos