SAP-ABAP 选择屏幕根据按钮活动

SELECTION-SCREEN BEGIN OF BLOCK BLK1 WITH FRAME TITLE TEXT-001.
 SELECT-OPTIONS S_VERKF FOR  ZTMM123_LOG_1-VERKF          MODIF ID M1.           "物流订单号
 SELECT-OPTIONS S_BILLN FOR  ZPPT_SCAN_JIT-BILLNUMBER     MODIF ID M2.           "同步物流指示票号
 SELECT-OPTIONS S_MATNR FOR  ZTMM123_LOG_1-MATNR     .                           "零件号

 SELECTION-SCREEN SKIP 1 .

 PARAMETERS  p1 TYPE c RADIOBUTTON GROUP g1 USER-COMMAND uc DEFAULT 'X'.
 PARAMETERS  p2 TYPE c RADIOBUTTON GROUP g1 .
SELECTION-SCREEN END OF BLOCK BLK1.

**********************************************************************
*                INITIALIZATION
**********************************************************************
INITIALIZATION.
**********************************************************************
*               AT SELECTION-SCREEN OUTPUT                           *
**********************************************************************
AT SELECTION-SCREEN OUTPUT.

  LOOP AT SCREEN.
    CASE screen-group1.
      WHEN 'M1'.
*        IF p1 IS INITIAL. "等同 P1= 'X'
        IF p1 = 'X'.
          screen-active = '0'.
        ELSE.
          screen-active = '1'.
        ENDIF.
      WHEN 'M2'.
*        IF p2 IS INITIAL.
          IF p2 = 'X' .
          screen-active = '0'.
        ELSE.
          screen-active = '1'.
        ENDIF.
    ENDCASE.
    MODIFY SCREEN.
  ENDLOOP.