AT NEW & AT END OF

damoandstar

于 2021-03-22 11:56:13 发布

阅读量62

点赞数

文章标签： abap

本文链接：https://blog.csdn.net/damoandstar/article/details/115071208

版权

这段代码展示了如何在SAP ABAP中使用内部表进行数据操作。它创建了一个内部表`lt_data`，并填充了具有两个字段`a`和`b`的记录。然后通过循环遍历`lt_data`，根据字段`a`进行分组，并打印出每个分组的开始和结束标记。

摘要由CSDN通过智能技术生成

REPORT ZTEST_001.

TYPES:BEGIN OF ty_data,

        a TYPE c,

        b TYPE char2,

      END OF ty_data.

DATA: ls_data TYPE ty_data,

      lt_data TYPE TABLE OF ty_data.

FIELD-SYMBOLS:<ls_data> TYPE ty_data.

ls_data-a = 'A'. ls_data-b = 'A1'. APPEND ls_data TO lt_data.
ls_data-a = 'A'. ls_data-b = 'A2'. APPEND ls_data TO lt_data.
ls_data-a = 'B'. ls_data-b = 'B1'. APPEND ls_data TO lt_data.
ls_data-a = 'B'. ls_data-b = 'B2'. APPEND ls_data TO lt_data.

LOOP AT lt_data ASSIGNING <ls_data>.

  AT NEW a.

    WRITE: 'NEW', <ls_data>-a, <ls_data>-b, /.

  ENDAT.

  AT END OF a.

    WRITE: 'END', <ls_data>-a, <ls_data>-b, /.

  ENDAT.

ENDLOOP.