Error on Report Group

[Silvio.Falconi]

Today I made a report Group and I'm seeing there is an error when I use group and graphic mode



I use a simply command for the group

GROUP ON Upper(TA->USCITA) ;
HEADER "Tipo di Uscita: " + TA->USCITA);
FOOTER "Totale voci "+(alltrim(::oReport:aGroups[1]:cValue))+ ;
" ("+ltrim(str(::oReport:aGroups[1]:nCounter))+")" ;
FONT 2



Possible none saw it in these years ? (I have a oldest fwh release)
How I can resolve it

[Silvio.Falconi]

Any help?

I think there's an error on METHOD Footer( nRow ) CLASS TRGroup

but I not Know how resolved it

[Silvio.Falconi]

Please try this sample




test.dbf is that you found on .\samples\report\

Code: Select all  Expand view  RUN

#include "FiveWin.ch"
#include "report.ch"

STATIC oReport

Function Rep12()

     LOCAL oFont1, oFont2

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

     USE TEST NEW
      index on state tag state to test


     REPORT oReport TITLE  "*** Fivewin Report ***"      ,;
                           "States begining with an A"   ,;
                           "and Salary greater than 1000" ;
          FONT oFont1, oFont2 ;
          PREVIEW

     COLUMN TITLE "St"         DATA Test->State

     COLUMN TITLE "First Name", "Last Name" ;
            DATA  Test->First, Test->Last

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

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

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


     END REPORT

     oReport:CellView()

     ACTIVATE REPORT oReport                 ;
          WHILE Test->State = "A"            ;
          FOR Test->Salary > 1000            ;
          ON STARTGROUP oReport:NewLine()    ;
          ON END MessageBeep()

     CLOSE TEST

     oFont1:Release()
     oFont2:Release()

RETURN NIL

[Silvio.Falconi]

Someone sad me to purchase the new release of Fwh Hoping to resolve this problem
but also with fwh 14.09 there is this problem
Someone can hep me pls ?

[Biel EA6DD]

FWH 14.12

[Silvio.Falconi]

Biel good but perhaps there is also another peoblem at "TOTAL OF STATE" if you see there are some vertical lines are not on the bottom prrhaps becsuse thrre is the text of the subgroup. I think the best solution is that to divide a group from another but i not tried it also