Progress - Reportes en Excel

Hola:
Es la primera vez que tengo oportunidad de acceder a esta página. Es interesante contactar programadores en Progress sobretodo en Español.

Coincido con ustedes el report Builder es limitado. ¿Han probado enviar datos a Excel? Es muy sencillo e interesante.
Saludos.

Bienvenida Laura a nuestra comunidad, esperamos contar con tu colaboración de ahora en adelante, recuerda mientras mas personas nos conozcan mucho mejor, así podemos ir formando la comunidad progress en español que todos queremos…

No lo he probado y también, como dices tu, creo que el Report Builder es limitado. Ahora..., me gustaría saber un poquito mas ¿ como es eso de enviar Reportes al Excel ?, ¿ Podés explicarme brevemente con un ejemplo (si es posible) como hacés ?

Saludos !!!

No lo he probado y también, como dices tu, creo que el Report Builder es limitado. Ahora..., me gustaría saber un poquito mas ¿ como es eso de enviar Reportes al Excel ?, ¿ Podés explicarme brevemente con un ejemplo (si es posible) como hacés ?

Saludos !!!

A continuación un pequeño ejemplo para enviar reportes a Excel.

DEFINE VARIABLE chExcelApplication AS COM-HANDLE.
DEFINE VARIABLE chWorkbook AS COM-HANDLE.
DEFINE VARIABLE chWorksheet AS COM-HANDLE.

* IMPRESION A EXCEL */
/* create a new Excel Application object */
CREATE "Excel.Application" chExcelApplication.
chExcelApplication:Visible = TRUE.

/* create a new Workbook */
chWorkbook = chExcelApplication:Workbooks:Add().

/* get the active Worksheet */
chWorkSheet = chExcelApplication:Sheets:Item(1).
chWorkSheet:Name = "Prueba".
chWorkSheet:Visible = 1.

/* Informacíon de prueba*/

chWorksheet:Range("A1"):Value = "FECHA : " + String(Today).
chWorksheet:Range("A2"):Value = "SISTEMA X".
chWorksheet:Range("A4"):Value = "R E P O R T E E S P E C I A L".
chWorkSheet:Range("A4:A4"):Font:Size = 12.

/* Habilitar para imprimir y cerrar Aplicación */
ChWorkBook:ActiveSheet:PrintOut.
ChWorkbook:Close(false,,).
chExcelApplication:Quit NO-ERROR.


/* release com-handles */

RELEASE OBJECT chExcelApplication.
RELEASE OBJECT chWorkbook.
RELEASE OBJECT chWorksheet.

Saludos.