ABAP中如何通过screen-name值获取并检查对应结构字段的值？

嘿，这个需求我之前在开发自定义Infotype屏幕时刚好碰到过，给你两种靠谱的实现方式，都能轻松搞定你要的判断逻辑：

方法一：动态绑定结构体字段（Infotype场景最常用） #

Infotype的数据通常都会存储在系统自动生成的对应工作区里（比如自定义Infotype 9999对应p9999），我们可以通过ASSIGN COMPONENT语句，把screen-name对应的结构体字段动态绑定到字段符号上，之后就能直接判断值是否为空了。

示例代码：

PROCESS BEFORE OUTPUT.
  MODULE check_screen_fields.

MODULE check_screen_fields OUTPUT.
  LOOP AT SCREEN.
    " 先把screen-name转成大写（ABAP字段名都是大写的，避免匹配失败）
    DATA(lv_field_name) = screen-name.
    TRANSLATE lv_field_name TO UPPER CASE.

    " 动态绑定结构体字段到字段符号
    ASSIGN COMPONENT lv_field_name OF STRUCTURE p9999 TO FIELD-SYMBOL(<fs_field_value>).
    
    IF sy-subrc = 0. " 确认字段绑定成功
      " 这里直接判断字段值是否初始
      IF <fs_field_value> IS INITIAL.
        " 执行你的业务逻辑，比如设置屏幕输入框不可编辑
        screen-input = 0.
        MODIFY SCREEN.
      ELSE.
        " 反之恢复可编辑状态（可选）
        screen-input = 1.
        MODIFY SCREEN.
      ENDIF.
    ENDIF.
  ENDLOOP.
ENDMODULE.

方法二：全局变量的动态访问（适合单独字段） #

如果你的字段不是存在Infotype工作区里，而是模块池的全局变量，直接用字段名动态绑定即可：

LOOP AT SCREEN.
  DATA(lv_field_name) = screen-name.
  TRANSLATE lv_field_name TO UPPER CASE.

  " 直接绑定全局变量
  ASSIGN (lv_field_name) TO FIELD-SYMBOL(<fs_value>).
  
  IF sy-subrc = 0 AND <fs_value> IS INITIAL.
    " 你的判断逻辑
    screen-active = 0.
    MODIFY SCREEN.
  ENDIF.
ENDLOOP.

关键注意事项 #

• 大小写问题：一定要把screen-name转成大写，因为ABAP里所有结构体、变量的名称都是大写定义的，小写会导致绑定失败。
• 错误处理：每次执行ASSIGN后必须检查sy-subrc，防止屏幕字段名和内部字段名不匹配时出现运行时错误。
• Infotype适配：自定义Infotype的屏幕字段名默认和p<infotype号>结构体的字段名一一对应，不用额外做映射，直接用方法一就足够了。

内容的提问来源于stack exchange，提问作者Abraham Bachar