SELECT-OPTIONS Range 功能扩展限制

SELECT-OPTIONS Range 功能扩展限制

TABLES:risa0.

DATA:
restrict TYPE sscr_restrict,
optlist TYPE sscr_opt_list,
ass TYPE sscr_ass.

SELECTION-SCREEN BEGIN OF BLOCK a1 WITH FRAME TITLE text-t01.
PARAMETER:
p_matnr TYPE matnr OBLIGATORY.
SELECT-OPTIONS:
s_sernr FOR risa0-sernr OBLIGATORY NO INTERVALS.
PARAMETERS: p_mode TYPE ctu_params-dismode DEFAULT ‘N’.
SELECTION-SCREEN END OF BLOCK a1.

INITIALIZATION.
optlist-name = ‘OBJECTKEY1’.
optlist-options-eq = ‘X’.
optlist-options-bt = ‘’.
APPEND optlist TO restrict-opt_list_tab.
ass-kind = ‘S’.
ass-name = ‘S_SERNR’.
ass-sg_main = ‘I’.
ass-sg_addy = space.
ass-op_main = ‘OBJECTKEY1’.
APPEND ass TO restrict-ass_tab.

CALL FUNCTION ‘SELECT_OPTIONS_RESTRICT’
EXPORTING
restriction = re