zoukankan      html  css  js  c++  java
  • ABAP 搜索帮助

    当选择屏幕上的一个字段所参考的数据元素没有建立搜索帮助时,可以手工建立一个:
      1、在se11创建一个搜索帮助ZAUTEST,需要输入:
      (1)描述;
      (2)选择方法:即搜索帮助显示字段所在的透明表;
      (3)搜索帮助参数:即搜索帮助要显示的字段;
      (4)IMP:输入字段,勾上即表示显示该字段;
      (5)EXP:输出字段,勾上即表示该字段是搜索帮助需要的输入字段;
            (6)Lpos:搜索帮助下半部分字段排序;Spos:搜索帮助上半部分字段排序。
      如下图:

    846113779993651662

    在Dialog屏幕中给输入字段建立搜索帮助,有以下三种情况:
    一:直接使用系统已有的搜索帮助,对于系统已存在搜索帮助的输入字段可直接使用:在屏幕格式器里双击输入字段框,在其“属性”栏的“搜索帮助”框内填入该字段的搜索帮助名称。如物料“matnr”的搜索帮助名称为“MAT1”。注意:MAT1一定要大写,对于所有在屏幕输入的字符,不管以任何形式输入都要大写,否则系统是不认识的,就如在代码里引号内的字符串要大写才正确一样。

    二:自建搜索帮助,其过程如下:
    1、在dialog屏幕的逻辑流里在user_command后定义module,如下:
    process before output.

    process after input.
    module user_command_0100.
    process on value-request. “输入字段的响应
    field t_pline module f4_help_for_pline. ““t_plnnr”是输入字段的“name”,“f4_help_for_pline”是module名,自己随便起吧
    2、双击“f4_help_for_pline”创建该module,这时进入程序代码编辑,module如下:
    module f4_help_for_pline input.
      call function ‘F4IF_INT_TABLE_VALUE_REQUEST’ “调用函数
        exporting
          retfield    = ‘PLINE’  “搜索帮助内表要输出的的帮助字段名,注:要大写
          dynpprog    = sy-repid
          dynpnr      = sy-dynnr
    *      dynprofield = ”
          value_org   = ‘S’
        tables
          value_tab   = ithp_pline. “存储搜索帮助内容的内表
    endmodule.                 ” f4_help_for_pline  INPUT
    :“retfield”的内表输出字段的名字要和输入字段保持一致,并最好和透明表的字段名一致,否则弹出的搜索帮助会显示不了字段名。
    3、在屏幕输出前或在上一屏幕进入本屏幕的动作发生后,取得搜索帮助的内容,如下:
        clear ithp_pline[].
        select pline pltxt
         into corresponding fields of table ithp_pline
         from afpo
         where dwerk = t_werks
         and matnr = t_matnr.
    内表ithp_pline有两个字段pline、pltxt即是搜索帮助将显示的两个列,其中ithp_pline是输入字段。

    三:联动搜索帮助的建立:有两个输入字段要建立搜索帮助,并且这两个字段是相互关联的,选择一个字段的输入值同时也选择了另一个字段的值,比如顺序与工序的关系必需是相互的。
    1、定义
    data:field_tab_vgn type dfies occurs 0,
         dynpfld_mapping_vgn type dselc occurs 0,
         wa_map_vgn type dselc,
         field_tab_pln type dfies occurs 0,
         dynpfld_mapping_pln type dselc occurs 0,
         wa_map_pln type dselc.
    2、在dialog屏幕的逻辑流里在user_command后定义module,如下:
    process before output.

    process after input.
    module user_command_0100.
    process on value-request.
    field:it_bg-plnfl module f4_help_for_vornr, “顺序、工序的联动搜索
          it_bg-vornr module f4_help_for_vornr.
    3、双击“f4_help_for_vornr”创建该module,这时进入程序代码编辑,module如下:
    module f4_help_for_vornr input.
      call function ‘F4IF_INT_TABLE_VALUE_REQUEST’
        exporting
          retfield    = ‘PLNFL’  “搜索帮助要输出的的帮助字段名
          dynpprog    = sy-repid
          dynpnr      = sy-dynnr
          dynprofield = ‘T_PLNFL’   ““T_PLNFL”为输入字段,在此用T_VORNR也可以但上面的retfield名也要改
          value_org   = ‘S’
        tables
          field_tab   = field_tab_vgn  “联动关系表
          dynpfld_mapping = dynpfld_mapping_vgn “存储联动内容的内表
          value_tab   = ithp_vgn. “存储搜索帮助的内表
    endmodule.                 ” f4_help_for_vornr  INPUT
    4、在屏幕输出前或在上一屏幕进入本屏幕的动作发生后,取得搜索帮助的内容,如下:
       clear ithp_vgn[].
       select plnfl vornr ltxa1
        into corresponding fields of table ithp_vgn
        from afko
        inner join afvc on afvc~aufpl = afko~aufpl
        where afko~aufnr = t_aufnr.
      “调用联动函数
      call function ‘ZSET_F4_FIELD_FROM_VALUE_TAB’
        tables
          value_tab = ithp_vgn       “存储搜索帮助的内表
          field_tab = field_tab_vgn. “联动关系表
      clear dynpfld_mapping_vgn[].
      wa_map_vgn-fldname = ‘PLNFL’.  “帮助内表字段
      wa_map_vgn-dyfldname = ‘T_PLNFL’. “输入字段
      append wa_map_vgn to dynpfld_mapping_vgn.
      wa_map_vgn-fldname = ‘VORNR’.
      wa_map_vgn-dyfldname = ‘T_VORNR’.
      append wa_map_vgn to dynpfld_mapping_vgn.

  • 相关阅读:
    shell脚本控制
    Oracle语句优化53个规则详解
    oracle 查看 用户,用户权限,用户表空间,用户默认表空间
    建Oracle表空间,指定用户默认表空间,增加数据文件
    建Oracle表空间,指定用户默认表空间,增加数据文件
    shell 日期参数
    shell 日期参数
    Oracle语句优化53个规则详解
    Trac 经验谈之(4)报表篇
    trac 经验谈之(3)工作流篇
  • 原文地址:https://www.cnblogs.com/ruingy/p/3521398.html
Copyright © 2011-2022 走看看