画面項目表示時OBLIGATORYとUSER-COMMAND

画面の必須入力項目のチェックをスキップして画面の指定動作に入る。
screen-required = '2'

• データ定義

DATA: GV_BELNR TYPE BKPF-BELNR,
GV_VBELN TYPE VBAK-VBELN.

SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-001.
PARAMETERS: P_BUKRS TYPE BKPF-BUKRS OBLIGATORY MODIF ID ty0.
SELECTION-SCREEN SKIP 1.
PARAMETERS: P_STDATE TYPE DATUM OBLIGATORY MODIF ID TY0.
SELECTION-SCREEN SKIP 1.
PARAMETERS: P_STTIME TYPE TIME OBLIGATORY MODIF ID TY0.
SELECTION-SCREEN SKIP 1.
PARAMETERS: P_CDT AS CHECKBOX USER-COMMAND FLAG.
SELECTION-SCREEN SKIP 1.
PARAMETERS: P_EDDATE TYPE DATUM MODIF ID TY1 OBLIGATORY.
SELECTION-SCREEN SKIP 1.
PARAMETERS: P_EDTIME TYPE TIME MODIF ID TY1 OBLIGATORY.
SELECTION-SCREEN SKIP 1.
SELECT-OPTIONS: P_BELNR FOR GV_BELNR.
SELECTION-SCREEN SKIP 1.
SELECT-OPTIONS: P_VBELN FOR GV_VBELN.
SELECTION-SCREEN END OF BLOCK B1.

AT SELECTION-SCREEN OUTPUT.
LOOP AT SCREEN.
CASE SCREEN-GROUP1.
WHEN 'TY0'.
screen-required = '2'.
WHEN 'TY1'.
screen-required = '2'.
IF P_CDT = 'X'.
SCREEN-ACTIVE = '0'.
ENDIF.
ENDCASE.
MODIFY SCREEN.
ENDLOOP.
AT SELECTION-SCREEN.
CLEAR sy-ucomm.