如何动态读取含多个关键字段的ABAP内表？

问题背景 #

已通过以下代码获取表HOUSES的所有关键字段并存储在内表it_keyfields中：

iob_typedescr ?= cl_abap_typedescr=>describe_by_name( 'HOUSES' ).
iob_structdescr_table ?= iob_typedescr.
it_ddic_all  = iob_structdescr_table->get_ddic_field_list( ).

LOOP AT it_ddic_all INTO is_ddic WHERE keyflag EQ 'X'.
  APPEND is_ddic TO it_keyfields.
ENDLOOP.

现有一个与HOUSES结构一致的内表it_internal_table，需要基于多个关键字段动态执行READ TABLE操作。已知单关键字段的写法如下，但不确定多关键字段的实现方式：

READ TABLE it_internal_table WITH KEY (key_name) = provided_value TRANSPORTING NO FIELDS.

解决方案 #

针对多关键字段的动态读取需求，推荐两种可行实现方式：

方法1：使用动态关键字表（优先推荐） #

这种方式直观且易维护，借助ABAP标准的关键字值表结构实现：

1. 定义存储关键字段名和对应值的内表与结构：

DATA: lt_key TYPE abap_keyval_tab,
      ls_key TYPE abap_keyval.

2. 遍历关键字段列表，填充关键字值表（假设is_houses是存储待匹配关键字值的结构，与HOUSES结构一致）：

LOOP AT it_keyfields INTO is_ddic.
  ls_key-name = is_ddic-fieldname.
  " 动态获取关键字段对应的值
  ASSIGN COMPONENT is_ddic-fieldname OF STRUCTURE is_houses TO FIELD-SYMBOL(<fs_val>).
  IF sy-subrc = 0.
    ls_key-value = <fs_val>.
    APPEND ls_key TO lt_key.
  ENDIF.
ENDLOOP.

3. 执行动态读取操作：

READ TABLE it_internal_table WITH KEY OF TABLE lt_key TRANSPORTING NO FIELDS.
IF sy-subrc = 0.
  " 找到匹配数据的后续逻辑
ELSE.
  " 未找到匹配数据的处理逻辑
ENDIF.

方法2：生成动态WITH KEY表达式 #

通过拼接动态条件语句实现，需额外处理字段符号赋值，相对繁琐：

1. 拼接动态关键字条件：

DATA: lv_key_expr TYPE string.

LOOP AT it_keyfields INTO is_ddic.
  CONCATENATE lv_key_expr `(` is_ddic-fieldname `) = <fs_` is_ddic-fieldname `>` 
              INTO lv_key_expr SEPARATED BY ' AND '.
ENDLOOP.

2. 提前为每个关键字段分配字段符号并赋值（示例省略具体赋值逻辑），再执行读取：

READ TABLE it_internal_table WITH KEY (lv_key_expr) TRANSPORTING NO FIELDS.

内容的提问来源于stack exchange，提问作者Ikim SS