error en preview usando clase mreport y pdreport

[artu01]

Amigos he actualizado de fw5 + harbour compiler alpha build 45.0 a fwh8.11 + xharbour compiler 1.1.0
el problema me da en los listados, me sale error al presionar el boton de excel en el preview
Error DBCMD/2001 Workarea not in use: DBGOTOP
mi codigo fuente es el sgte:

Code: Select all  Expand view

    LOCAL oFont1, oFont2

     DEFINE FONT oFont1 NAME "ARIAL" SIZE 0,-10
     DEFINE FONT oFont2 NAME "ARIAL" SIZE 0,-10 BOLD

     USE TEST INDEX TEST NEW

     REPORT oReport TITLE  "*** Mi Primer Reporte ***"  ;
          FONT oFont1, oFont2 ;
          PREVIEW

     oReport:bPreInit:= { || DbGoTop() }

     COLUMN TITLE "St"         DATA Test->State

     COLUMN TITLE "Nombre", "Apellido" ;
            DATA  Test->First, Test->Last

     COLUMN TITLE "Direccion", "Ciudad"  ;
            DATA  Test->Street, Test->City

     COLUMN TITLE "   Salario"  ;
            DATA  Test->Salary ;
            TOTAL              ;
            RIGHT              ;
            PICTURE "9,999,999";
            FONT 2             ;
            SIZE 9


     GROUP ON Test->State ;
           FOOTER "Total del Estado "+oReport:aGroups[1]:cValue+ ;
                  " ("+ltrim(str(oReport:aGroups[1]:nCounter))+")" ;
           FONT 2 ;
           EJECT

     END REPORT

     ACTIVATE REPORT oReport ;
      FOR STATE>"GG"

     CLOSE TEST

     oFont1:End()
     oFont2:End()
 

Estoy compilando las clases:
mreport.PRG \
pdreport.PRG \
rpreview.PRG \
tsalxls.PRG \
tfilexls.PRG \
xlserror.PRG \
xlsfunc.PRG \
rpreview.PRG

Pienso que el error es que no ubica el alias, imprimi un msje en la clase tsalxls del alias activo y me sale en blanco
Sera que las clases estan desactualizados para esta version de fwh y xharbour

[Daniel Garcia-Gil]

Saludos

intenta usar

test->( DbGotop() )

[FranciscoA]

Hola Artu01, Daniel. Disculpen que aproveche la ocasión.
Artu01, veo que usas los componentes de la librería RepExel. Yo la he usado siempre sin problemas mayores. El único inconveniente es que en los reportes no sale centrado el FOOTER final de la hoja. ¿Has tenido este inconveniente? ¿Lo has resuelto?.
Saludos.

[artu01]

Daniel este error de alias se produce cuando llamo a esta rutina desde otra rutina, si solamente llamo a esta rutina por si sola
no da errror.

Francisco no me habia fijado de la alineacion siempre los footers los tiro a la izquierda
este problema viene de report creo yo, lo unico es aumentarle n spacios en blanco hasta acomodarlo
a tu gusto.
tengo otra preg, has intentado exportar a excel con quiebre de pags y que repita en cada hoja el encabezado
similar al preview.

[FranciscoA]

Artu01, gracias por contestar. Efectivamente así lo vengo haciendo (space(xx) hasta centrar).
Como decía, utilizo la lib RepExcel para mis reportes en Excel, y en verdad no he tratado de presentarlos con quiebre de páginas.
Voy a hacer pruebas, y ver si puedo modificar las clases componentes de RepExcel.
Saludos.

[RenOmaS]

experimenta esto

Code: Select all  Expand view

    ACTIVATE REPORT oReport ;
      FOR STATE>"GG" ;
      ON POSTEND ( ( Test )->( DbClose() ) )
   
    // CLOSE TEST