如何向动态内表<t_dyntable>添加自定义字段并匹配填充数据？

方案一：扩展动态内表结构并填充数据 #

直接修改原动态内表的结构，添加目标字段后迁移数据，再通过object_id关联lt_itab填充新字段。

实现步骤 #

• 获取原动态内表的行结构元数据
• 构造包含新字段的结构元数据
• 创建新的动态内表并复制原数据
• 遍历新内表，匹配lt_itab填充新字段

* 获取原动态内表的结构描述
DATA(lo_struct_descr) = cl_abap_structdescr=>describe_by_data( <t_dyntable>[ 1 ] ).
DATA(lt_components) = lo_struct_descr->get_components( ).

* 添加新字段（示例为STRING类型，可根据实际需求调整类型）
APPEND VALUE #( 
  name = 'NEW_FIELD' 
  type = cl_abap_elemdescr=>get_string( ) "替换为实际字段类型，如get_char( 40 )
) TO lt_components.

* 创建新的结构和内表描述
DATA(lo_new_struct) = cl_abap_structdescr=>create( lt_components ).
DATA(lo_new_table) = cl_abap_tabledescr=>create( lo_new_struct ).

* 生成新动态内表并复制原数据
DATA(lt_new_dyntable) TYPE REF TO data.
CREATE DATA lt_new_dyntable TYPE HANDLE lo_new_table.
lt_new_dyntable->* = <t_dyntable>.

* 排序lt_itab提升匹配效率
DATA(lt_itab_sorted) = lt_itab.
SORT lt_itab_sorted BY object_id.

* 填充新字段
FIELD-SYMBOLS: <fs_new_row> TYPE any,
               <fs_obj_id> TYPE any,
               <fs_new_field> TYPE any,
               <fs_itab_row> TYPE any.

LOOP AT lt_new_dyntable->* ASSIGNING <fs_new_row>.
  * 获取当前行的object_id
  ASSIGN COMPONENT 'OBJECT_ID' OF STRUCTURE <fs_new_row> TO <fs_obj_id>.
  * 匹配lt_itab中的对应数据
  READ TABLE lt_itab_sorted WITH KEY object_id = <fs_obj_id> ASSIGNING <fs_itab_row>.
  IF sy-subrc = 0.
    * 赋值新字段
    ASSIGN COMPONENT 'NEW_FIELD' OF STRUCTURE <fs_new_row> TO <fs_new_field>.
    <fs_new_field> = <fs_itab_row>-TARGET_FIELD. "替换为lt_itab中要提取的字段名
  ENDIF.
ENDLOOP.

* 将新内表赋值回原变量（可选）
<t_dyntable> = lt_new_dyntable->*.

方案二：不修改原内表，通过临时关联处理 #

如果不需要修改原动态内表结构，可通过临时变量存储匹配值，在后续逻辑中联合原内表数据使用。

* 排序lt_itab优化匹配性能
SORT lt_itab BY object_id.

FIELD-SYMBOLS: <fs_dyn_row> TYPE any,
               <fs_dyn_obj_id> TYPE any.
DATA(ls_itab) TYPE <lt_itab的类型>.

LOOP AT <t_dyntable> ASSIGNING <fs_dyn_row>.
  ASSIGN COMPONENT 'OBJECT_ID' OF STRUCTURE <fs_dyn_row> TO <fs_dyn_obj_id>.
  READ TABLE lt_itab WITH KEY object_id = <fs_dyn_obj_id> INTO ls_itab.
  IF sy-subrc = 0.
    * 此处可将ls_itab中的目标字段值存入临时变量或新的结构/内表
    * 例如：DATA(lv_target_value) = ls_itab-TARGET_FIELD.
    * 后续逻辑中联合<fs_dyn_row>和lv_target_value使用
  ENDIF.
ENDLOOP.

关键注意事项 #

• 确保object_id字段存在于动态内表中（已确认），否则ASSIGN COMPONENT会触发运行时错误
• 对lt_itab排序可显著降低大数量级数据下的匹配耗时
• 新字段类型需与lt_itab中目标字段类型兼容，避免类型转换错误

内容的提问来源于stack exchange，提问作者Ahmet Cinar