代码:
DATA: BEGIN OF LIT_SPOPLIST OCCURS 5.
INCLUDE STRUCTURE SPOPLI.
DATA: END OF LIT_SPOPLIST.
DATA: ANTWORT TYPE C.
* 添加选择参数
LIT_SPOPLIST-VAROPTION = '我是选项1'.
APPEND LIT_SPOPLIST.
LIT_SPOPLIST-VAROPTION = '我是选项2'.
APPEND LIT_SPOPLIST.
LIT_SPOPLIST-VAROPTION = '我是选项3'.
APPEND LIT_SPOPLIST.
LIT_SPOPLIST-VAROPTION = '我是选项4'.
APPEND LIT_SPOPLIST.
CALL FUNCTION 'POPUP_TO_DECIDE_LIST'
EXPORTING
TITEL = '抬头'
TEXTLINE1 = '第一行 .' "只能通过TEXTLINE或者LIT_SPOPLIST-VAROPTION来控制窗口的宽度
TEXTLINE2 = '第二行'
TEXTLINE3 = '第三行' "窗口的位置不能改变
MARK_MAX = 4 "允许最大选择数,超过允许最大值;输出结构不会带选中标志 最多25个选项
MARK_FLAG = 'X' "选择框标志,'X':checkbox,space:radio
IMPORTING
ANSWER = ANTWORT
TABLES
T_SPOPLI = LIT_SPOPLIST
EXCEPTIONS
TOO_MUCH_ANSWERS = 1
TOO_MUCH_MARKS = 2.
CL_DEMO_OUTPUT=>DISPLAY( LIT_SPOPLIST[] ).
效果: