又一个实用的小例子，用在作加总上。
REPORT demo_int_tables_at_1.
DATA: BEGIN OF line,
col1(1) TYPE c,
col2 TYPE i,
col3 TYPE i,
END OF line.
DATA itab LIKE HASHED TABLE OF line
WITH UNIQUE KEY col1 col2.
line-col1 = 'A'.
DO 3 TIMES.
line-col2 = sy-index.
line-col3 = sy-index ** 2.
INSERT line INTO TABLE itab.
ENDDO.
line-col1 = 'B'.
DO 3 TIMES.
line-col2 = 2 * sy-index.
line-col3 = ( 2 * sy-index ) ** 2.
INSERT line INTO TABLE itab.
ENDDO.
SORT itab.
LOOP AT itab INTO line.
at NEW col1.
WRITE / line-col1.
endat.
WRITE: / line-col1, line-col2, line-col3.
AT END OF col1.
SUM.
ULINE.
WRITE: / line-col1, line-col2, line-col3.
SKIP.
ENDAT.
AT LAST.
SUM.
ULINE.
WRITE: / '总计', line-col2, line-col3.
ENDAT.
ENDLOOP.
来自 “ ITPUB博客 ” ，链接：https://blog.itpub.net/90072/viewspace-1001519/ ，如需转载，请注明出处，否则将追究法律责任。
