FIELD-SYMBOLS : <f1>,<f> .
DATA: wa TYPE cxtab_column.
DATA: icount TYPE i .
DATA: f1(10) ,f2(10) .
LOOP AT tc_9001-cols INTO wa.
IF wa-selected = 'X' .
ADD 1 TO icount .
SPLIT wa-screen-name AT '-' INTO f1 f2 .
IF okcode = 'USORT' .
SORT t_itab BY (f2) ASCENDING .
ELSE .
SORT t_itab BY (f2) DESCENDING .
ENDIF .
ENDIF.
ENDLOOP .
IF icount = 0 .
MESSAGE i208(00) WITH '请选中需要排序的列'.
ENDIF .
table control sort
最新推荐文章于 2019-10-31 21:37:32 发布
本文介绍了一个 ABAP 程序示例,展示了如何使用 LOOP AT 和 SORT 语句来实现表的排序功能。具体包括:1. 通过 LOOP AT 循环遍历表;2. 使用 IF 条件判断进行列选择;3. 利用 SPLIT 函数拆分字符串;4. 根据条件进行升序或降序排序。
1029

被折叠的 条评论
为什么被折叠?



