ABAP Function SELECT_OPTIONS_RESTRICT

本文展示了一个使用ABAP编程语言中SELECT-OPTIONS限制功能的具体示例。通过设置自定义名称、接口文件名等参数,可以更灵活地控制选择屏幕上的选项。示例代码详细说明了如何配置选项列表并调用'SELECT_OPTIONS_RESTRICT'函数,以实现对选择项的有效管理和筛选。

摘要生成于 C知道 ,由 DeepSeek-R1 满血版支持, 前往体验 >

SELECT_OPTIONS_RESTRICT

Make use of SELECT-OPTIONS easier on the selection screen

FORM frm_options_restrict .
  DATA:
      liw_restrict TYPE sscr_restrict,
      liw_optlist  TYPE sscr_opt_list,
      liw_ass      TYPE sscr_ass.

* 自定义名称
  liw_optlist-name = cos_v1.
  liw_optlist-options-eq = cos_x.
  APPEND  liw_optlist TO liw_restrict-opt_list_tab.

* 接口文件名
  liw_ass-kind = cos_s.
  liw_ass-name = cos_fil."    cos_fil  TYPE char7  VALUE 'S_ZZFIL',   s_zzfil FOR zglzzt0010-zzfil NO INTERVALS LOWER CASE,   "接口文件名
  liw_ass-sg_main = cos_i.
  liw_ass-op_main = cos_v1.
  APPEND  liw_ass TO liw_restrict-ass_tab.

  CALL FUNCTION 'SELECT_OPTIONS_RESTRICT'
    EXPORTING
      restriction            = liw_restrict
    EXCEPTIONS
      too_late               = 1
      repeated               = 2
      selopt_without_options = 3
      selopt_without_signs   = 4
      invalid_sign           = 5
      empty_option_list      = 6
      invalid_kind           = 7
      repeated_kind_a        = 8
      OTHERS                 = 9.
  IF sy-subrc <> 0.
    MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
            WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
  ENDIF.
ENDFORM.                    "frm_options_restrict
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值