关于at end of

来源：互联网发布：手机淘宝在哪看直播编辑：程序博客网时间：2024/05/01 05:17

*&---------------------------------------------------------------------*
*& Report ZFISRTEST011
*&
*&---------------------------------------------------------------------*
*&
*& 后面备注
*&---------------------------------------------------------------------*

REPORT zfisrtest011.
DATA: BEGIN OF line,
      col1 TYPE i,
      col2 TYPE i,
      col3 TYPE i,
      END OF line.
DATA: itab LIKE line OCCURS 0 WITH HEADER LINE.

itab-col1 = 1.
itab-col2 = 1.
itab-col3 = 2.

APPEND itab.

itab-col1 = 1.
itab-col2 = 2.
itab-col3 = 3.
APPEND itab.

itab-col1 = 2.
itab-col2 = 3.
itab-col3 = 4.
APPEND itab.

itab-col1 = 2.
itab-col2 = 4.
itab-col3 = 5.
APPEND itab.

itab-col1 = 2.
itab-col2 = 9.
itab-col3 = 7.
APPEND itab.

SORT itab BY col1.
*LOOP AT itab INTO line.
* AT END OF col1.
*    SUM.
*    WRITE:/ line-col1, line-col2, line-col3.
* ENDAT.
*ENDLOOP.
*WRITE : / '*******************************'.
LOOP AT itab INTO line.
AT END OF col1 .
    SUM.
    ULINE.
    WRITE:/ line-col1, line-col2, line-col3.
ENDAT.
ENDLOOP.
WRITE : / '*******************************'.
LOOP AT itab INTO line.
AT NEW col2.
    SUM.
    ULINE.
    WRITE:/ line-col1, line-col2, line-col3.
ENDAT.
ENDLOOP.
WRITE : / '*******************************'.
LOOP AT itab INTO line.
AT LAST.
    SUM.
    ULINE.
    WRITE:/ line-col1, line-col2, line-col3.
ENDAT.
ENDLOOP.

备注：在运行(AT END OF col1)或(AT NEW col2)的时候对于内表字段col1 or col2不管类型都按其变化汇总
只有at last 语法汇总内表全部字段时才只有I,P,F类型可以汇总其他的类型都用*代替其值