Consulta sobre la clase RepExcel

Consulta sobre la clase RepExcel

Postby cmsoft » Wed May 27, 2009 3:38 pm

Hola gente del foro:
Quiero hacerles una consulta, para aquellos que utilizan esta clase, para exportar los reportes a Excel.
Tengo un problema, que me surge cuando el reporte generado, se basa en un filtro de una tabla o en un array. El reporte me lo genera correctamente, pero cuando pongo que exporte a Excel, el mismo sale sin ningún registro.
Alguien ha tenido este problema, y por ende, lo ha solucionado?
Agradecido de antemano
User avatar
cmsoft
 
Posts: 1273
Joined: Wed Nov 16, 2005 9:14 pm
Location: Mercedes - Bs As. Argentina

Re: Consulta sobre la clase RepExcel

Postby RenOmaS » Thu May 28, 2009 9:49 pm

Hola
Puedes poner como armas tu reporte
Saludos/regards
RenOmaS

skype: americo.balboa
User avatar
RenOmaS
 
Posts: 205
Joined: Fri Oct 07, 2005 5:07 pm

Re: Consulta sobre la clase RepExcel

Postby cmsoft » Sat May 30, 2009 11:36 pm

Hola RenOmans:
Te paso acá el código que uso para los reportes que no se exportan bien al excel
Code: Select all  Expand view

SELECT movi02
DBSETRELATION("maes04",{|| movi02->legajo }  , "movi02->legajo"   )
DBSETRELATION("codi04",{|| movi02->codigo }  , "movi02->codigo"   )
movi02->(DBSEEK(DTOS(mfecha)))
REPORT oRep TITLE "Inasistencias de dia " + ;
                  DTOC(mfecha) ;
       FONT  oFont1,oFont2,oFont3 ;
       HEADER OemToAnsi(memvar->xnomb_emp) , ;
       "Inasistencias diarias" CENTER ;
       FOOTER "Hoja:" + STR(oRep:npage,3) ,"Fecha:"+DTOC(DATE()) CENTER;
       PREVIEW CAPTION  "Inasistencias diarias"

COLUMN TITLE "Legajo"    DATA movi02->legajo  PICTURE "999999" SIZE 06 FONT 2
COLUMN TITLE "Empleado"  DATA maes04->nombre  SIZE 20 FONT 1
COLUMN TITLE "Codigo"    DATA movi02->codigo  PICTURE "999" SIZE 05 FONT 1
COLUMN TITLE "Tipo"      DATA codi04->nombre  SIZE 20 FONT 2
// Digo que el titulo lo escriba con al letra 2
oRep:oTitle:aFont[1] := {|| 2 }
END REPORT
// Activo el reporte
ACTIVATE REPORT oRep WHILE movi02->fecinasi = mfecha ;
         ON INIT CursorArrow() ;
         ON STARTPAGE oRep:SayBitmap(.1,.1,"LOGO.BMP",1.5,.5)
// Cierro los archivos
CLOSE maes04
CLOSE codi04
CLOSE movi02
 
User avatar
cmsoft
 
Posts: 1273
Joined: Wed Nov 16, 2005 9:14 pm
Location: Mercedes - Bs As. Argentina

Re: Consulta sobre la clase RepExcel

Postby Marcelo Via Giglio » Sun May 31, 2009 12:15 am

Hola,

debes definir oPep:bPreInit := {|| movi02 -> ( DBGOTOP() ) }

antes del ACTIVE REPORT

saludos

Marcelo
Marcelo Via Giglio
 
Posts: 1058
Joined: Fri Oct 07, 2005 3:33 pm
Location: Cochabamba - Bolivia

Re: Consulta sobre la clase RepExcel

Postby cmsoft » Sun May 31, 2009 2:22 pm

Hola Marcelo:
Fantastico, funcionó perfecto. Muchisimas gracias.
User avatar
cmsoft
 
Posts: 1273
Joined: Wed Nov 16, 2005 9:14 pm
Location: Mercedes - Bs As. Argentina


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 44 guests