I found it very useful to use the CVSCOLUMN under a TEXTGRIDSSS. I am using this under Natpages from a Natural program.
The advantages are that I can define grids dynamically in my program and change the layouts depending on what my needs are. I can therefore reuse one grid definition many times. A great time saver.
However, when I click the sort icon on the header, I get the following error.
java.lang.Error: Error accessing object of class com.softwareag.cis.adapter.ndo.NDOTEXTGRIDCollection$NDOCSVItem with accessPath
Is the problem that with dynamic grids one cannot sort the column data?
It is versoin NJX123. I am not sure if I am setting up the columns correctly in my Natural program though. Below is a snippet of code from the program. I am not sure about DYNSORTTITLEPROP. Apology - the indentation in the program seems to be lost when posting here.
READ DCSE-ENFORCEMENT BY SP-PERSON-DAT9-REMEDY
STARTING FROM #SP-PERSON-DAT9-REMEDY.SP-PERSON-DAT9-REMEDY
IF DCSE-ENFORCEMENT.ID-PERSON NE DCSE-CASE.ID-PERSON-NCP
ESCAPE BOTTOM
END-IF
ADD 1 TO #READ-COUNT
INCLUDE QFCC0020 ‘235’ ‘DCSE-ENFORCEMENT.CD-ENF-REMEDY’ ‘FIELD1’
INCLUDE QFCC0020 ‘234’ ‘DCSE-ENFORCEMENT.CD-STAT’ ‘FIELD2’
COMPRESS
FIELD1 ‘;’
FIELD2 ‘;’
DCSE-ENFORCEMENT.DATE-BEG ‘;’
DCSE-ENFORCEMENT.DATE-END ‘;’
DCSE-ENFORCEMENT.ID-CASE
INTO DYNGRID.DYNGRIDVALUES (#READ-COUNT)
END-READ
IF #READ-COUNT > 0
MOVE ‘Enforcement’ TO FOLDEDNAMEPROP
MOVE TRUE TO FOLDEDVISIBLEPROP
MOVE FALSE TO FOLDEDPROP
MOVE ‘Remedy;Status;“Beg Date”;“End Date”;Case’ TO DYNGRIDTITLES
MOVE ‘250;250;70;70;100’ TO DYNGRIDWIDTHS
MOVE ‘;;;;’ TO DYNPROPREFPROP MOVE ‘;;;;’ TO DYNTITLESORTPROP
MOVE ‘left;left;left;left;left’ TO DYNALIGNSPROP
REDUCE ARRAY DYNGRID TO (1:#READ-COUNT)
END-IF