ABAP:ALV中自定义搜索帮助


ABAP:ALV中自定义搜索帮助

如果希望ALV中某字段具有搜索帮助,第一种办法当然是对表中某字段的引用,设置ref_table、ref_field,将自动触发该字段所带的搜索帮助。

可不可以直接设置Searh Help呢?应该不可以,找遍了field catalog的结构也没发现有可以设置的字段。

第二种办法就是利用自定义代码来实现ALV的搜索帮助,显然它的功能更强大、更灵活。针对在OO ALV中实现搜索帮助,其主要步骤有:

1,在ALV的事件处理类中添加个Method,其DEFINITION如下:

handle_onf4 FOR EVENT onf4OF cl_gui_alv_grid
IMPORTING e_fieldname es_row_no er_event_data.

其IMPLEMENTATION中就是我们希望执行的代码,用来弹出可选择对话框。e_fieldname代表用户点击了ALV的哪个字段来触发搜索帮助,es_row_no代表了当前行信息,

es_row_no-row_id就是ALV中内表记录的INDEX。er_event_data代表了当前用户对ALV进行了哪些编辑的信息。在Method的最后,记得加上

er_event_data->m_event_handled = 'X'.

通知系统搜索事件处理完毕,这样就不会调用系统标准的Search Help。

2,那就是对需要自定义搜索帮助的字段,设置其field catalog时:

ls_fieldcat-f4availabl = 'X'.

这一步往往容易被忽略。

3,在创建ALV对象之后,要对需要自定义搜索帮助的字段进行注册。

DATA: lt_f4 TYPE lvc_t_f4 WITH HEADER LINE.

CLEAR lt_f4.
lt_f4-fieldname = 'FIELD_NAME'.
lt_f4-register = 'X'.
lt_f4-chngeafter = 'X'.
APPEND lt_f4.
CALL METHOD mygrid->register_f4_for_fields
EXPORTING
it_f4 = lt_f4[].

lvc_s_f4中的字段getbefore和changeafter应该代表是否触发data_changed事件。

然后我们为其指定事件处理类(假设go_evt_receiver是自定义事件处理类的一个对象):

CREATE OBJECT go_evt_receiver.

SET HANDLER go_evt_receiver->handle_onf4 FOR go_alv_grid.

至此,主要的设置步骤都介绍完毕。

下面贴一段Handle_onf4的代码供参考:

METHOD handle_onf4.
DATA: ls_modi TYPE lvc_s_modi,

lt_ret_tab TYPE TABLE OF ddshretval WITH HEADER LINE.

FIELD-SYMBOLS <modtab> TYPE lvc_t_modi.

IF e_fieldname = 'FIELD_NAME'. "我们自定义搜索的字段名
READ TABLE gt_alv_data INDEX es_row_no-row_id.
CHECK sy-subrc = 0.
**这里可以添加代码以对lt_hitlist内表进行填充
CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
EXPORTING
retfield= 'HIT_FIELD'
value_org= 'S'
TABLES
value_tab= lt_hitlist
return_tab= lt_ret_tab
EXCEPTIONS
parameter_error = 1
no_values_found = 2
OTHERS= 3.
IF sy-subrc = 0.
**Update the value in ALV cell
READ TABLE lt_ret_tab INDEX 1.
IF sy-subrc = 0. " User didn't cancel
ls_modi-row_id = es_row_no-row_id.
ls_modi-fieldname = e_fieldname.
ls_modi-value = lt_ret_tab-fieldval.
ASSIGN er_event_data->m_data->* TO <modtab>.
APPEND ls_modi TO <modtab>.
ENDIF.
ENDIF.

**Inform ALV Grid that event 'onf4' has been processed
er_event_data->m_event_handled = 'X'.
ENDIF.
ENDMETHOD."handle_onf4

优质内容筛选与推荐>>
1、动态规划法基本思想
2、【AcWing 113】【交互】特殊排序——二分
3、ThinkPHP 3.2,配置 'URL_MODEL'=>2。 APP_DEBUG设为false,U函数生成的URL的index.php不能去掉,只有将APP_DEBUG改成true,才能去掉index.php,求解~~
4、LeetCode - 3. Longest Substring Without Repeating Characters
5、ASP.NET MVC中EasyUI的datagrid跨域调用


长按二维码向我转账

受苹果公司新规定影响,微信 iOS 版的赞赏功能被关闭,可通过二维码转账支持公众号。

    阅读
    好看
    已推荐到看一看
    你的朋友可以在“发现”-“看一看”看到你认为好看的文章。
    已取消,“好看”想法已同步删除
    已推荐到看一看 和朋友分享想法
    最多200字,当前共 发送

    已发送

    朋友将在看一看看到

    确定
    分享你的想法...
    取消

    分享想法到看一看

    确定
    最多200字,当前共

    发送中

    网络异常,请稍后重试

    微信扫一扫
    关注该公众号