xbrowse report group

[Silvio.Falconi]

to select the group I give the way that the end user can select the group (ngroup ) from an array aGroup on which to print and groups

Before printing I have to index on the selected group

if an archive (odbf) is online I do it normally

Code: Select all  Expand view

oDbf:setorder(nGroup)
        oDbf:gotop()
        oBrw:oDbf:SetOrder(nGroup)

 

but if I have an array how can I sort?

I assume that the oBrw is open in autosort and I create the agroup array and field array doing it this way

Code: Select all  Expand view

 AEval(  oBrw:aCols, { |o| If( o:lHide .or. Empty( o:cSortOrder ),, AAdd( aGroup, o:cCbxItem ) ) } )
   AEval(  oBrw:aCols, { |o| If( o:lHide .or. Empty( o:cSortOrder ),, AAdd( acampi, o:cExpr ) ) } )