• ABAP search help (搜索帮助) 五种方法


     ABAP 的搜索帮助有很多种方法,掌握下面的几种基本差不多了

    *&---------------------------------------------------------------------*
    *& Report  ZTEST1
    *&
    *&---------------------------------------------------------------------*
    *&
    *&
    *&---------------------------------------------------------------------*

    REPORT  ZTEST1.

    tables: mara.

     DATA:ok_code TYPE sy-ucomm,
           save_ok TYPE sy-ucomm.

    parameters: l_matnr type matnr matchcode object zmara. " 第1种-简单的弹出对话框

    PARAMETERS:l_ebeln type ebeln matchcode object ZEKKO. " 第2种-selectio-method 是 view。


    * 第3种,上下两个是关联在一块的。工厂和库存地点。
    PARAMETERS:l_werks type zwerks_logrt-werks.
    PARAMETERS:l_logrt type zwerks_logrt-logrt.


    * 第4种,selection screen 中的 :日期类型的search help。这种方法要注意在dialogue screen 中,要在元素清单中reference中 l_data添加DATS,
    *按钮才会出来,否则要按F4,才能出来帮助按钮。
    PARAMETERS:l_data type dats.


    * 第5种:dialogue screen 中的 屏幕下拉框。

     data l_date type dats." dialogue screen 中的日期类型的search help 创建。
     call screen '0100'.

     data l_ver type char10.

    Module drop_down_list output.

      TYPE-POOLS vrm.
      DATA :name TYPE vrm_id,
            List TYPE vrm_values,
            Value LIKE LINE OF list.
      Name = 'L_VER'. "屏幕上绑定的下拉框也是这个名字。
      REFRESH list.
      Value-key = 'A'.
      Value-text = '西海岸'.
      APPEND value TO list.

      Value-key = 'B'.
      Value-text = '东海岸'.
      APPEND value TO list.

      CALL FUNCTION 'VRM_SET_VALUES'
        EXPORTING
          id     = name
          values = list.

    ENDMODULE.                    "drop_down_list OUTPUT
    *&---------------------------------------------------------------------*
    *&      Module  STATUS_0100  OUTPUT
    *&---------------------------------------------------------------------*
    *       text
    *----------------------------------------------------------------------*
    MODULE STATUS_0100 OUTPUT.
    SET PF-STATUS '0100'.
     SET TITLEBAR '0100'.

    ENDMODULE.                 " STATUS_0100  OUTPUT
    *&---------------------------------------------------------------------*
    *&      Module  USER_COMMAND_0100  INPUT
    *&---------------------------------------------------------------------*
    *       text
    *----------------------------------------------------------------------*
    MODULE USER_COMMAND_0100 INPUT.
    SAVE_OK =  OK_CODE .
      clear:OK_CODE.
      case:SAVE_OK.
        when 'BACK' or 'EXIT' or 'CACEL'.
          leave to screen 0.
      endcase.
    ENDMODULE.                 " USER_COMMAND_0100  INPUT

  • 相关阅读:
    [Operate System & Algorithm] 页面置换算法
    [Network] 计算机网络基础知识总结
    [Search Engine] 搜索引擎技术之网络爬虫
    [Search Engine] 搜索引擎分类和基础架构概述
    [Math] 常见的几种最优化方法
    磁盘告警之---神奇的魔法(Sparse file)
    Kubernetes概念之RC
    Kubernetes概念之mater、node
    Centos7允许使用密码登录
    安装gcc-c++报错解决办法
  • 原文地址:https://www.cnblogs.com/cnlmjer/p/4099843.html
Copyright © 2020-2023  润新知