Popups and Sorting (OpenInsight 16-Bit Specific)
At 16 SEP 2002 03:42:54PM a becker wrote:
I have a column that contains the FY. I want to either display or have the user double click this column so that FY 03 will be displayed before FY 02, FY 04 before fy 03, etc.
Is there any way to do this via the popup?
At 17 SEP 2002 05:46AM Colin Rule wrote:
See POPUP_EQUATES, which has:
EQU PSORT$ to 24 ;* bool: allow column sorting
This allows ascending sortation, but you example was descending.
This allows you to click on the heading and sort.
To get it in descending order, you would have to pass the data in descending order in the first place.
Colin
At 17 SEP 2002 01:25PM a becker wrote:
Thanks Colin
At 17 SEP 2002 06:28PM James Birnie wrote:
Hi Andy
You should have the source code for the SYSPROG*POPUP routine if you wanted to check/change the sort logic (you would want to create a new routine based on the existing popup incase it gets overwritten by future updates)
Once sorting flag is set to TRUE$ as Colin mentioned, popups currently sort depending on the column justification. Double-click on column heading sorts ascending, shift-doubleclick will return descending data.
At 17 SEP 2002 09:37PM Richard Hunt wrote:
If this is about making a "POPUP" sort in assending or descending order, then you might want to try this "tweak"…
Within the table "SYSPROCS" row "POPUP" make this modification to the "double-click event for EDITTABLE" internal subroutine.
IF POPUP_STRUCT@ _EQC "R" THEN
SORT=2
END ELSE
SORT=0
END
IF BITAND(GETASYNCKEYSTATE(16),32768) ELSE
SORT += 1
END
PS_SET_PROPERTY(@WINDOW:ET_POPUP$,"SORTEDCOL",COL:$FM:SORT)
This will allow the user to sort in assending or descending order. Just by double clicking a column it will sort that column by an assending order. When the user holds the shift key down and double clicks a column, it will sort that column by a descending order.
* NOTE: When you do this modification, you are changing a proprietary program of Revelation Technologies, Inc. And, any future updates could overwrite the changes you have made to this program.
One more thing, I also allow a "ctrl" key option to enable to user to override 'number' or 'alpha' sort justification. I use these options in my own edit tables.