abap动态设定屏幕字段属性详解编程语言

经常遇见问如何实现根据条件动态改变屏幕字段显示的情况，下面举两个简单例子。

实例

代码都写在PBO对应的MODULE中。

方法一 通过判断屏幕元素名称实现

LOOP AT SCREEN. 
  "screen-name后为屏幕元素名称 
  IF screen-name = 'AFKO-AUFNR'. 
    "screen-input为屏幕元素输入属性，等于1是可输入 
    screen-input = '1'. 
  ENDIF. 
  "切记要更新屏幕，不然不会生效 
  MODIFY SCREEN. 
ENDLOOP. 

方法二 通过screen group可以将同一属性的分组
可以在屏幕的格式(layout)界面设定，双击屏幕元素，将GROUP栏位设定一个值。
程序中先判断分组。

LOOP AT SCREEN. 
  "先判断屏幕元素分组 
  CASE screen-group1. 
    "G1为屏幕中设定的组名 
    WHEN 'G1'. 
      "分组G1的屏幕元素可输入 
      screen-input = '1'. 
  ENDCASE. 
  MODIFY SCREEN. 
ENDLOOP. 

常见屏幕元素属性