ALV通过F4事件，实现自定义搜索帮助F4

ALV通过参考可以直接获取表中搜索帮助，但是表中字段没有搜索帮助或者不合要求就需要通过F4事件完成了。

1、定义OOALV类

CLASS lcl_event_receiver DEFINITION DEFERRED.DATA:gt_fieldcat   TYPE lvc_t_fcat,gs_fieldcat   TYPE lvc_s_fcat,go_grid       TYPE REF TO cl_gui_alv_grid,go_event_receiver    TYPE REF TO lcl_event_receiver.*----------------------------------------------------------------------*
*       CLASS lcl_event_receiver DEFINITION
*----------------------------------------------------------------------*
CLASS lcl_event_receiver DEFINITION.PUBLIC SECTION.METHODS:handle_f4_help  FOR EVENT onf4 OF cl_gui_alv_gridIMPORTING  e_fieldnamees_row_noer_event_dataet_bad_cellse_display.ENDCLASS.                    "lcl_event_receiver DEFINITION
*----------------------------------------------------------------------*
*       CLASS lcl_event_receiver IMPLEMENTATION
*----------------------------------------------------------------------*
CLASS lcl_event_receiver IMPLEMENTATION.METHOD handle_f4_help.FIELD-SYMBOLS:<fs_alv> TYPE gs_alv.CASE e_fieldname.WHEN 'ARKTX'.READ TABLE git_alv ASSIGNING <fs_alv> INDEX es_row_no-row_id.IF sy-subrc = 0.PERFORM frm_get_arktx_f4 CHANGING <fs_alv>-arktx.ENDIF.
*      WHEN .WHEN OTHERS.ENDCASE.CALL METHOD go_grid->refresh_table_display.ENDMETHOD.ENDCLASS.               "lcl_event_receiver

2、定义alv-fieldcat属性

gs_fieldcat-f4availabl = 'X'.
gs_fieldcat-edit = 'X'.

3、将F4事件注册到ALV对象中

DATA:lt_f4             TYPE lvc_t_f4,ls_f4             TYPE lvc_s_f4.CALL METHOD go_grid->set_table_for_first_displayEXPORTINGit_toolbar_excluding = lt_excludeCHANGINGit_fieldcatalog      = git_fieldcatit_outtab            = git_alv[].CLEAR:ls_f4.
ls_f4-fieldname  = 'ARKTX'.
ls_f4-register   = 'X'.
ls_f4-getbefore  = 'X'.
ls_f4-chngeafter = ''.
ls_f4-internal   = ''.
INSERT ls_f4 INTO TABLE lt_f4.CALL METHOD go_grid->register_f4_for_fieldsEXPORTINGit_f4 = lt_f4.CREATE OBJECT go_event_receiver.
SET HANDLER go_event_receiver->handle_f4_help FOR go_grid .

4、自定义F4，获取数据

*&---------------------------------------------------------------------*
*&      Form  FRM_GET_ARKTX_F4
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
*      <--P_<FS_ALV>_ARKTX  text
*----------------------------------------------------------------------*
FORM frm_get_arktx_f4  USING    pc_matnr TYPE vbrp-matnrCHANGING pc_arktx TYPE zfit005-maktx.DATA:BEGIN OF lt_zfit029 OCCURS 0,sub_type_m TYPE zfit029-sub_type_m,sub_name_m TYPE zfit029-sub_name_m,END OF lt_zfit029.DATA:lt_ret_tab TYPE TABLE OF ddshretval WITH HEADER LINE.DATA:lv_matnr TYPE zfit028-matnr.lv_matnr = pc_matnr.SELECT sub_type_msub_name_mINTO TABLE lt_zfit029FROM zfit028INNER JOIN zfit029 ON zfit028~type_m = zfit029~type_mWHERE zfit028~matnr = lv_matnr.CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'EXPORTINGretfield        = 'SUB_NAME_M'value_org       = 'S'TABLESvalue_tab       = lt_zfit029return_tab      = lt_ret_tabEXCEPTIONSparameter_error = 1no_values_found = 2OTHERS          = 3.IF sy-subrc = 0.READ TABLE lt_ret_tab INDEX 1.IF sy-subrc = 0  AND lt_ret_tab-fieldval IS NOT INITIAL.pc_arktx = lt_ret_tab-fieldval.ENDIF.ENDIF.ENDFORM.                    " FRM_GET_ARKTX_F4

5、效果

ALV通过F4事件，实现自定义搜索帮助F4相关推荐

ABAP ALV中自定义搜索帮助
一.干货: 在fieldcat-ref_table 和 fieldcat-ref_field 填入参考表和参考字段,搜索帮助就自动出来了. 想要选择屏幕添加自定义搜索帮助-转到这里 ALV自定义搜索帮 ...
ABAP：ALV中自定义搜索帮助
如果希望ALV中某字段具有搜索帮助,第一种办法当然是对表中某字段的引用,设置ref_table.ref_field,将自动触发该字段所带的搜索帮助. 可不可以直接设置Searh Help呢?应该不可以 ...
Ant Design Pro ProTable 自定义搜索菜单操作栏和搜索事件
先上整体代码: const beforeSearchSubmit = (par) => {//par 就是你搜索表单输入的内容 }<ProTableheaderTitle="查询 ...
SAP ABAP SEARCH HELP F4 自定义搜索帮助出口
利用搜索帮助出口创建自定义搜索帮助 . 1.拷贝标准搜索帮助出库DEMO函数 F4IF_SHLP_EXIT_EXAMPLE 实现FORM STEP_SELECT FORM FRM_STEP_SELEC ...
Qt 之自定义搜索框QLineEdit
Qt 之自定义搜索框 2015年12月19日 10:44:14 一去丶二三里阅读数 15126更多分类专栏: Qt <Qt 实战一二三> 版权声明:本文为博主原创文章,遵循 CC 4. ...
百度地图实现自定义搜索
今天花了一天的时间仔细的写了一下百度地图的相关东西,拿出来和大家分享一下. servlet(FindCity.java) package edu.hpu.map.servlet; import jav ...
vue项目中使用百度地图api完成自定义搜索功能（包含搜索详细地理位置）
需求描述: 在vue项目中,有时候,我们需要自定义百度地图的一些功能.譬如,现在的需求,就是需要自定义搜索内容和结果展示. 类似如下页面的功能: 首先在vue项目中,我们可以使用 vue-baidu- ...
分享一个可以自定义搜索定位的地图
分享一个可以自定义搜索定位的地图前面的申请ak密钥步骤都是一致的,这里就不重复描述了,可以通过下面的链接看具体步骤然后复制本篇下面的代码 https://blog.csdn.net/weixin_4 ...
百度地图－自定义搜索、自定义marker、地图选址实用实例
该实例中包含地图自定义搜索.自定义标注marker.地图选址.鼠标样式修改.搜索周边接口等实用功能 <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1 ...

ALV通过F4事件，实现自定义搜索帮助F4

ALV通过F4事件，实现自定义搜索帮助F4相关推荐

最新文章

热门文章