how to make open office/libre office excel document on linux with oracle forms [message #627978] |
Tue, 18 November 2014 08:46 ![Go to next message Go to next message](/forum/theme/orafaq/images/down.png) |
mustundag
Messages: 2 Registered: September 2009 Location: istanbul
|
Junior Member |
![muhittin28%40yahoo.com](/forum/theme/orafaq/images/yahoo.png) ![mustundag](/forum/theme/orafaq/images/twitter.png)
|
|
Hi,
our clients are using Oracle Forms to create excel files with ole2.
in linux platform that we want to use, there is libre office.
how to make this code avaible in linux libre office?
PROCEDURE EXCEL_DOSYA2 IS
application CLIENT_OLE2.obj_type;
workbooks CLIENT_OLE2.obj_type;
workbook CLIENT_OLE2.obj_type;
worksheets CLIENT_OLE2.obj_type;
worksheet CLIENT_OLE2.obj_type;
cell CLIENT_OLE2.obj_type;
args CLIENT_OLE2.list_type;
borders CLIENT_OLE2.obj_type;
rango CLIENT_OLE2.obj_type;
font CLIENT_OLE2.obj_type;
rowcount INTEGER;
.....
BEGIN
application := CLIENT_OLE2.create_obj('Excel.Application');
CLIENT_OLE2.set_property(application,'Visible','True');
workbooks := CLIENT_OLE2.get_obj_property(application,'Workbooks');
workbook := CLIENT_OLE2.invoke_obj(workbooks,'Add');
worksheets := CLIENT_OLE2.get_obj_property(workbook,'Worksheets');
worksheet := CLIENT_OLE2.invoke_obj(worksheets,'Add');
rowcount := 0;
rowcount :=rowcount+1;
args := CLIENT_OLE2.create_arglist;
CLIENT_OLE2.add_arg(args,rowcount);
CLIENT_OLE2.add_arg(args,1);
....
CLIENT_OLE2.release_obj(worksheet);
CLIENT_OLE2.release_obj(worksheets);
CLIENT_OLE2.release_obj(workbook);
CLIENT_OLE2.release_obj(workbooks);
CLIENT_OLE2.release_obj(application);
|
|
|
|