Power Builder - Importar datos de excel a power

 
Vista:

Importar datos de excel a power

Publicado por zamudio moreno (17 intervenciones) el 13/04/2007 21:49:24
Hola a todos buenas tardes primera mente bueno muchachos y muchachas del foro mi pregunta es la siguiente:

tengo un programa que me bota reportes a excel y bueno yo quisiera que esos reportes de excel llevarlos a un dw a powewr builder y manejarlos ahi, no se si me puedan ayudar gracias.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Importar datos de excel a power

Publicado por Guillermo (68 intervenciones) el 13/04/2007 21:53:52
Podes ver en la ayuda de Power Builder el comando "ImportFile method (DataWindows)", ahi tenes tambien ejemplos de como importar archivos.

Saludos,

Guillermo
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Importar datos de excel a power

Publicado por Jorge (900 intervenciones) el 13/04/2007 22:50:35
Hola
Te propongo este scrip.
En este caso tambien te copio para que tengas idea

Se toma Un Excel, de lo modifica, se graba otrro
y a ese es importado por la dw

Debes tener en tu dw, los mismos campos que
imnportaras de el xls.




// Importar de Excel a Una Dw
OLEObject excel
Integer li_RetValue, li_rtn
Boolean lb_sheet_rtn
Boolean lb_exist , lb_exist_base
Long ll_cnt
Long li_rc , ll_rc
String ls_path_excel
String ls_new_excel

// Genero en Base al ExCel de Air uno Nuevo
ls_new_excel = Ruta+"\Promos\Lista.xls"
ls_path_excel = Ruta+"\Promos\Base.xls"

lb_exist_base = FileExists(ls_path_excel)

If lb_exist_base = False Then
MessageBox("Importación","" + "No se encuentra la Base : " + ls_path_excel)
else

// Chek de Existencia para Borrarlo
lb_exist = FileExists(ls_new_excel)
IF lb_exist Then FileDelete(ls_new_excel)

st_1.Text ="Creando Conección a Excel"

// Crear Objeto
Excel = create OLEObject

//Conectar a Excel
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


//Abrir excel
excel.WorkBooks.Open( ls_path_excel )
excel.Application.Visible = False
excel.windowstate = 2 // Estados 1 : Normal, 2 : Minimize, 3 : Maximize
//Seleccionar un rango y eliminarlo
st_1.Text ="Creando Nuevo Excel"
lb_sheet_rtn = excel.worksheets(1).Activate
excel.Worksheets(1).Range("A1:N10").Delete
excel.application.workbooks(1).saveas(ls_new_excel,-4143)
//Seleccionar todo lo activo y copiarlo al CLip
excel.ActiveCell.CurrentRegion.Select()
excel.Selection.Copy()
st_1.Text ="Importando Excel"
//Importar desde el Clipboard
ll_rc = dw_articulos.ImportClipBoard (1)
ClipBoard('')
excel.Application.Quit
excel.disconnectobject()
DESTROY excel

Saludos desde Argentina
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Importar datos de excel a power

Publicado por Jorge (900 intervenciones) el 13/04/2007 22:53:08
Plis

Deseo aclarles que la funcion ImporFile()
es solo para

Text!
CSV!
XML!
DBase2!
DBase3!

Saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Importar datos de excel a power

Publicado por marce (1 intervención) el 20/02/2014 23:45:03
Hola vieras que tengo una duda con el código es que soy nueva en power builder, estoy aprendiendo.

Mira cuando importas desde el clipboard creo que le pasas lo que tiene el datawindows, pero ahí me da un error porque yo pongo midatawindows.importclipboard(1) pero no se como hago para que me reconozca midatawindows creado...

Podrías ayudarme, por fa!!
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Importar datos de excel a power

Publicado por Narayana (1 intervención) el 14/09/2011 20:52:38
puedes utilizar la funcion ImportFile dentro del DW la sitaxis seria algo asi:

dw_ejemplo.importfile(ruta_del_archivo)
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar