多选项弹窗POPUP_TO_DECIDE_LIST实例

代码：

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[] ).

效果：