SAP Function ：VIEW_MAINTENANCE_CALL 维护table/View

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

yong325

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

阅读量346

点赞数

分类专栏： SAP Function Table

本文链接：https://blog.csdn.net/yong325/article/details/10062193

版权

SAP 同时被 3 个专栏收录

433 篇文章 4 订阅

订阅专栏

Function

23 篇文章 1 订阅

订阅专栏

Table

22 篇文章 0 订阅

订阅专栏

*&---------------------------------------------------------------------*
*& Report ZTEST133

*&
*&---------------------------------------------------------------------*
*&
*&DELE
*NEWL
*WB_EXEC
*SAVE
*SLCT
*DELM
*EXPA
*ADDR
*SCRF
*LANG
*TEXT
*GPRF
*UPRF
*BCCH
*TRSP
*ORDR
*&---------------------------------------------------------------------*

report  ZTEST133.

*---------------------------------------------------------------------*
* Data Declaration
*---------------------------------------------------------------------*
data: gt_excl    type table of vimexclfun,
      gwa_excl   type vimexclfun.

*---------------------------------------------------------------------*
* START-OF-SELECTION
*---------------------------------------------------------------------*
start-of-selection.
*  " Fill the function codes in exclude table that you want to disable
*  gwa_excl-function = 'DELE'. " Function code for delete icon
*  append gwa_excl to gt_excl.
*
*  " Fill the function codes in exclude table that you want to disable
*  gwa_excl-function = 'NEWL'. " Function code for NEW icon
*  append gwa_excl to gt_excl.
*  " ACTION = 'S'
*  " Fill the function codes in exclude table that you want to disable
*  gwa_excl-function = 'AEND'. " Function code for Change icon  ANZG AEND
*  append gwa_excl to gt_excl.
*
* " ACTION = 'U'
* " Fill the function codes in exclude table that you want to disable
*  GWA_EXCL-FUNCTION = 'ANZG'. " Function code for Change icon  ANZG AEND
*  APPEND GWA_EXCL TO GT_EXCL.

*  " Fill the function codes in exclude table that you want to disable
*  gwa_excl-function = 'SAVE'. " Function code for SAVE icon
*  append gwa_excl to gt_excl.

  data: begin of act_sellist occurs 10.
          include structure vimsellist.
  data: end of act_sellist.

* 根据条件显示维护数据
  refresh act_sellist.
  clear act_sellist.
  act_sellist-viewfield  = 'WERKS'.
  act_sellist-operator   = 'EQ'.
  act_sellist-value      = '8201'.
*  act_sellist-and_or     = 'AND'.
  append act_sellist.
*  act_sellist-viewfield  = 'KAPPL'.
*  act_sellist-operator   = 'EQ'.
*  act_sellist-value      = 'V'.
*  append act_sellist.

  call function 'VIEW_MAINTENANCE_CALL'
    exporting
      action                       = 'S' " 'U' 'T'
      view_name                    = 'ZMM_PRODLOT'  "'ZRUN_CHANGE_PMC'
*     SUPPRESS_WA_POPUP            = 'X'
*SHOW_SELECTION_POPUP = 'X'
*VARIANT_FOR_SELECTION = 'X'
    tables
      dba_sellist                  = act_sellist
      excl_cua_funct               = gt_excl
    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.
    message id sy-msgid type sy-msgty number sy-msgno
            with sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
  endif.