topic Dynamic Sort on table control in Application Development and Automation Discussions

Dynamic Sort on table control

Former Member — Wed, 03 Jan 2007 21:07:19 GMT

Hi friends,

I am having a problem when sorting the table control dynamically based on the fields selectd.

sorting is not working, when you select multiple fields ( one numeric field and one character field ) I have written code for handling multiple field sort,gettting field names correctly, everything looks fine but internal table is not getting sorted.

Is it related unicode issue..?

Any help will be appreciated.

Sample code:

loop at tc_control into lc_cols.

case lc_cols-selected.

wehn 'X'.

split lc_cols-screen-name at '-' into gv_tabname gv_fieldname.

move gv_fieldname gs_struc+lv_off(20)

add 20 to lv_off.

endcase.

endloop.

if ok_code = 'ASCE'.

sort itab by (gs_struc-field1) (gs_struc-field2) ..... ascending

endif.

Thanks in advance

Thiru.p

Re: Dynamic Sort on table control

ferry_lianto — Wed, 03 Jan 2007 21:13:59 GMT

Hi Thiru,

Please check this demo program.

DEMO_DYNPRO_TABCONT_LOOP_AT

Hope this will help.

Regards,

Ferry Lianto

Re: Dynamic Sort on table control

Former Member — Wed, 03 Jan 2007 21:15:13 GMT

Try using an internal table for the field names..

Example

DATA: BEGIN OF ITAB OCCURS 0,

MATNR TYPE MATNR,

WERKS TYPE WERKS_D,

END OF ITAB.

DATA: ITAB_FIELD(30) OCCURS 0 WITH HEADER LINE.

DATA

ITAB-MATNR = 'ABC'.

ITAB-WERKS = 'ABCD'.

APPEND ITAB.

ITAB-MATNR = 'ABC'.

ITAB-WERKS = 'ABC'.

APPEND ITAB.

SORT INTERNAL TABLE

ITAB_FIELD = 'MATNR'.

APPEND ITAB_FIELD.

ITAB_FIELD = 'WERKS'.

APPEND ITAB_FIELD.

SORT ITAB BY (ITAB_FIELD).

LOOP AT ITAB.

WRITE: / ITAB-MATNR,ITAB-WERKS.

ENDLOOP.

Thanks

Naren