[SAP ABAP] CORRESPONDING

示例1 

REPORT z437_test_2024.

* 自定义数据类型
TYPES: BEGIN OF ty_upload,
         ebeln TYPE ekpo-ebeln,  " 采购订单编号
         ebelp TYPE ekpo-ebelp,  " 采购订单的行项目编号
         txz01 TYPE ekpo-txz01,  " 短文本
         menge TYPE string,      " 采购订单数量
       END OF ty_upload,

       BEGIN OF ty_output,
         ebeln  TYPE ekpo-ebeln, " 采购订单编号
         ebelp  TYPE ekpo-ebelp, " 采购订单的行项目编号
         txz01  TYPE ekpo-txz01, " 短文本
         menge  TYPE ekpo-menge, " 采购订单数量
         msg    TYPE bapi_msg,   " 消息
         status TYPE icon_d,     " 消息灯
         sel(1) TYPE c,          " 选择标志
       END OF ty_output.

* 定义内表与结构体
DATA: gs_upload TYPE ty_upload,
      gt_upload TYPE STANDARD TABLE OF ty_upload,
      gt_output TYPE STANDARD TABLE OF ty_output.

gs_upload-ebeln = '0001'.
gs_upload-ebelp = '10'.
gs_upload-txz01 = '物料1'.
gs_upload-menge = '100'.
APPEND gs_upload TO gt_upload.

gs_upload-ebeln = '0001'.
gs_upload-ebelp = '20'.
gs_upload-txz01 = '物料2'.
gs_upload-menge = '200'.
APPEND gs_upload TO gt_upload.

gs_upload-ebeln = '0002'.
gs_upload-ebelp = '10'.
gs_upload-txz01 = '物料3'.
gs_upload-menge = '300'.
APPEND gs_upload TO gt_upload.

cl_demo_output=>display( gt_upload ).

gt_output = CORRESPONDING #( gt_upload ).  " 赋值(同名传递)

cl_demo_output=>display( gt_output ).

输出结果：