创建次序表 Sorted BY

内表适合于 生成次序表 。为此,从空的内表开始,然后使用 APPEND 语句的 SORTED BY 选项。

用法 如下:
APPEND [<wa> TO] <itab> SORTED BY <f>.

如果使用有 SORTED BY 选项的 APPEND 语句(参见 附加行),则并不将新行附加为内表 <itab> 的最后一行 。
而是系统 插入新行, 这样内表 <itab> 就根据字段 <f> 以降序排序 。

要生成包含多达 100 个条目的次序表, 则 应该使用 APPEND 语句。
在处理更大的表时,由于效率方面的原因,建议用 SORT 语句对表格进行排序(参见 内表排序)。

如果使用 SORTED BY 选项,表格 只能包含 OCCURS 参数中指定的行数。
这是一般规则的一个例外 (参见创建内表数据类型 )。
如果添加的行数 比指定的要多,则丢弃最后一行。
这对于创建长度有限的次序表 十分有用(例如“Top Ten”) 。

使用 APPEND 语句的 SORTED BY 选项指定的 工作区域必须与内表的行类型兼容 。可转换性对该选项不充分。


DATA: BEGIN OF ITAB OCCURS 2,
         COLUMN1 TYPE I,
         COLUMN2 TYPE I,
         COLUMN3 TYPE I,
       END OF ITAB.


 ITAB-COLUMN1 = 1.

 ITAB-COLUMN2 = 2.

 ITAB-COLUMN3 = 3.


APPEND ITAB SORTED BY COLUMN2.


 ITAB-COLUMN1 = 4.

 ITAB-COLUMN2 = 5.

 ITAB-COLUMN3 = 6.


APPEND ITAB SORTED BY COLUMN2.


 ITAB-COLUMN1 = 7.

 ITAB-COLUMN2 = 8.

 ITAB-COLUMN3 = 9.


APPEND ITAB SORTED BY COLUMN2.


LOOP AT ITAB.
   WRITE: / ITAB-COLUMN2.
ENDLOOP.


其输出为:
         8
         5


在此,用 SORTED BY 选项将三行 附加到有表 头行的内表 中。
请注意 ,COLUMN2 字段内容最 小的行被丢失,因为 OCCURS 参数中指定 的行数为 2。

'引用自http://www.shiziduo.com/bbs/thread-847-1-1.html

猜你喜欢

转载自blog.csdn.net/cly_apple/article/details/4589598
今日推荐