1.可见性:ACTIVE
示例:
PARAMETERS:p_name LIKE tab-name MODIF ID m1, "名字
p_age LIKE tab_age MODIF ID m2. "年龄
PARAMETERS:
p_radio1 RADIOBUTTON GROUP g1 USER-COMMAND sel DEFAULT 'X', "显示名字
p_radio2 RADIOBUTTON GROUP g1. "显示年龄
AT SELECTION-SCREEN OUTPUT.
LOOP AT SCREEN.
IF p_radio1 EQ 'X' AND SCREEN-GROUP1 = 'M1'.
SCREEN-ACTIVE = '1'. "显示
MODIFY SCREEN.
ELSEIF p_radio2 EQ 'X' AND SCREEN-GROUP1 = 'M2'.
SCREEN-ACTIVE = '0'. "隐藏
MODIFY SCREEN.
ENDIF.
ENDLOOP.
2.必输性:REQUIRED
示例:
PARAMETERS:p_name LIKE tab-name OBLIGETORY , "名字 OBLIGATORY必输,有勾且系统会自动校验
p_age LIKE tab_age, "年龄
p_class LIKE tab_age, "班级
p_grade LIKE tab_age. "分数
AT SELECTION-SCREEN OUTPUT.
LOOP AT SCREEN.
IF SCREEN-NAME = 'P_AGE'.
SCREEN-REQUIRED = '0'. "不必输,没有勾
MODIFY SCREEN.
ELSEIF SCREEN-NAME = 'P_CLASS'.
SCREEN-REQUIRED = '1'. "必输,有勾且系统自动校验,等价于OBLIGATORY
MODIFY SCREEN.
ELSEIF SCREEN-NAME = 'P_GRADE'.
SCREEN-REQUIRED = '2'. "不必输,有勾,但系统不会自动校验,需要手动校验
MODIFY SCREEN.
ENDIF.
ENDLOOP.
3.可输性:INPUT
示例:
PARAMETERS:p_name LIKE tab-name, "名字
p_age LIKE tab_age. "年龄
AT SELECTION-SCREEN OUTPUT.
LOOP AT SCREEN.
IF SCREEN-NAME = 'P_NAME'.
SCREEN-INPUT = '1'. "可输入
MODIFY SCREEN.
ELSEIF SCREEN-NAME = 'P_AGE'.
SCREEN-INPUT = '0'. "禁止输入
MODIFY SCREEN.
ENDIF.
ENDLOOP.