选择屏幕字段->分组：MODIF ID / 调用SE11搜索帮助：MATCHCODE OBJECT

SELECTION-SCREEN BEGIN OF BLOCK bk0 WITH FRAME TITLE TEXT-000.
PARAMETERS: p_1 TYPE c RADIOBUTTON GROUP rg1 USER-COMMAND uc1 MODIF ID bk0.
PARAMETERS: p_2 TYPE c RADIOBUTTON GROUP rg1 MODIF ID bk0.
PARAMETERS: p_3 TYPE c RADIOBUTTON GROUP rg1 MODIF ID bk0.
PARAMETERS: p_4 TYPE c RADIOBUTTON GROUP rg1 MODIF ID bk0.
PARAMETERS: p_5 TYPE c RADIOBUTTON GROUP rg1 MODIF ID bk0.

PARAMETERS:    p_vkorg TYPE ztsd001a-vkorg MODIF ID bkx.
PARAMETERS:    p_spart TYPE ztsd001a-spart MODIF ID bkx.
SELECT-OPTIONS:s_kunnr FOR ztsd001a-kunnr MODIF ID bkx.
SELECTION-SCREEN END OF BLOCK bk0.

通过 MODIF ID 降不同的选择屏幕字段分组，对应SCREEN-GROUP1

AT SELECTION-SCREEN OUTPUT.
  PERFORM frm_set_screen.

FORM frm_set_screen .

  LOOP AT SCREEN.

    CHECK screen-group1 NE 'BK0' AND screen-group1 NE 'BKX' AND screen-group3 NE 'BLK'.

    CASE 'X'.
      WHEN p_1.
        IF screen-group1 NE 'BK1'.
          screen-active = 0.
          MODIFY SCREEN.
        ENDIF.

      WHEN p_2.
        IF screen-group1 NE 'BK2'.
          screen-active = 0.
          MODIFY SCREEN.
        ENDIF.

      WHEN OTHERS.
    ENDCASE.
  ENDLOOP.

ENDFORM.

MATCHCODE OBJECT

PARAMETERS:    P_MWSKZ TYPE T007A-MWSKZ MATCHCODE OBJECT ZSH_T007A.