Report collapsible

[Iris Gesser]

Dear community,

is it possible to create a report, that is collapsible?

********************************************************************************************
REPORT oReport TITLE " ",cTITLE, dtoc(anfang) + " - " + dtoc(ende) LEFT ;
FONT oFont1,oFont2,oFont3 ;
PEN oPen1;
HEADER Setup():LizenzNehmer()," ", ALLTRIM("Erstellt: " + dtoc(date())+ " - "+time()) RIGHT;
FOOTER ("Page: ")+str(oReport:nPage,3) ;
CENTERED ;
PREVIEW

COLUMN TITLE "RG-Nr" DATA ktosumme->DATUM FONT 2 SIZE(8)

COLUMN TITLE "Konto" DATA ktosumme->konto FONT 1 SIZE(6)
COLUMN TITLE "Bezeichnung" ,"Warengruppen" DATA ktosumme->bezeichnun SIZE(20)

COLUMN TITLE "Umsatzsteuer","frei" DATA IIF( ktosumme->mwst=nMwst0,ktosumme->betragohne ,"" ) ;
TOTAL SIZE(8) PICTURE "999,999,999.99"


COLUMN TITLE "Bemessungs-","grundlage", STR(nMwst1)+"%" DATA IIF( ktosumme->mwst=nMwst1,ktosumme->betragohne ,"" ) ;
TOTAL SIZE(8) PICTURE "999,999,999.99"

COLUMN TITLE "MWST " + ALLTRIM(STR(nMwst1))+" %" DATA IIF(ktosumme->mwst1!=0,ktosumme->mwst1 ,"" ) ;
TOTAL SIZE(8) PICTURE "999,999,999.99"


COLUMN TITLE "Bemessungs-","grundlage",STR(nMwst2) + "%" DATA IIF( ktosumme->mwst=nMwst2,ktosumme->betragohne ,"" ) ;
TOTAL SIZE(8) PICTURE "999,999,999.99"
COLUMN TITLE "MWSt " + ALLTRIM(STR(nMwst2))+" %" DATA IIF(ktosumme->mwst2!=0, ktosumme->mwst2 ,"" ) TOTAL SIZE(9) PICTURE "999,999,999.99"

//----------------------------------------------------------------------------//
COLUMN TITLE "##Bemessungs-","grundlage",STR(nMWST3)+"%" DATA IIF( ktosumme->mwst=nMWST3,ktosumme->betragohne ,"" ) ;
TOTAL SIZE(8) PICTURE "999,999,999.99"
COLUMN TITLE "##MWSt " + ALLTRIM(STR(nMWST3))+" %" DATA IIF(ktosumme->mwst3!=0, ktosumme->mwst3 ,"" ) TOTAL SIZE(9) PICTURE "999,999,999.99"
//----------------------------------------------------------------------------//



COLUMN TITLE "Summe", "inkl. MWSt","(Rechnungsjournal)" DATA ktosumme->betraginkl TOTAL SIZE(12) PICTURE "999,999,999.99"

GROUP ON ktosumme->Datum FOOTER "Summe" FONT 2

END REPORT
********************************************************************************************
This is the an example for a report and I would like to have the option to see only the line "GROUP ON ktosumme->Datum FOOTER "Summe" FONT 2" by selecting -/+

Is this possible?

Thank you for your answer.
Kind regards
Iris

[nageswaragunupudi]

Set oReport:lSummary := .t. or .f. before calling ACTIVATE REPORT

[Iris Gesser]

Dear Mr. Rao,

Thank you very much. I will try this as soon as possible (today my PC in the Office broke down...).

Kind regards
Iris