VIEW_MAINTENANCE_CALL对字段添加限制条件

最新推荐文章于 2024-07-08 09:08:04 发布

慎久

最新推荐文章于 2024-07-08 09:08:04 发布

阅读量1k

点赞数

本文链接：https://blog.youkuaiyun.com/hj18782924930/article/details/108604636

版权

本文展示了一段ABAP代码示例，用于维护视图并设置选择条件，包括如何同时筛选多个工厂（1000和1010）的数据，以及如何使用范围过滤器进行更复杂的选择。通过CALL FUNCTION调用，展示了如何使用这些选择条件来调用视图维护功能。

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

话不多说，直接上代码

DATA:ls_sel TYPE vimsellist,
lt_sel TYPE TABLE OF vimsellist.

下面演示的是同时满足工厂1000和1010的视图

ls_sel-viewfield = 'WERKS' .
      ls_sel-operator = 'EQ' .
      ls_sel-and_or  = 'OR'.
      ls_sel-value = '1000' .
      APPEND ls_sel TO lt_sel.
      ls_sel-viewfield = 'WERKS' .
      ls_sel-and_or  = 'OR'.
      ls_sel-operator = 'EQ' .
      ls_sel-value = '1010' .
      APPEND ls_sel TO lt_sel.

"也可以使用其他情况的过滤

如

 ls_sel-viewfield = 'WERKS'.
  ls_sel-and_or    = 'AND'.
  ls_sel-operator  = 'GE'.    " Rango inferior
  ls_sel-value     = '1000'.
  APPEND ls_sel to lt_sel.
  ls_sel-operator  = 'LT'.    " Rango superior
  ls_sel-value     = '1200'.
  APPEND ls_sel to lt_sel.

   CALL FUNCTION 'VIEW_MAINTENANCE_CALL'
        EXPORTING
          action                       = 'S'   "S-显示；U-修改；T-传输；
*         CORR_NUMBER                  = '          '
*         GENERATE_MAINT_TOOL_IF_MISSING       = ' '
*         SHOW_SELECTION_POPUP         = ' '
          view_name                    = 'ZTPP0007'   "创建的视图
*         NO_WARNING_FOR_CLIENTINDEP   = ' '
*         RFC_DESTINATION_FOR_UPGRADE  = ' '
*         CLIENT_FOR_UPGRADE           = ' '
*         VARIANT_FOR_SELECTION        = ' '
*         COMPLEX_SELCONDS_USED        = ' '
*         CHECK_DDIC_MAINFLAG          = ' '
*         SUPPRESS_WA_POPUP            = ' '
        TABLES
          dba_sellist                  = lt_sel
*         EXCL_CUA_FUNCT               =
        EXCEPTIONS
          client_reference             = 1
          foreign_lock                 = 2
          invalid_action               = 3
          no_clientindependent_auth    = 4
          no_database_function         = 5
          no_editor_function           = 6
          no_show_auth                 = 7
          no_tvdir_entry               = 8
          no_upd_auth                  = 9
          only_show_allowed            = 10
          system_failure               = 11
          unknown_field_in_dba_sellist = 12
          view_not_found               = 13
          maintenance_prohibited       = 14
          OTHERS                       = 15.
      IF sy-subrc <> 0.
* Implement suitable error handling here
      ENDIF.