abap中VIEW_MAINTENANCE_GIVEN_DATA的用法

本文介绍了一个使用 ABAP 编写的报表 (ZMM127_DEPT) 的实现细节,该报表通过调用 'VIEW_MAINTENANCE_GIVEN_DATA' 函数模块来维护 ZTDEPT_TXT 表的数据。报表允许用户根据部门类型、业务范围和部门文本进行筛选,并支持数据的更新操作。

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

*&---------------------------------------------------------------------*
*& Report ZMM127_DEPT
*&---------------------------------------------------------------------*
*&
*&---------------------------------------------------------------------*
REPORT zmm127_dept.

TABLESztdept_txtsscrfields..


DATABEGIN OF gt_valuetable OCCURS ,
        value(255),
      END OF gt_valuetable.

DATAgt_zmm127 TYPE TABLE OF ztdept_txt,
      gs_zmm127 LIKE LINE OF gt_zmm127.


SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE TEXT-001.
SELECTION-SCREEN FUNCTION KEY 1."可以设置1~5五个功能键
SELECTION-SCREEN FUNCTION KEY 2."可以设置1~5五个功能键
SELECT-OPTIONSs_type FOR  ztdept_txt-zdept_type,
                s_brsch  FOR  ztdept_txt-brsch,
                s_txt  FOR  ztdept_txt-zdept_txt.
SELECTION-SCREEN END OF BLOCK b1.


START-OF-SELECTION.
  PERFORM frm_view_maintenance.


END-OF-SELECTION.




*&---------------------------------------------------------------------*
*&      Form  FRM_VIEW_MAINTENANCE
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
*  -->  p1        text
*  <--  p2        text
*----------------------------------------------------------------------*
FORM frm_view_maintenance .
  SELECT *
    INTO TABLE gt_zmm127
    FROM ztdept_txt
    WHERE zdept_type IN s_type
      AND brsch IN s_brsch
      AND zdept_txt IN s_txt.

  SORT gt_zmm127 BY zseqno.

  gt_valuetable[] gt_zmm127.


  CALL FUNCTION 'VIEW_MAINTENANCE_GIVEN_DATA'
    EXPORTING
      action             'U'
*     CORR_NUMBER        = '          '
*     GENERATE_MAINT_TOOL_IF_MISSING       = ' '
      view_name          'ZTDEPT_TXT'
*     NO_WARNING_FOR_CLIENTINDEP           = ' '
*     RFC_DESTINATION_FOR_UPGRADE          = ' '
      client_for_upgrade 'X'
*     VARIANT_FOR_SELECTION                = ' '
*     COMPLEX_SELCONDS_USED                = ' '
    TABLES
      data               gt_valuetable
*     DBA_SELLIST        =
*     EXCL_CUA_FUNCT     =
*   EXCEPTIONS
*     CLIENT_REFERENCE   = 1
*     FOREIGN_LOCK       = 2
*     INVALID_ACTION     = 3
*     NO_CLIENTINDEPENDENT_AUTH            = 4
*     NO_DATABASE_FUNCTION                 = 5
*     NO_SHOW_AUTH       = 6
*     NO_TVDIR_ENTRY     = 7
*     NO_UPD_AUTH        = 8
*     ONLY_SHOW_ALLOWED  = 9
*     SYSTEM_FAILURE     = 10
*     UNKNOWN_FIELD_IN_DBA_SELLIST         = 11
*     VIEW_NOT_FOUND     = 12
*     OTHERS             = 13
    .
  IF sy-subrc <> 0.
*   Implement suitable error handling here
  ENDIF.
ENDFORM.
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包

打赏作者

ChampaignWolf

你的鼓励将是我创作的最大动力

¥1 ¥2 ¥4 ¥6 ¥10 ¥20
扫码支付:¥1
获取中
扫码支付

您的余额不足,请更换扫码支付或充值

打赏作者

实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

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

余额充值