OO实现ALV TABLE 三：ALV的功能设计
細(xì)心的讀者肯定已經(jīng)注意前面的兩個(gè)例子少了點(diǎn)什么,少了ALV提供的標(biāo)準(zhǔn)功能,比如排序,過濾,匯總,等,以及用戶可以在ALV的功能欄上加上自己自定義的功能按鈕。
?
ALV的標(biāo)準(zhǔn)功能可以通過類CL_SALV_FUNCTIONS和CL_SALV_FUNCTION來設(shè)計(jì),通過這兩個(gè)類你可以對(duì)ALV提供的標(biāo)準(zhǔn)功能可見或不可見。也可以自己創(chuàng)建GUI STATUS設(shè)置自己的ALV功能，通過GUI STATUS來設(shè)置ALV的功能是通過類CL_SALV_TABLE的方法SET_SCREEN_STATUS來實(shí)現(xiàn)的。
?
1.首先我們要取得類CL_SALV_FUNCTIONS的實(shí)例，根據(jù)類CL_SALV_TABLE的方法get_functions可以取得功能實(shí)例。
lr_functions = gr_table->get_functions( ).
??? lr_functions->set_all( 'X' ).
2根據(jù)類CL_SALV_TABLE的方法設(shè)置功能欄。
gr_table->set_screen_status(
??? pfstatus????? =? 'SALV_STANDARD'
??? report???????=? sy-repid
??? set_functions = gr_table->c_functions_all ).
?
3.自定義功能的實(shí)現(xiàn)。ALV的自定義功能的實(shí)現(xiàn)動(dòng)作要通過類的事件來處理。
???????? 首先定義事件的操作類
??? CLASS lcl_handle_events DEFINITION.
? PUBLIC SECTION.
??? CLASS-METHODS: on_user_command FOR EVENT added_function OF cl_salv_events
????????????????????? IMPORTING e_salv_function.
ENDCLASS.??????????????????? "lcl_handle_events DEFINITION
???????? 實(shí)現(xiàn)事件的操作類
CLASS lcl_handle_events IMPLEMENTATION.
? METHOD on_user_command.
??? DATA l_string TYPE string.
??? CONCATENATE 'Function is ' e_salv_function
?????????? INTO l_string
?????????? SEPARATED BY space.
??? MESSAGE i000(0k) WITH l_string.
? ENDMETHOD.???????????????????"on_user_command
ENDCLASS.??????????????????? "lcl_handle_events IMPLEMENTATION
????????? 注冊(cè)事件
SET HANDLER lcl_handle_events=>on_user_command FOR lr_events.
?
?
下面是效果圖
?
?
下面是程序的所有代碼:
REPORT? y_xin_002.
?
*變量定義
TYPES ty_spfli TYPE spfli OCCURS 0.
DATA: gr_table???? TYPE REF TO cl_salv_table.
?
?
*----------------------------------------------------------------------*
*?????? CLASS lcl_handle_events DEFINITION
*----------------------------------------------------------------------*
*?????? 事件處理類（定義）
*----------------------------------------------------------------------*
CLASS lcl_handle_events DEFINITION.
? PUBLIC SECTION.
??? CLASS-METHODS: on_user_command FOR EVENT added_function OF cl_salv_events
????????????????????? IMPORTING e_salv_function.
ENDCLASS.??????????????????? "lcl_handle_events DEFINITION
?
*----------------------------------------------------------------------*
*? ?????CLASS lcl_handle_events IMPLEMENTATION
*----------------------------------------------------------------------*
*?????? 事件處理類（實(shí)現(xiàn)）
*----------------------------------------------------------------------*
CLASS lcl_handle_events IMPLEMENTATION.
? METHOD on_user_command.
??? DATA l_string TYPE string.
??? CONCATENATE 'Function is ' e_salv_function
?????????? INTO l_string
??? ???????SEPARATED BY space.
??? MESSAGE i000(0k) WITH l_string.
? ENDMETHOD.??????????????????? "on_user_command
ENDCLASS.??????????????????? "lcl_handle_events IMPLEMENTATION
?
*----------------------------------------------------------------------*
*????? ?CLASS lcl_alv DEFINITION
*----------------------------------------------------------------------*
*?????? ALV操作類（定義）
*----------------------------------------------------------------------*
CLASS lcl_alv DEFINITION.
? PUBLIC SECTION.
??? METHODS: getdata???????? "取得要顯示的數(shù)據(jù)
?????????????? RETURNING value(lt_tab) TYPE ty_spfli,
???????????? alv_full??????? "全屏Grid列表處理方法
?????????????? IMPORTING value(lt_tab) TYPE ty_spfli,
???????????? main.?????????? "主方法
ENDCLASS.??????????????????? "lcl_alv DEFINITION
?
*----------------------------------------------------------------------*
*?????? CLASS lcl_alv IMPLEMENTATION
*----------------------------------------------------------------------*
*?????? ALV操作類（實(shí)現(xiàn)）
*----------------------------------------------------------------------*
CLASS lcl_alv IMPLEMENTATION.
*取得要顯示的數(shù)據(jù)
? METHOD getdata.
??? SELECT * INTO TABLE lt_tab FROM spfli.
? ENDMETHOD.??????????????????? "getdata
?
*輸出全屏網(wǎng)格列表的方法
? METHOD alv_full.
??? DATA: lr_functions TYPE REF TO cl_salv_functions,
????????? lr_events??? TYPE REF TO cl_salv_events.
?
??? "創(chuàng)建實(shí)例
??? TRY.
??????? cl_salv_table=>factory(
????????? IMPORTING
??????????? r_salv_table = gr_table
????????? CHANGING
??????????? t_table????? = lt_tab
??????? ).
????? CATCH cx_salv_msg.
??? ENDTRY.
?
??? lr_events = gr_table->get_event( ).
?
??? "設(shè)置ALV功能
??? gr_table->set_screen_status(
??? pfstatus????? =? 'SALV_STANDARD'
??? report??????? =? sy-repid
??? set_functions = gr_table->c_functions_all ).
?
??? "注冊(cè)事件
??? SET HANDLER lcl_handle_events=>on_user_command FOR lr_events.
?
??? "顯示列表
??? gr_table->display( ).
? ENDMETHOD.??????????????????? "alv_full
?
*主方法，整合數(shù)據(jù)
? METHOD main.
??? DATA: lt_tab TYPE TABLE OF spfli.
?
??? "取得要顯示的數(shù)據(jù)
??? lt_tab = me->getdata( ).
?
??? me->alv_full( lt_tab ).
? ENDMETHOD.??????????????????? "main
ENDCLASS.??????????????????? "lcl_alv IMPLEMENTATION
?
*報(bào)表執(zhí)行
START-OF-SELECTION.
? DATA? lr_alv?? TYPE REF TO lcl_alv.
? CREATE OBJECT lr_alv.
? lr_alv->main( ).總結(jié)
以上是生活随笔為你收集整理的OO实现ALV TABLE 三：ALV的功能设计的全部?jī)?nèi)容，希望文章能夠幫你解決所遇到的問題。
- 上一篇： OO实现ALV TABLE 四：ALV的
- 下一篇： OO实现ALV TABLE 二：ALV显