ABAP ALV檢查單元格更新數據

將ALV單元格設置為可輸入后，通常我們需要對單元格輸入的值做一個檢查，一般來說用循環內表的方法可以實現上述操作，不過如果ALV中有大量數據，而我們只更新了少量的單元格數據，這樣檢查顯得非常的麻煩，而且效率低下

在ALV OO中我們可以通過DATA_CHANGE事件得到被修改的單元格的信息，利用這些信息我們可以很方便的對所填數據做檢查，別且可以給用戶相應的錯誤提示，以及自動修改單元格數據

1.???????我們需要在處理事件的類中添加一個處理DATA_CHANGE事件的方法

Eg：

CLASS lcl_alv_receiver DEFINITION DEFERRED.

?

CLASS lcl_alv_receiver DEFINITION.

PUBLIC SECTION.

????……..

????METHODS:

????handle_data_changed

????????FOR EVENT data_changed OF cl_gui_alv_grid

????????????IMPORTING er_data_changed e_onf4 e_onf4_before e_onf4_after e_ucomm.

ENDCLASS.????????????????????"lcl_event_receiver DEFINITION

?

2.???????初始化ALV后為lcl_alv_receiver類注冊一個DATA_CHANGED事件

Eg：

CALL METHOD g_grid->set_table_for_first_display

????EXPORTING

??????i_save??????????= x_save

??????is_variant?????= ls_layout

??????is_layout???????= is_layout

????CHANGING

??????it_fieldcatalog?= it_fieldcat

??????it_outtab???????= lt_zqsdmx[].

SET HANDLER g_alv_application->handle_data_changed FOR g_grid.

CALL METHOD g_grid->register_edit_event?“注冊更新事件

????EXPORTING

??????i_event_id = cl_gui_alv_grid=>mc_evt_enter .

其中i_event_id = cl_gui_alv_grid=>mc_evt_enter?表示在單元格修改后回車或者執行其他操作時觸發事件,此類型可用于多個單元格修改后一起檢查修改的值

i_event_id = cl_gui_alv_grid=>mc_evt_modified?表示單光標焦點移開被修改單元格后既觸發事件,此類型可用于每個每個單元個的實時更新檢查

3.實現lcl_alv_receiver類的handle_data_changed方法，其中一些常用的一些屬性方法我會在后附表列出

Eg：

CLASS lcl_alv_receiver IMPLEMENTATION.

METHOD handle_toolbar.

????METHOD handle_data_changed.

????PERFORM. handle_data_changed USING er_data_changed.

ENDMETHOD.????????????????????"handle_data_changed

ENDCLASS.???????????????"lcl_ALV_event_receiver

?

*&---------------------------------------------------------------------*

*&??????Form?handle_data_changed

*&---------------------------------------------------------------------*

*???????text

*----------------------------------------------------------------------*

*??????-->P_ER_DATA_CHANGED?text

*----------------------------------------------------------------------*

FORM. handle_data_changed?USING p_er_data_changed TYPE REF TO cl_alv_changed_data_protocol.

*如果更新的reason字段長度小于10為則提示用戶填入字符數不能低于10

DATA:mod_data TYPE lvc_t_modi,

???????wa_mod_data TYPE lvc_s_modi.

mod_data = p_er_data_changed->mt_mod_cells.

LOOP AT mod_data INTO wa_mod_data WHERE fieldname = 'ZRESON'.

????IF STRLEN( wa_mod_data-value ) < 10.

??????CALL METHOD p_er_data_changed->add_protocol_entry

????????EXPORTING

??????????i_msgid?????= '00'

??????????i_msgty?????= 'E'

??????????i_msgno?????= '001'

??????????i_msgv1?????= '長度必須大于10 '

??????????i_fieldname = wa_mod_data-fieldname.

?

*如果長度小于10，則將字段內容更新為長都無法確定

??????CALL METHOD p_er_data_changed->modify_cell

????????EXPORTING

??????????i_row_id????= wa_mod_data-row_id

??????????i_fieldname = wa_mod_data-fieldname.

????ENDIF.

ENDLOOP.

ENDFORM.????????????????????" handle_data_changed

總結

以上是生活随笔為你收集整理的ABAP ALV检查单元格更新数据的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。