OO实现ALV TABLE 一：最简单的ALV显示

以前都是通过函数“REUSE_ALV_GRID_DISPLAY”来显示列表，这种方式是面向过程的，现在有另外一种面向对象化的方式来显示列表，函数REUSE_ALV_GRID_DISPLAY可以做到的它也能够做到。它主要是通过一个类CL_SALV_TABLE来实现的.

下面让我们来实现最简单的ALV列表。

1取得要显示的数据。
SELECT * INTO TABLE lt_tab FROM spfli

2.调用类CL_SALV_TABLE的静态方法Factory()创建类的实例。
TRY.
cl_salv_table=>factory(
IMPORTING
r_salv_table = lr_table
CHANGING
t_table = lt_tab
).
CATCH cx_salv_msg.
ENDTRY.

3.取得实例之后再调用方法Display（）显示列表.
lr_table->display( ).

处理过程完成，最后让我们看一下显示结果。



下面是报表的所有源代码:
REPORT y_xin_002.

*变量定义
TYPES ty_spfli TYPE spfli OCCURS 0.

*----------------------------------------------------------------------*
* CLASS lcl_alv DEFINITION
*----------------------------------------------------------------------*
* ALV操作类（定义）
*----------------------------------------------------------------------*
CLASS lcl_alv DEFINITION.
PUBLIC SECTION.
METHODS: getdata "取得要显示的数据
RETURNING value(lt_tab) TYPE ty_spfli,
alv_process "ALV处理方法
IMPORTING value(lt_tab) TYPE ty_spfli,
main. "主方法
PRIVATE SECTION.
DATA gr_table TYPE REF TO cl_salv_table.
ENDCLASS. "lcl_alv DEFINITION

*----------------------------------------------------------------------*
* CLASS lcl_alv IMPLEMENTATION
*----------------------------------------------------------------------*
* ALV操作类（实现）
*----------------------------------------------------------------------*
CLASS lcl_alv IMPLEMENTATION.
*取得要显示的数据
METHOD getdata.
SELECT * INTO TABLE lt_tab FROM spfli.
ENDMETHOD. "getdata

*ALV处理方法
METHOD alv_process.
"创建实例
TRY.
cl_salv_table=>factory(
IMPORTING
r_salv_table = gr_table
CHANGING
t_table = lt_tab
).
CATCH cx_salv_msg.
ENDTRY.
"显示列表
gr_table->display( ).
ENDMETHOD. "alv_process

*主方法，整合数据
METHOD main.
DATA: lt_tab TYPE TABLE OF spfli.

"取得要显示的数据
lt_tab = me->getdata( ).
"处理数据
me->alv_process( lt_tab ).
ENDMETHOD. "main
ENDCLASS. "lcl_alv IMPLEMENTATION

*报表执行
start-of-selection.
data lr_alv type ref to lcl_alv.
create object lr_alv.
lr_alv->main( ).
关于ALV的最全文档可以参考SAP Helphttp://help.sap.com/saphelp_nw70/helpdata/EN/5e/88d440e14f8431e10000000a1550b0/content.htm