Oracle - Abrir archivo Excel desde Oracle

 
Vista:

Abrir archivo Excel desde Oracle

Publicado por Jose Manuel (2 intervenciones) el 07/01/2002 20:04:44
Necesito abrir una hoja excel existente con el comando 'Open' pero no se cual es la línea de código a escribir correcta. Hasta ahora lo único que puedo hacer es abrir una excel con Workbooks nuevos y Worksheets nuevos, sin embargo quiero abrir uno ya existente en el disco manteniendo mediante objetos OLE2.

Muchas gracias.

NOTA: Aqui abajo os enseño el código que uso para abrir una excel con workbooks y worksheets nuevos (en blanco).

---------ABRIR EL EXCEL--------------------------------
xlApp := OLE2.CREATE_OBJ
( 'Excel.Application' );
xlBooks := OLE2.GET_OBJ_PROPERTY(xlApp,'Workbooks');
xlBook := OLE2.GET_OBJ_PROPERTY( xlBooks,'Add' );
xlSheets :=OLE2.GET_OBJ_PROPERTY(xlBook,'Worksheets' );
xlSheet := OLE2.GET_OBJ_PROPERTY( xlSheets,'Add' );
OLE2.SET_PROPERTY( xlApp,'Visible',-1 );
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:Abrir archivo Excel desde Oracle

Publicado por Yenny (11 intervenciones) el 08/01/2002 21:15:22
Hola, yo habro hojas de excel atraves del siguiente codigo, espero te sirva.
PROCEDURE excel IS
archivo varchar2(50) := 'C:\misdoc\bolmen.XLS';
channel pls_integer;
channel2 pls_integer;
app_id pls_integer;
linea number;
nullterm varchar2(1) := chr(0);
cur_block varchar2(32);
cur_no number;
cur_item varchar2(32);
nombre varchar2(155);
frst_item varchar2(255);
BEGIN
go_block('Vol');
default_value('*NDY*','GLOBAL.APP_ID');
app_id := dde.app_begin('excel.exe',DDE.APP_MODE_MAXIMIZED);
channel := dde.initiate('Excel','System');
DDE.Execute(channel,'[open("'||archivo||'")]',35000);
channel2 := dde.Initiate('Excel',archivo);
--envia datos fijos
nombre:=mes;
DDE.Poke(Channel2,:cero.FORMATO||'4C1','BOLETIN DEL MES DE ',DDE.CF_TEXT,35000);
DDE.Poke(Channel2,:cero.FORMATO||'4C2',nombre,DDE.CF_TEXT,35000);
nombre:=to_char(:fecha_fin,'yyyy');
DDE.Poke(Channel2,:cero.FORMATO||'4C3','AÑO',DDE.CF_TEXT,35000);
DDE.Poke(Channel2,:cero.FORMATO||'4C4',nombre,DDE.CF_TEXT,35000);
nombre:=get_item_property('montoa1',PROMPT_TEXT);
DDE.Poke(Channel2,:cero.FORMATO||'43C25',nombre,DDE.CF_TEXT,35000);
nombre:=get_item_property('montoa2',PROMPT_TEXT);
DDE.Poke(Channel2,:cero.FORMATO||'43C26',nombre,DD
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:Abrir archivo Excel desde Oracle

Publicado por Robinson Edinson García Patiño (4 intervenciones) el 20/12/2010 17:34:56
Buenos días Yenny muchas gracias por el código creo que es de mucha utilidad

Si tu puedes colaborarme el caso mio es el siguiente: debo hacer una forma en oracle que me permita leer automaticamente un archivo desde un cd dvd etc.. de excel que tiene 5 hojas, luego grabar cada hoja en formato .txt con separador para los campos de ;(punto y coma) una vez realizada esta tarea en cada hoja se deben subir cada uno de los campos a unas tablas de oracle, lo de la inserción a las tablas de oracle ya lo tengo el problema es como leo automaticamente, como hago el path para leerlo y luego convertirlo a .txt

Muchas Gracias por lo que puedas hacer al respecto

Cordial Saludo

REGP
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:Abrir archivo Excel desde Oracle

Publicado por Henry Guerrero (1 intervención) el 05/02/2014 14:33:31
Buenos dia,

Mucha bendiciones de Cristo, por compartir tus experiencias.

Quisiera por favor, me detalle un poquito mas sobre los valores fijos que tiene en el procedimiento que envia
por ejemplo el nombre, :cero.formato, monto1 y monto2, prompt_text y el mes si es (01 o enero).

por favor.

Gracias.
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