FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour error en preview usando clase mreport y pdreport
Posts: 400
Joined: Fri May 11, 2007 08:20 PM
error en preview usando clase mreport y pdreport
Posted: Mon Dec 13, 2010 07:23 PM
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 (fw): Select all Collapse
     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
fwh 17.12, harbour 3.2.0, pelles C, bcc7, Ms-Sql
Posts: 2365
Joined: Wed Nov 02, 2005 11:46 PM
Re: error en preview usando clase mreport y pdreport
Posted: Mon Dec 13, 2010 07:34 PM

Saludos

intenta usar

test->( DbGotop() )

Posts: 2170
Joined: Fri Jul 18, 2008 01:24 AM
Re: error en preview usando clase mreport y pdreport
Posted: Tue Dec 14, 2010 02:41 PM

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.

Francisco J. Alegría P.

Chinandega, Nicaragua.



Fwxh-MySql-TMySql
Posts: 400
Joined: Fri May 11, 2007 08:20 PM
Re: error en preview usando clase mreport y pdreport
Posted: Tue Dec 14, 2010 08:34 PM

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.

fwh 17.12, harbour 3.2.0, pelles C, bcc7, Ms-Sql
Posts: 2170
Joined: Fri Jul 18, 2008 01:24 AM
Re: error en preview usando clase mreport y pdreport
Posted: Wed Dec 15, 2010 01:23 AM

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.

Francisco J. Alegría P.

Chinandega, Nicaragua.



Fwxh-MySql-TMySql
Posts: 205
Joined: Fri Oct 07, 2005 05:07 PM
Re: error en preview usando clase mreport y pdreport
Posted: Wed Dec 15, 2010 10:57 AM
experimenta esto

Code (fw): Select all Collapse
    ACTIVATE REPORT oReport ;
      FOR STATE>"GG" ;
      ON POSTEND ( ( Test )->( DbClose() ) )
    
    // CLOSE TEST
Saludos/regards

RenOmaS



skype: americo.balboa

Continue the discussion