FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour Reportfrom xbrowse
Posts: 3107
Joined: Fri Oct 07, 2005 06:28 PM
Reportfrom xbrowse
Posted: Fri Mar 13, 2009 12:33 PM

I made
oGrid:Report( "Elenco Prezzi ", .t., .t., )
where oGrid is the xbrowse

can I make group from here or i must create a new function with Report commands ?

Best Regards, Saludos



Falconi Silvio
Posts: 3107
Joined: Fri Oct 07, 2005 06:28 PM
Re: Reportfrom xbrowse
Posted: Fri Mar 13, 2009 01:05 PM

Now I made

oApp:oGrid:Report( "Elenco Prezzi ", , , { |oRep, oBrw, oFont| MySetUp( oRep, oBrw, @oPrnFont ) } )

...
static function MySetUp( oRep, oBrw, oFont )

DEFINE FONT oFont NAME 'ARIAL NARROW' SIZE 0,-9 OF oRep:oDevice
oRep:aFont[ 1 ] := oFont
GROUP ON (oDPrice)->DATA_INI
COLUMN DATA (oDPrice)->Voce,(oDPrice)->Fila,' ';
TITLE 'Descrizione/fila','','' SIZE 20
COLUMN DATA (oDprice)->Prezz_gior,' ';
TITLE 'Giornaliero','','' SIZE 20
COLUMN DATA (oDprice)->Prezz_sett,' ';
TITLE 'Settimanale','','' SIZE 20
COLUMN DATA (oDprice)->Prezz_qui,' ';
TITLE 'Quindi giorni','','' SIZE 20
COLUMN DATA (oDprice)->Prezz_peri,' ';
TITLE 'Tutto il periodo','','' SIZE 20
return .t.

I winsh a report this

May
xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx

Jun
xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx

Lug
xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx

Ago
xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx

Ho wI can make it
I have two date field DATA_INI and DATA_ FIN

Best Regards, Saludos



Falconi Silvio

Continue the discussion