TABLES: spfli,SSCRFIELDS..DATA FUNCTXT TYPE SMP_DYNTXT.
SELECT-OPTIONS:s_car FOR spfli-carrid.
SELECTION-SCREEN: FUNCTION KEY 1.
SELECTION-SCREEN: FUNCTION KEY 2.
INITIALIZATION.
FUNCTXT-ICON_ID = ICON_CREATE.
FUNCTXT-QUICKINFO = '新增'.
SSCRFIELDS-FUNCTXT_01 = FUNCTXT.
FUNCTXT-ICON_ID = ICON_CREATE.
FUNCTXT-QUICKINFO = '取消'.
SSCRFIELDS-FUNCTXT_02 = FUNCTXT.
AT SELECTION-SCREEN.
CASE SSCRFIELDS-UCOMM.
WHEN 'FC01'.
CALL SCREEN 200.
ENDCASE.