ALV GRID

主题一：ABAP ALV 总结整理目录一、ALV简介1、简介2、ALV_GRID介绍3、其它描述二、开发ALV的基本流程三、ALV相关开发细节1、标准ALV与对象ALV的共同开发细节2、标准ALV开发相关细节3、对象ALV开发相关细节四、注意事项五、附属信息1、ALV快捷工具栏功能说明（如下图）2、类型SLIS_FIELDCAT_ALV常用参数说明3、类型SLIS_T_SORTINFO_ALV常用参数说明4、类型SLIS_LAYOUT_ALV常用参数说明5、类型SLIS_T_EVENT常用参数说明6、结构LVC_S_FCAT参数说明(清单观察器控制的字段目录)7、结构LVC_S_LAYO参数说明(ALV 控制: 布局结构)8、打印的参数控制请参考结构 [LVC_S_PRNT]9、排序的参数控制请参考结构[LVC_S_SORT]11、'REUSE_ALV_GRID_DISPLAY'函数常用参数12、'REUSE_ALV_LIST_DISPLAY'函数常用参数13、方法"set_table_for_first_display"的参数说明14、方法"REFRESH_TABLE_DISPLAY"的参数说明六、ALV常见问题七、示例程序一、ALV简介1、简介ALV――SAP LIST VIEWER是SAP中的一种报表方式，这里姑且称之为ABAP表单浏览器，用它可以标准化，简单化R/3系统中的表单，它可以提供给用户一个统一的表单格式及用户接口。

ALV是系统的一种网格的显示方式,这种方式带有汇总\排序\筛选等功能,ALV格式的数据是以单元格为单位显示，SAP提供了一套ALV的功能模块，可以对输出报表的样式作修饰，提高报表输出的可读性和功能性，对于动态报表程序是一个很有效率的工具。

ALV家族包含3中ALV工具:简易的,两层ALV,分等级连续的列表和树形结构的ALV。

ALV GRID参考文档SAP HELP对ALV的定义如下：The ALV grid control is a flexible tool for displaying lists. The tool provides common list operations as generic functions and can be enhanced by self-defined options。

ALV Grid控件用来创建非层次的友好的交互式报表。

作为一个控件，他被安装在本地机的客户端上。

ALV Grid控件提供了典型的常用功能，比如排序，筛选和总计等。

同时他也提供了自开发功能的接口。

它提供了大量与excel和水晶报表的接口。

类CL_GUI_GRID用来实现ALV GRID控件的各种功能。

还可以使用：REUSE_ALV….这些功能模块，来实现ALV报表。

当我们想通过ALV来实现报表时，我们通常需要准备一下几个部分：1)List data；就是你要显示的内表。

除排序功能之外，ALV GRID的控件只是读取所要显示的内表中的内容。

然而，排序将会改表内表的状态。

所要显示的内表可以包含任何flat type的数据。

如果要显示deep type的数据，那可能就要设定ALV GRID的某些特定功能。

2)Field Catalog: 使用另外一个内表来定义ALV报表的每一个字段的显示方式。

Fieldcatalog可以通过三种方式来实现：自动生成，半自动和手动生成。

这个内表的类型必须是LVC_T_FCAT3)Layout Structure: 我们可以通过这个结构来设置ALV的显示格式。

用这个结构我们可以用来设置ALV的常用选项，对GRID控件的配置，汇总选项已经颜色等。

这个结构的类型必须是LVC_S_LAYO4)Event Handler: 如果我们想在alv grid中触发时间，可以通过事件处理类来实现，必须注册一个事件处理类的实例来处理alv grid的事件。

ALV详解_SAP精华篇一.ALV介绍The ALV Grid Control (ALV = S A P L ist V iewer)是一个显示列表的灵活的工具,它提供了基本功能的列表操作,也可以通过自定义来进行增强,因此可以允许你可以在大型的应用程序中使用.SAP提示: 在SAP的开发项目中,ALV GRID也可以作为修改和创建数据的一种工具,然而,目前这个功能只在实验计划中使用,还没有向客户发布.下面是一个ALV GRID的图片:它包括3大部分,工具栏,标题,用于显示数据的网格控制器.如果有必要，用户可以隐藏标题和工具栏.ALV家族包含3中ALV工具:简易的,两层ALV,分等级连续的列表和树形结构的ALV.二.ALV GRID CONTROL (ALV网格控制器)ALV GRID CONTROL使用了控制器技术以实现艺术性的屏幕显示,象所有的控制器一样，ALV GRID CONTROL通过系统中的一个全局的类提供了方法,以响应它的动作.使用了ABAP的对象以后,列表是通过ALV的一个实例(INSTANCE)来显示的,程序员可以使用ABAP对象的事件管理.三.ALV GRID CONTROL 实例ALV GRID实例的定义,参照CL_GUI_ALV_GRID类data ALV_GRID1 type ref to cl_gui_alv_grid.ALV GRID继承结构:四、ALV GRID相关的几个控制结构1.字段目录[Field catalog]字段目录是用来控制ALV显示的网格中每个字段的属性的,比如字段的顺序,对齐方式,可编辑状态,颜色,等等.常用的控制字段如下:(下面的示例将说明这些字段的使用,参考STRUCTURE LVC_S_FCAT)2.布局控制[layout]布局是用来控制整个ALV的一个布局，比如ALV的标题,是否可编辑,行颜色,列颜色.参照ALV的控制结构[LVC_S_LAYO],以后的例子我将详细介绍如何设置行颜色和列颜色.详细的结构说明3.打印和排序,过滤控制打印的参数控制请参考结构[LVC_S_PRNT]排序的参数控制请参考结构[LVC_S_SORT]过滤的参数控制请参考结构[LVC_S_FILT]这里不再一一解释,进入中文版本,里面应该也有解释的,虽然一些不是很清楚.五.编写简单的ALV程序.首先这里就不详细介绍DIALOG的用法了.OO的ALV GRID必须存在于一个容器当中,就是FUNCTION的ALV,其实也是一样的,底层也是使用CL_GUI_ALV_GRID这个类的.首先ALV的显示需要有几个先决条件.1,字段目录,这个是必须的,如果没有这个参数,参考一个数据字典也是可以的,就是参数I_STRUCTURE_NAME.2.存放数据的内表,最好内表的结构和字段目录是一致的,否则可能会出现一些无法预知的错误,当然你说我非要不一样,那也不一定会出现错误.我建议是最好一样的.这2个是必须的,布局的话,应该是可以不设置的,使用默认的就可以了.第一步:创建个SCREEN,在屏幕上创建个容器,CONTAINER.定义变量.DATA:WCL_CONTAINER TYPE REF TO CL_GUI_CUSTOM_CONTAINER,WCL_ALV TYPE REF TO CL_GUI_ALV_GRID .*--- 存放字段目录的内表DATA gt_fieldcat TYPE lvc_t_fcat .*--- 布局结构DATA gs_layout TYPE lvc_s_layo .*----声明需要显示的内表(以SFLIGHT为例)DATA BEGIN OF gt_list OCCURS 0 .INCLUDE STRUCTURE SFLIGHT .DATA END OF gt_list .第二步: 创建ALV这个对象，它的父组件是那个容器.在PBO中写入如下代码:PROCESS BEFORE OUTPUT .MODULE display_alv .创建DISPLAY_ALV的MODULE后,写下如下代码:MODULE display_alv OUTPUT .PERFORM display_alv .ENDMODULE .在FORM DISPLAY_ALV中,判断ALV实例是否存在,如果不存在,则创建:IF WCL_ALV IS INITIAL .CREATE OBJECT: WCL_CONTAINEREXPORTINGCONTAINER_NAME = 'ALV_CON'.CREATE OBJECT WCL_ALVEXPORTINGI_PARENT = WCL_CONTAINER.*-----准备获取字段目录PERFORM prepare_field_catalog CHANGING gt_fieldcat .*-----设置布局PERFORM prepare_layout CHANGING gs_layout .*-----显示ALVCALL METHOD gr_alvgrid->set_table_for_first_display EXPORTING* I_BUFFER_ACTIVE =* I_CONSISTENCY_CHECK =* I_STRUCTURE_NAME =* IS_VARIANT =* I_SAVE =* I_DEFAULT = 'X'is_layout = gs_layout* IS_PRINT =* IT_SPECIAL_GROUPS =* IT_TOOLBAR_EXCLUDING =* IT_HYPERLINK =CHANGINGit_outtab = gt_list[]it_fieldcatalog = gt_fieldcat* IT_SORT =* IT_FILTER =EXCEPTIONSinvalid_parameter_combination = 1program_error = 2too_many_lines = 3OTHERS = 4 .ELSE .*----刷新ALVCALL METHOD gr_alvgrid->refresh_table_display * EXPORTING* IS_STABLE =* I_SOFT_REFRESH =EXCEPTIONSfinished = 1OTHERS = 2 .IF sy-subrc <> 0.*--异常处理ENDIF.ENDIF .方法"set_table_for_first_display"的参数说明方法"REFRESH_TABLE_DISPLAY"的参数说明第三步,获取要显示数据的字段目录.有两种方式.1.手动创建FORM prepare_field_catalog CHANGING pt_fieldcat TYPE lvc_t_fcat .DATA ls_fcat type lvc_s_fcat .ls_fcat-fieldname = 'CARRID' .ls_fcat-inttype = 'C' .ls_fcat-outputlen = '3' .ls_fcat-coltext = 'Carrier ID' .ls_fcat-seltext = 'Carrier ID' .APPEND ls_fcat to pt_fieldcat .CLEAR ls_fcat .ls_fcat-fieldname = 'CONNID' .ls_fcat-ref_table = 'SFLIGHT' .ls_fcat-ref_table = 'CONNID' .ls_fcat-outputlen = '3' .ls_fcat-coltext = 'Connection ID' .ls_fcat-seltext = 'Connection ID' .APPEND ls_fcat to pt_fieldcat .ENDFORM .2.半自动的创建FORM prepare_field_catalog CHANGING pt_fieldcat TYPE lvc_t_fcat . DATA ls_fcat type lvc_s_fcat .CALL FUNCTION 'LVC_FIELDCATALOG_MERGE'EXPORTINGi_structure_name = 'SFLIGHT'CHANGINGct_fieldcat = pt_fieldcat[]EXCEPTIONSinconsistent_interface = 1program_error = 2OTHERS = 3.IF sy-subrc <> 0.*--Exception handlingENDIF.LOOP AT pt_fieldcat INTO ls_fcat .CASE pt_fieldcat-fieldname .WHEN 'CARRID' .ls_fcat-outpulen = '10' .ls_fcat-coltext = 'Airline Carrier ID' .MODIFY pt_fieldcat FROM ls_fcat .WHEN 'PAYMENTSUM' .ls_fcat-no_out = 'X' .MODIFY pt_fieldcat FROM ls_fcat .ENDCASE .ENDLOOP .ENDFORM .第四步,设置布局FORM prepare_layout CHANGING ps_layout TYPE lvc_s_layo.ps_layout-zebra = 'X' .ps_layout-grid_title = 'Flights' .ps_layout-smalltitle = 'X' .ENDFORM. " prepare_layout第五步,排除不需要的标准按钮(可选,这个是第一种方法,还有另外一种，在添加自定义的按钮的时候介绍)在你的ALV上，如果你想排除一些你不想要的标准按钮,你可以把需要排除的按钮填入到表UI_FUNCTIONS中,然后传给set_table_for_first_display方法的参数"IT_TOOLBAR_EXCLUDING".这些按钮的功能码一般都可以通过查看类cl_gui_alv_grid的常量属性中获取到,或者自己加个断点，在after_user_command事件中.如果你要隐藏全部的工具条,你可以把layout中的no_toolbar设置为"X".FORM exclude_tb_functions CHANGING pt_exclude TYPE ui_functions .DATA ls_exclude TYPE ui_func.ls_exclude = cl_gui_alv_grid=>mc_fc_maximum .APPEND ls_exclude TO pt_exclude.ls_exclude = cl_gui_alv_grid=>mc_fc_minimum .APPEND ls_exclude TO pt_exclude.ls_exclude = cl_gui_alv_grid=>mc_fc_subtot .APPEND ls_exclude TO pt_exclude.ls_exclude = cl_gui_alv_grid=>mc_fc_sum .APPEND ls_exclude TO pt_exclude.ls_exclude = cl_gui_alv_grid=>mc_fc_average .APPEND ls_exclude TO pt_exclude.ls_exclude = cl_gui_alv_grid=>mc_mb_sum .APPEND ls_exclude TO pt_exclude.ls_exclude = cl_gui_alv_grid=>mc_mb_subtot .ENDFORM .按照上面的步骤,一个ALV的DEMO基本可以创建了.下面我们将讲述一些功能.功能一:在第一次显示以后,修改字段目录和布局.在运行的时候,很有可能需要在显示之后,需要设置一个新的布局或者字段目录.有下面这些方法去实现.字段目录: get_frontend_fieldcatalogset_frontend_fieldcatalog布局:get_frontend_layoutset_frontend_layout使用这些方法,你在执行的任何时候,可以获取这些内容,然后修改他们.DATA ls_fcat TYPE lvc_s_fcat .DATA lt_fcat TYPE lvc_t_fcat .DATA ls_layout TYPE lvc_s_layo .CALL METHOD gr_alvgrid->get_frontend_fieldcatalogIMPORTINGet_fieldcatalog = lt_fcat[] .LOOP AT lt_fcat INTO ls_fcat .IF ls_fcat-fieldname = 'PAYMENTSUM' .ls_fcat-no_out = space .MODIFY lt_fcat FROM ls_fcat .ENDIF .ENDLOOP .CALL METHOD gr_alvgrid->set_frontend_fieldcatalogEXPORTINGit_fieldcatalog = lt_fcat[] .CALL METHOD gr_alvgrid->get_frontend_layoutIMPORTINGes_layout = ls_layout .ls_layout-grid_title = 'Flights (with Payment Sums)' .CALL METHOD gr_alvgrid->set_frontend_layoutEXPORTINGis_layout = ls_layout .功能二:设置排序条件有时候我们需要使用到数据的排序.这个可以通过填充参考结构LVC_T_SORT创建的内表来实现，这个内表中包含了排序的标准.可以传递给set_table_for_first_display这个方法的IT_SORT参数来初始化一个排序.FORM prepare_sort_table CHANGING pt_sort TYPE lvc_t_sort .DATA ls_sort TYPE lvc_s_sort .ls_sort-spos = '1' .ls_sort-fieldname = 'CARRID' .ls_sort-up = 'X' . "A to Zls_sort-down = space .APPEND ls_sort TO pt_sort .ls_sort-spos = '2' .ls_sort-fieldname = 'SEATSOCC' .ls_sort-up = space .ls_sort-down = 'X' . "Z to AAPPEND ls_sort TO pt_sort .ENDFORM. " prepare_sort_table这有2点特别的说明:1.如果这边排序的字段名，不存在于字段目录中，那将出现DUMP.2.排序以后,垂直的网格中，如果出现相同的内容,就会合并，如果要避免,请在布局中设置"no_merging"为"X" .你可以通过使用方法“get_sort_criteria” 和“set_sort_criteria”来获取和设置排序的标准.功能三:设置过滤(和排序类似)ALV的标准按钮中已经有过滤的功能,我们也可以在初始显示的时候就设置过滤条件.我们需要把过滤条件填充到参考表类型"LVC_T_FILT"创建的内表中.过滤条件是类似一个RANGES结构的.然后把这个内表传递给方法"SET_TABLE_FOR_FIRST_DISPLAY"中的参数"IT_FILTER"FORM prepare_filter_table CHANGING pt_filt TYPE lvc_t_filt .DATA ls_filt TYPE lvc_s_filt .ls_filt-fieldname = 'FLDATE' .ls_filt-sign = 'E' .ls_filt-option = 'BT' .ls_filt-low = '20030101' .ls_filt-high = '20031231' .APPEND ls_filt TO pt_filt .ENDFORM. " preparefiltertable我们可以使用"get_filter_criteria" 和"set_filter_criteria"来获取过滤条件和设置过滤条件.功能四:选择方式有时候，我们需要选择一些单元格,行或者列,在布局中，有个参数"SEL_MODE"可以设置我们不同的选择方式.下面是参数的介绍.和不同的地方.注意:1.如果你设置了ALV是可编辑的,可能会覆盖你在布局中选择方式的设置的.2.设置了选择方式以后,我们可以使用很多方法来获取用户的选择.比如"GET_SELECTED_CELLS","GET_SELECTED_CELLS_ID","GET_SELECTED_R OWS","GET_SELECTED_COLUMNS"3.在执行PAI以后,用户所选择的单元格,行或者列可能丢失.你可以在PBO中,使用对应的SET方法来恢复这些选择.功能五:颜色设置有的时候,我们需要在ALV网格上绘上一些颜色.可以给特定的行，某个特定的列,某个特定的单元格绘制颜色.如果某列被设置为关键列,这列的颜色将被自动绘制,而不需要我们额外的指定.先介绍ALV里色码.就是颜色编码,4位CHAR型.Cx y z---Color | | || 1/0: 相反开/关1/0: 强化开/关其中C是固定的第一位,第二位代表是颜色编码(1到7),第三位是加强的设置,第四位是相反,个人理解,在强化关闭的情况下,相反的作用是背景和字体的变化.颜色编码:A)设置列的颜色.我们可以通过字段目录的"emphasize"控制字段来控制某列的颜色.这个字段同样是4位的CHAR型,传入上述的颜色编码.例如:LS_FCAT-EMPHASIZE = 'C701'.如果这列被设置为关键列,就是 LS_FCAT-KEY = 'X' ,那么颜色设置就不会起作用.请注意,自动产生的字段目录中，KEY的设置是自动获取的.B)设置行的颜色为某行设置颜色,是有点复杂的,我们需要在要显示的数据内表中增加一个字段,这个字段不需要在字段目录中存在.同样,这个字段也是4位的CHAR型,符合颜色编码的定义.那我们就需要这样来定义我们的数据内表:DATA BEGIN OF gt_list OCCURS 0 .INCLUDE STRUCTURE SFLIGHT .DATA rowcolor(4) TYPE c .DATA END OF gt_list .很明显，填入颜色编码以后,ALV怎么知道它是我们用来设置颜色的呢,在布局中，有个控制字段"INFO_FNAME",我们可以设置这个字段来告诉ALV,我们的颜色字段是哪个.ps_layout-info_fname = 'ROWCOLOR'.请注意,这个字段随便你起名字,但是记住,一定是数据内表里的字段，而且这边设置的时候一定要大写.你可以在任何时候设置行的颜色,只需要去修改内表里的这个字段的值,但是记得,一定要刷新以后才起作用.C)设置单元格的颜色设置单元格和设置行的颜色,本质上没有什么大的区别,但是定位单元格需要2个参数.我们需要在数据内表中插入一个表类型的字段，这样我们的数据内表就变成了DEEP结构了,不过ALV是可以处理的.不需要担心.插入的这个表类型的类型为"LVC_T_SCOL".里面有3个参数:FNAME告诉我们你需要设置的是哪个字段,如果为空，然后直接在COLOR中设置颜色,就是整行设置为这个颜色.如果具体到某个单元格,必须指定是哪个字段.COLOR字段是用来设置颜色的.NOKEYCOL字段比较关键了.设置为关键列的一些字段,我们的颜色设置可能被覆盖.通过这个字段的设置,可以避免被关键列覆盖.同样,ALV在布局中有个字段"CTAB_FNAME"告诉我们,数据内表中，哪个字段是用来设置单元格的颜色的.DATA BEGIN OF gt_list OCCURS 0 .INCLUDE STRUCTURE SFLIGHT .DATA rowcolor(4) TYPE c .DATA cellcolors TYPE lvc_t_scol .DATA END OF gt_list .DATA ls_cellcolor TYPE lvc_s_scol ....READ TABLE gt_list INDEX 5 .ls_cellcolor-fname = 'SEATSOCC' .ls_cellcolor-color-col = '7' .ls_cellcolor-color-int = '1' .APPEND ls_cellcolor TO gt_list-cellcolors .MODIFY gt_list INDEX 5 .注意:颜色设置中有优先级顺序,他们是单元格--->行--->列.功能六:插入超链接插入超链接是通过一个含有超级链接和句柄的表来实现的.这个表类型为"LVC_T_HYPE" ,句柄是一个INT4类型的字段,我们需要在数据显示的内表中，加入这样的字段，来告诉ALV,我们的字段指定的句柄,从而找到对应的超级链接.在字段目录中,WEB_FIELD是用来指定对应的句柄名的.下面举个例子来说明,我们要为字段CARRID,CONNID建立超级链接:首先,内表定义中，我们加入2个句柄字段:DATA BEGIN OF gt_list OCCURS 0 .INCLUDE STRUCTURE SFLIGHT .DATA rowcolor(4) TYPE c .DATA cellcolors TYPE lvc_t_scol .DATA carrid_handle TYPE int4 .DATA connid_handle TYPE int4 .DATA END OF gt_list .第二: 建立一个超级链接内表,里面存放句柄所对应的超级链接.创建的时候注意,它参考的表类型,一定是"LVC_T_HYPE".FORM prepare_hyperlinks_table CHANGING pt_hype TYPE lvc_t_hype .DATA ls_hype TYPE lvc_s_hype .ls_hype-handle = '1' .ls_hype-href = '/carrids/car1' .APPEND ls_hype TO pt_hype .ls_hype-handle = '2' .ls_hype-href = '/carrids/car1' .APPEND ls_hype TO pt_hype .ls_hype-handle = '3' .ls_hype-href = '/carrids/car1' .APPEND ls_hype TO pt_hype .ls_hype-handle = '4' .ls_hype-href = '/connids/con11' .APPEND ls_hype TO pt_hype .ls_hype-handle = '5' .ls_hype-href = '/connids/con12'APPEND ls_hype TO pt_hype ... ..ENDFORM .第三.通过字段目录FIELDCATLOG来指定相应的句柄字段.对于CARRID的field catalogLs_fieldcat-web_field = …CARRID_HANDLE‟.对于CONNID的field catalogLs_fieldcat-web_field = …CONNID_HANDLE‟.在方法"SET_TABLE_FOR_FIRST_DISPLAY"中把句柄内表传给参数it_hyperlink。

cl_gui_alv_grid例⼦*&---------------------------------------------------------------------**& Report ZTEST032*&*&---------------------------------------------------------------------**&*&*&---------------------------------------------------------------------*REPORT ZTEST032MESSAGE-ID 00.TABLES:SPFLI.CLASS cl_event_handle DEFINITION. "定义事件处理类PUBLIC SECTION."初始化ALV⼯具栏对象事件，如增加按钮并设定属性METHODS handle_toolbar FOR EVENT toolbar OF cl_gui_alv_gridIMPORTING e_object e_interactive."该事件⽤于在下ALV⼯具栏的下拉菜单按钮中增加选项METHODS handle_menu_button FOR EVENT menu_button OF cl_gui_alv_gridIMPORTING e_object e_ucomm."ALV⼯具栏按钮的点击事件METHODS handle_user_command FOR EVENT user_command OF cl_gui_alv_gridIMPORTING e_ucomm."ALV表格双击事件METHODS handle_double_click FOR EVENT double_click OF cl_gui_alv_gridIMPORTING e_row e_column es_row_no."BEFORE ALV⼯具栏按钮的点击事件METHODS handle_before_user_command FOR EVENT BEFORE_USER_COMMAND OF cl_gui_alv_grid IMPORTING e_ucomm."after ALV⼯具栏按钮的点击事件METHODS handle_after_user_command FOR EVENT AFTER_USER_COMMAND OF cl_gui_alv_gridIMPORTING e_ucomm.ENDCLASS.*DATA: gt_itab like TABLE OF spfli WITH HEADER LINE.DATA: BEGIN OF GT_ITAB OCCURS 0.INCLUDE STRUCTURE SPFLI.DATA: cellstyles TYPE lvc_t_styl,color(10).DATA END OF GT_ITAB."Docking容器最⼤特点是在代码中可以动态创建容器，不需要像创建⾃定义容器CL_GUI_CUSTOM_CONTAINER那样，"在创建时需要将其绑定到⼀个预先绘制好的⽤户⾃定义控件区域中DATA: LR_CONTAINER TYPE REF TO CL_GUI_DOCKING_CONTAINER,GR_GRID TYPE REF TO CL_GUI_ALV_GRID,GT_FIELD TYPE LVC_T_FCAT,GS_FIELD TYPE LVC_S_FCAT,GT_SORT TYPE LVC_T_SORT,GS_SORT TYPE LVC_S_SORT,GS_LAYOUT TYPE LVC_S_LAYO,GS_VARIANT TYPE DISVARIANT,gt_cells type LVC_T_CELL,gs_cells type LVC_S_CELL.DATA: event_handle TYPE REF TO cl_event_handle."定义类对象的引⽤DATA: GT_TOOLBAR TYPE UI_FUNCTIONS,L_EXECUTE TYPE UI_FUNC.DATA: gs_toolbar TYPE stb_button.DATA: FLAG(1)."防⽌重复创建容器和实例CALL SCREEN 0100.CLASS cl_event_handle IMPLEMENTATION."事件处理类实现部分METHOD handle_toolbar.gs_toolbar-function = 'B_SUM'."按钮的FunctionCodegs_toolbar-icon = icon_display."按钮图标gs_toolbar-text = '总⾏数'."按钮标签gs_toolbar-butn_type = '0'."定义按钮类型，0为标准按钮APPEND gs_toolbar TO e_object->mt_toolbar."添加按钮到⼯具栏中gs_toolbar-function = 'B_DIS'."按钮的FunctionCodegs_toolbar-icon = icon_display."按钮图标gs_toolbar-text = '选中'."按钮标签gs_toolbar-butn_type = '0'."定义按钮类型，0为标准按钮APPEND gs_toolbar TO e_object->mt_toolbar."添加按钮到⼯具栏中gs_toolbar-function = 'B_LIST'."按钮的FunctionCodegs_toolbar-quickinfo = '⾃定义下拉菜单按钮'."按钮的冒泡提⽰gs_toolbar-icon = icon_biw_report_view."按钮图标gs_toolbar-text = '下拉菜单按钮'."按钮标签gs_toolbar-butn_type = '1'."定义按钮类型，1为下拉菜单按钮APPEND gs_toolbar TO e_object->mt_toolbar."添加下拉菜单按钮到⼯具栏中ENDMETHOD.METHOD handle_menu_button.IF e_ucomm = 'B_LIST'."给下拉菜单按钮增加选项，可以多次调⽤该⽅法以增加多⾏CALL METHOD e_object->add_function EXPORTINGicon = icon_displayfcode = 'B_SUM'"字菜单按钮的FunCodetext = '显⽰ALV总⾏数'.ENDIF.ENDMETHOD.METHOD handle_user_command.DATA: sum TYPE i .IF e_ucomm = 'B_SUM'.DESCRIBE TABLE gt_itab[] LINES sum.MESSAGE i001(00) WITH '当前ALV表格中的数据总⾏数为：' sum.ENDIF.ENDMETHOD.METHOD handle_double_click.READ TABLE gt_itab INTO gt_itab INDEX es_row_no-row_id.MESSAGE i001(00) WITH '当前⾏：' es_row_no-row_id '，航线代码：' gt_itab-carrid.ENDMETHOD.METHOD handle_before_user_command."ALV 也给我们提供了修改标预置按钮功能的机会，为了实现这个⽬的，"我们需要在"before_user_command"事件中截取标准的功能，然后使⽤⽅法""set_user_command"来修改功能码，这样便可以指向⾃⼰定义的功能码DATA: sum TYPE i .if e_ucomm = 'B_SUM'.DESCRIBE TABLE gt_itab[] LINES sum.MESSAGE i001(00) WITH '不是原来的我了，当前ALV表格中的数据总⾏数为：' sum.CALL METHOD gr_grid->set_user_commandEXPORTINGi_ucomm = space.endif.* GR_GRID->REFRESH_TABLE_DISPLAY( )."刷新,不变时，⽆需更新ENDMETHOD.METHOD handle_after_user_command.DATA ls_stylerow TYPE lvc_s_styl.DATA lt_styletab TYPE lvc_t_styl.if e_ucomm = '&MB_VARIANT'.message i001(00) WITH '更改布局'.ELSEIF e_ucomm = 'B_DIS'.GR_GRID->get_frontend_layout(IMPORTINGES_LAYOUT = gs_layout ).GR_GRID->get_selected_cells(IMPORTINGET_CELL = gt_cells[] ).* READ TABLE gt_itab INTO gt_itab INDEX 7.* "需要对第7⾏的CITYFROM列单元格样式进⾏设置* ls_style-fieldname = 'CITYFROM'.* ls_style-style = cl_gui_alv_grid=>mc_style_button."显⽰成按钮形式* APPEND ls_style TO gt_itab-cellstyles.* MODIFY gt_itab FROM gt_itab INDEX 7.* LOOP AT gt_itab[] INTO gt_itab.* if gt_itab-distance < 1000.* gt_itab-color = 'C610'.* endif.* IF gt_itab-carrid = 'AZ'.* ls_stylerow-fieldname = 'DISTANCE'."需对哪列进⾏样式设置* ls_stylerow-style = cl_gui_alv_grid=>mc_style_disabled."样式设置* APPEND ls_stylerow TO lt_styletab.* ENDIF.* IF gt_itab-carrid = 'AA'.* ls_stylerow-fieldname = 'DISTANCE'.* ls_stylerow-style = cl_gui_alv_grid=>mc_style_enabled.* APPEND ls_stylerow TO lt_styletab.* ENDIF.* GT_ITAB-cellstyles = lt_styletab.* modify GT_ITAB[] from GT_ITAB.* clear:lt_styletab[],GT_ITAB.* ENDLOOP.endif.GR_GRID->REFRESH_TABLE_DISPLAY( )."刷新ENDMETHOD.ENDCLASS.*&---------------------------------------------------------------------* *& Module STATUS_0100 OUTPUT *&---------------------------------------------------------------------* * text*----------------------------------------------------------------------* MODULE STATUS_0100 OUTPUT. SET PF-STATUS 'Z0100'.ENDMODULE. " STATUS_0100 OUTPUT*&---------------------------------------------------------------------* *& Module USER_COMMAND_0100 INPUT *&---------------------------------------------------------------------* * text*----------------------------------------------------------------------* MODULE USER_COMMAND_0100 INPUT. CASE SY-UCOMM.WHEN 'EXECUTE'.if spfli-CARRID = space AND spfli-COUNTRYFR = SPACE.SELECT*FROM spfliINTO CORRESPONDING FIELDS OF TABLE gt_itab.else.SELECT*FROM spfliINTO CORRESPONDING FIELDS OF TABLE gt_itabWHERE CARRID = spfli-CARRID.* AND COUNTRYFR LIKE spfli-COUNTRYFR.endif.DATA ls_stylerow TYPE lvc_s_styl.DATA lt_styletab TYPE lvc_t_styl.LOOP AT gt_itab[] INTO gt_itab.if gt_itab-distance < 1000.gt_itab-color = 'C610'.endif.IF gt_itab-carrid = 'AZ'.ls_stylerow-fieldname = 'DISTANCE'."需对哪列进⾏样式设置ls_stylerow-style = cl_gui_alv_grid=>mc_style_disabled."样式设置APPEND ls_stylerow TO lt_styletab.ENDIF.IF gt_itab-carrid = 'AA'.ls_stylerow-fieldname = 'DISTANCE'.ls_stylerow-style = cl_gui_alv_grid=>mc_style_enabled.APPEND ls_stylerow TO lt_styletab.ENDIF.GT_ITAB-cellstyles = lt_styletab.modify GT_ITAB[] from GT_ITAB.clear:lt_styletab[],GT_ITAB.ENDLOOP.IF FLAG = ''."防⽌重复创建容器和实例PERFORM ALV_DISPLAY.FLAG = 'X'.ENDIF.WHEN 'EXIT'.LEAVE PROGRAM.WHEN 'BACK' OR 'CANCLE'.LEAVE TO SCREEN 0.ENDCASE.GR_GRID->REFRESH_TABLE_DISPLAY( )."刷新ENDMODULE. " USER_COMMAND_0100 INPUT*&---------------------------------------------------------------------**& Form ALV_DISPLAY*&---------------------------------------------------------------------** text*----------------------------------------------------------------------** --> p1 text* <-- p2 text*----------------------------------------------------------------------*FORM ALV_DISPLAY .PERFORM GET_FIELD.CREATE OBJECT LR_CONTAINEREXPORTINGside = cl_gui_docking_container=>dock_at_RIGHTREPID = SY-REPIDDYNNR = '0100'EXTENSION = 1100.CREATE OBJECT GR_GRIDEXPORTINGI_PARENT = LR_CONTAINER.CREATE OBJECT :event_handle."为ALV按钮注册监听事件SET HANDLER :event_handle->handle_toolbar FOR GR_GRID,event_handle->handle_menu_button FOR GR_GRID,event_handle->handle_user_command FOR GR_GRID,event_handle->handle_double_click FOR GR_GRID,event_handle->handle_before_user_command FOR GR_GRID,event_handle->handle_after_user_command FOR GR_GRID."调⽤此⽅法才能激活⼯具栏上增加的⾃定义按钮* CALL METHOD GR_GRID->set_toolbar_interactive.GR_GRID->SET_TABLE_FOR_FIRST_DISPLAY(EXPORTING* I_STRUCTURE_NAME = 'SPFLI'I_SAVE = 'A'IS_VARIANT = GS_VARIANTIS_LAYOUT = GS_LAYOUT* IT_TOOLBAR_EXCLUDING = GT_TOOLBARCHANGINGIT_OUTTAB = gt_itab[]IT_FIELDCATALOG = GT_FIELD[]IT_SORT = GT_SORT[]).ENDFORM. " ALV_DISPLAY*&---------------------------------------------------------------------* *& Form GET_FIELD *&---------------------------------------------------------------------* * text*----------------------------------------------------------------------* * --> p1 text* <-- p2 text*----------------------------------------------------------------------* FORM GET_FIELD . DEFINE GET_FIELD.GS_FIELD-FIELDNAME = &1.* GS_FIELD-TXT_FIELD = &2.GS_FIELD-REF_FIELD = &2.GS_FIELD-REF_TABLE = &3.APPEND GS_FIELD TO GT_FIELD.CLEAR:GS_FIELD.END-OF-DEFINITION.GET_FIELD 'MANDT' 'MANDT' 'SPFLI' .GET_FIELD 'CARRID' 'CARRID' 'SPFLI'.GET_FIELD 'CONNID' 'CONNID' 'SPFLI'.GET_FIELD 'COUNTRYFR' 'COUNTRYFR' 'SPFLI'.GET_FIELD 'CITYFROM' 'CITYFROM' 'SPFLI'.GET_FIELD 'AIRPFROM' 'AIRPFROM' 'SPFLI'.GET_FIELD 'COUNTRYTO' 'COUNTRYTO' 'SPFLI'.GET_FIELD 'CITYTO' 'CITYTO' 'SPFLI'.GET_FIELD 'AIRPTO' 'AIRPTO' 'SPFLI'.GET_FIELD 'FLTIME' 'FLTIME' 'SPFLI'.GET_FIELD 'DEPTIME' 'DEPTIME' 'SPFLI'.GET_FIELD 'ARRTIME' 'ARRTIME' 'SPFLI'.GET_FIELD 'DISTANCE' 'DISTANCE' 'SPFLI'.GET_FIELD 'DISTID' 'DISTID' 'SPFLI'.GET_FIELD 'FLTYPE' 'FLTYPE' 'SPFLI'.GET_FIELD 'PERIOD' 'PERIOD' 'SPFLI'."变式save保存模式GS_VARIANT-REPORT = sy-repid."选择⽅式GS_LAYOUT-SEL_MODE = 'D'.GS_LAYOUT-CWIDTH_OPT = 'X'.gs_layout-stylefname = 'CELLSTYLES'."cellstylesgs_layout-info_fname = 'COLOR'."指定存放颜⾊字段* "隐藏⼯具栏中预置按钮（IT_TOOLBAR_EXCLUDING参数接⼝）* L_EXECUTE = CL_GUI_ALV_GRID=>MC_FC_SAVE_VARIANT.* APPEND L_EXECUTE TO GT_TOOLBAR.* L_EXECUTE = CL_GUI_ALV_GRID=>MC_FC_MAINTAIN_VARIANT. * APPEND L_EXECUTE TO GT_TOOLBAR. ENDFORM. " GET_FIELD。

Component Component Type Data Type Length Decimal PI .INCLUDE ALV_S_LAYO00 1ZEBRA LVC_ZEBRA CHAR10 2EDIT LVC_EDIT CHAR10 3EDIT_MODE LVC_EDMO CHAR10 4NO_KEYFIX LVC_NOKFIX CHAR10 5FRONTEND LVC_FRONT CHAR10 6OBJECT_KEY BDS_TYPEID CHAR700 7DOC_ID BDS_DOCID CHAR420 8TEMPLATE BDS_FILENA CHAR2550 9LANGUAGE LANG LANG10 10GRAPHICS GUID_32CHAR320 11SMALLTITLE LVC_TITSZ CHAR10 12NO_HGRIDLN LVC_HGRID CHAR10 13NO_VGRIDLN LVC_VGRID CHAR10 14NO_HEADERS LVC_HEADS CHAR10 15NO_MERGING LVC_MERGE CHAR10 16CWIDTH_OPT LVC_CWO CHAR10 17TOTALS_BEF LVC_TOTBEF CHAR10 18NO_TOTARR CHAR01CHAR10 19NO_TOTEXP CHAR01CHAR10 20NO_ROWMOVECHAR01CHAR10 21NO_ROWINS CHAR01CHAR10 22NO_COLEXPD CHAR01CHAR10 23NO_F4CHAR01CHAR10 24COUNTFNAME LVC_FNAME CHAR300 25COL_OPT CHAR01CHAR10 26VAL_DATA CHAR01CHAR10 27.INCLUDE LVC_S_L00100 28STYLEFNAME LVC_FNAME CHAR300 29.INCLUDE LVC_S_L00200 30NO_ROWMARKLVC_ROWMK CHAR10 31NO_TOOLBAR LVC_TOOLB CHAR10 32GRID_TITLE LVC_TITLE CHAR700 33SEL_MODE LVC_LIBOX CHAR10 34BOX_FNAME LVC_FNAME CHAR300 35SGL_CLK_HD LVC_SGLCLH CHAR10 36.INCLUDE LVC_S_L00300 37NO_TOTLINE LVC_NOTOTL CHAR10 38NUMC_TOTAL LVC_NUMCTO CHAR10 39NO_UTSPLIT LVC_UNITSP CHAR10 40.INCLUDE LVC_S_L00400 41EXCP_FNAME LVC_EXFNM CHAR300 42EXCP_ROLLN LVC_EXROL CHAR300 43EXCP_CONDS LVC_EXCON CHAR10 44EXCP_LED LVC_EXLED CHAR10 45EXCP_GROUP LVC_EXGRP CHAR10 46.INCLUDE LVC_S_L00500 47DETAILINIT LVC_DETINI CHAR1048DETAILTITL LVC_DETTIT CHAR600 49KEYHOT LVC_KEYHOT CHAR10 50NO_AUTHOR LVC_NOAUTH CHAR10 51XIFUNCKEY AQS_XIKEY CHAR300 52XIDIRECT FLAG CHAR10 53S_DRAGDROP LVC_S_DD0100 54.INCLUDE LVC_S_L00600 55INFO_FNAME LVC_CIFNM CHAR300 56CTAB_FNAME LVC_CTFNM CHAR300 57.INCLUDE LVC_S_LOO800 58WEBLOOK LVC_LOOK CHAR100 59WEBSTYLE LVC_STYLE RAW40 60WEBROWS LVC_WEBROW INT4100 61WEBXWIDTH INT4INT4100 62WEBXHEIGHT INT4INT4100 636465666768697071727374757677787980818283848586878889909192939495Short DescriptionLayout (for LVC and for KKBLO)ALV control: 可选行颜色,如果设置了,出现了间隔色带 SPACE, 'XALV control: Ready for inputALV control: Edit modeALV control: Do not fix key columnsALV control: Excel, Crystal or ALVBusiness Document Service: Object keyBusiness Document Service: Document IDBusiness Document Service: File names语言 IDGUID in 'CHAR' Format in UppercaseALV control: 小标题,如果设置了这个字段,则标题与列标题大小一样 SPACE, 'X' ALV control: 隐藏水平线 SPACE, 'X'ALV control: 隐藏垂直线 SPACE, 'X'ALV control: 如果被设置,列标题隐藏 SPACE, 'XALV control: 禁用单元格合并 SPACE, 'X'ALV control: 最优化宽度 SPACE, 'X'ALV control: 总计输出在第一行,小计在新的值之前 SPACE, 'X'Character Field Length 1Character Field Length 1Character Field Length 1Character Field Length 1Character Field Length 1Character Field Length 1ALV control: Field name of internal table fieldCharacter Field Length 1Character Field Length 1ALV control: General display optionsALV control: 设置单元格,比如PUSHBUTTON 最长30个字符ALV control: Grid customizingALV control: 如果被设置,选择列在选择模式:为D和A的时候隐藏 SPACE, 'X' ALV control: 隐藏工具条 SPACE, 'X'ALV Control: 标题,在网格和工具条之间最长70个字符ALV control: 选择模式 SPACE, 'A', 'B', 'C', 'D'ALV control: Field name of internal table fieldALV control: SingleClick on column headerALV control: Totals optionsALV control: 没有总计 SPACE, 'X'ALV control: 可以对NUMC字段进行合计 SPACE, 'X'ALV control: Split totals lines by unitALV control: ExceptionsALV control: 字段名称带有例外编码最长30个字符ALV control: 例外文档的数据元素 SPACE, 'X'ALV control: 合计例外 SPACE, 'X'ALV control: 例外作为 LED SPACE, 'X'ALV Control: Exception GroupALV control: Interactive controlALV control: Display initial values on detail screenALV control: Title bar of detail screenALV control: Key columns as hotspotALV control: Do not perform ALV standard authority checkSAP Query (S): Name of additional functionGeneral FlagALV control: Drag&Drop control settingsALV control: ColorsALV control: 带有简单行彩色代码的字段名称最长30个字符ALV control: 带有复杂单元格颜色编码的字段名称最长30个字符ALV control: Web optionsALV control: Web lookALV control: StyleALV control: Number of lines to be displayed in the WebNatural NumberNatural Number。

ALV_GRID_CONTROL详解⼀.ALV介绍 (2)⼆.ALV GRID CONTROL (ALV⽹格控制器) (2)三.ALV GRID CONTROL 实例 (2)四、ALV GRID相关的⼏个控制结构 (3)1.字段⽬录[Field catalog] (3)2.布局控制[layout] (5)3.打印和排序,过滤控制 (6)五.编写简单的ALV程序. (6)⾸先ALV的显⽰需要有⼏个先决条件. (7)第⼀步:创建个SCREEN,在屏幕上创建个容器,CONTAINER.定义变量 (7)第⼆步: 创建ALV这个对象，它的⽗组件是那个容器. (7)第三步,获取要显⽰数据的字段⽬录. (10)第四步,设置布局 (11)第五步,排除不需要的标准按钮 (11)⽅法: (12)功能⼀:在第⼀次显⽰以后,修改字段⽬录和布局. (12)功能⼆:设置排序条件 (12)功能三:设置过滤(和排序类似) (13)功能四:选择⽅式 (13)功能五:颜⾊设置 (14)功能六:插⼊超链接 (16)功能七:把字段设置为下拉 (17)基于事件的附加功能 (18)定义事件处理类. (19)类的实现的⼀些概要代码 (20)把事件管理类注册到ALV GRID的实例事 (21)1.热点事件(单击事件) (22)2.双击事件 (22)3.添加⾃定义的按钮和响应命令 (23)4.覆盖标准的功能. (25)5.设置单元格的风格 (25)6. 控制数据变化 (27)⼀.ALV介绍The ALV Grid Control (ALV = S A P L ist V iewer)是⼀个显⽰列表的灵活的⼯具,它提供了基本功能的列表操作,也可以通过⾃定义来进⾏增强,因此可以允许你可以在⼤型的应⽤程序中使⽤.SAP提⽰: 在SAP的开发项⽬中,ALV GRID也可以作为修改和创建数据的⼀种⼯具,然⽽,⽬前这个功能只在实验计划中使⽤,还没有向客户发布.下⾯是⼀个ALV GRID的图⽚:它包括3⼤部分,⼯具栏,标题,⽤于显⽰数据的⽹格控制器.如果有必要，⽤户可以隐藏标题和⼯具栏.ALV家族包含3种ALV⼯具:简易的,两层ALV,分等级连续的列表和树形结构的ALV.⼆.ALV GRID CONTROL (ALV⽹格控制器)ALV GRID CONTROL使⽤了控制器技术以实现艺术性的屏幕显⽰,象所有的控制器⼀样，ALV GRID CONTROL通过系统中的⼀个全局的类提供了⽅法,以响应它的动作.使⽤了ABAP的对象以后,列表是通过ALV的⼀个实例(INSTANCE)来显⽰的,程序员可以使⽤ABAP对象的事件管理. 三.ALV GRID CONTROL 实例ALV GRID实例的定义,参照CL_GUI_ALV_GRID类data ALV_GRID1 type ref to cl_gui_alv_grid.ALV GRID继承结构:四、ALV GRID相关的⼏个控制结构1.字段⽬录 [Field catalog]字段⽬录是⽤来控制ALV显⽰的⽹格中每个字段的属性的,⽐如字段的顺序,对齐⽅式,可编辑状态,颜⾊,等等.常⽤的控制字段如下:(下⾯的⽰例将说明这些字段的使⽤,参考STRUCTURE LVC_S_FCAT)2.布局控制[layout]布局是⽤来控制整个ALV的⼀个布局，⽐如ALV的标题,是否可编辑,⾏颜⾊,列颜⾊.参照ALV的控制结构[LVC_S_LAYO],以后的例⼦我将详细介绍如何设置⾏颜⾊和列颜⾊. 详细的结构说明3.打印和排序,过滤控制打印的参数控制请参考结构[LVC_S_PRNT]排序的参数控制请参考结构[LVC_S_SORT]过滤的参数控制请参考结构[LVC_S_FILT]这⾥不再⼀⼀解释,进⼊中⽂版本,⾥⾯应该也有解释的,虽然⼀些不是很清楚.五.编写简单的ALV程序.⾸先这⾥就不详细介绍DIALOG的⽤法了.OO的ALV GRID必须存在于⼀个容器当中,就是FUNCTION的ALV,其实也是⼀样的,底层也是使⽤CL_GUI_ALV_GRID 这个类的.⾸先ALV的显⽰需要有⼏个先决条件.1,字段⽬录,这个是必须的,如果没有这个参数,参考⼀个数据字典也是可以的,就是参数I_STRUCTURE_NAME.2.存放数据的内表,最好内表的结构和字段⽬录是⼀致的,否则可能会出现⼀些⽆法预知的错误,当然你说我⾮要不⼀样,那也不⼀定会出现错误.我建议是最好⼀样的.这2个是必须的,布局的话,应该是可以不设置的,使⽤默认的就可以了.第⼀步:创建个SCREEN,在屏幕上创建个容器,CONTAINER.定义变量.DATA: wcl_container TYPE REF TO cl_gui_custom_container,wcl_alv TYPE REF TO cl_gui_alv_grid .*--- 存放字段⽬录的内表DATA gt_fieldcat TYPE lvc_t_fcat .*--- 布局结构DATA gs_layout TYPE lvc_s_layo .*----声明需要显⽰的内表(以SFLIGHT为例)DATA BEGIN OF gt_list OCCURS0 .INCLUDE STRUCTURE sflight .DATA END OF gt_list .第⼆步: 创建ALV这个对象，它的⽗组件是那个容器.在PBO中写⼊如下代码:PROCESS BEFORE OUTPUT .MODULE display_alv .创建DISPLAY_ALV的MODULE后,写下如下代码:MODULE display_alv OUTPUT .PERFORM display_alv .ENDMODULE . "display_alv OUTPUT在FORM DISPLAY_ALV中,判断ALV实例是否存在,如果不存在,则创建:FORM display_alv .IF wcl_alv IS INITIAL .CREATE OBJECT: wcl_containerEXPORTINGcontainer_name = 'ALV_CON'.CREATE OBJECT wcl_alvEXPORTINGi_parent = wcl_container.*-----准备获取字段⽬录PERFORM prepare_field_catalog CHANGING gt_fieldcat .*-----设置布局PERFORM prepare_layout CHANGING gs_layout .*-----显⽰alvCALL METHOD gr_alvgrid->set_table_for_first_display EXPORTING * I_BUFFER_ACTIVE =* I_CONSISTENCY_CHECK =* I_STRUCTURE_NAME =* IS_VARIANT =* I_SAVE =* I_DEFAULT = 'X'is_layout = gs_layout* IS_PRINT =* IT_SPECIAL_GROUPS =* IT_TOOLBAR_EXCLUDING =* IT_HYPERLINK =CHANGINGit_outtab = gt_list[]it_fieldcatalog = gt_fieldcat* IT_SORT =* IT_FILTER =EXCEPTIONSinvalid_parameter_combination = 1program_error = 2too_many_lines = 3OTHERS = 4 .ELSE .*----刷新alvCALL METHOD gr_alvgrid->refresh_table_display* EXPORTING* IS_STABLE =* I_SOFT_REFRESH =EXCEPTIONSfinished = 1OTHERS = 2 .IF sy-subrc <> 0.*--异常处理ENDIF.ENDIF .ENDFORM. "display_alv⽅法"set_table_for_first_display"的参数说明⽅法"REFRESH_TABLE_DISPLAY"的参数说明第三步,获取要显⽰数据的字段⽬录.有两种⽅式.1.⼿动创建FORM prepare_field_catalog CHANGING pt_fieldcat TYPE lvc_t_fcat . DATA ls_fcat type lvc_s_fcat .ls_fcat-fieldname = 'CARRID' .ls_fcat-inttype = 'C' .ls_fcat-outputlen = '3' .ls_fcat-coltext = 'Carrier ID' .ls_fcat-seltext = 'Carrier ID' .APPEND ls_fcat to pt_fieldcat .CLEAR ls_fcat .ls_fcat-fieldname = 'CONNID' .ls_fcat-ref_table = 'SFLIGHT' .ls_fcat-ref_table = 'CONNID' .ls_fcat-outputlen = '3' .ls_fcat-coltext = 'Connection ID' .ls_fcat-seltext = 'Connection ID' .APPEND ls_fcat to pt_fieldcat .ENDFORM .2.半⾃动的创建FORM prepare_field_catalog CHANGING pt_fieldcat TYPE lvc_t_fcat . DATA ls_fcat type lvc_s_fcat .CALL FUNCTION'LVC_FIELDCATALOG_MERGE'EXPORTINGi_structure_name = 'SFLIGHT'CHANGINGct_fieldcat = pt_fieldcat[]EXCEPTIONSinconsistent_interface = 1program_error = 2OTHERS = 3.IF sy-subrc <> 0.*--Exception handlingENDIF.LOOP AT pt_fieldcat INTO ls_fcat .CASE pt_fieldcat-fieldname .WHEN'CARRID' .ls_fcat-outpulen = '10' .ls_fcat-coltext = 'Airline Carrier ID' .MODIFY pt_fieldcat FROM ls_fcat .WHEN'PAYMENTSUM' .ls_fcat-no_out = 'X' .MODIFY pt_fieldcat FROM ls_fcat .ENDCASE .ENDLOOP .ENDFORM . "prepare_field_catalog第四步,设置布局FORM prepare_layout CHANGING ps_layout TYPE lvc_s_layo.ps_layout-zebra = 'X' .ps_layout-grid_title = 'Flights' .ps_layout-smalltitle = 'X' .ENDFORM. " prepare_layout第五步,排除不需要的标准按钮(可选,这个是第⼀种⽅法,还有另外⼀种，在添加⾃定义的按钮的时候介绍)在你的ALV上，如果你想排除⼀些你不想要的标准按钮,你可以把需要排除的按钮填⼊到表UI_FUNCTIONS中,然后传给set_table_for_first_display⽅法的参数"IT_TOOLBAR_EXCLUDING".这些按钮的功能码⼀般都可以通过查看类cl_gui_alv_grid的常量属性中获取到,或者⾃⼰加个断点，在after_user_command事件中.如果你要隐藏全部的⼯具条,你可以把layout中的no_toolbar设置为"X".FORM exclude_tb_functions CHANGING pt_exclude TYPE ui_functions .DATA ls_exclude TYPE ui_func.ls_exclude = cl_gui_alv_grid=>mc_fc_maximum .APPEND ls_exclude TO pt_exclude.ls_exclude = cl_gui_alv_grid=>mc_fc_minimum .APPEND ls_exclude TO pt_exclude.ls_exclude = cl_gui_alv_grid=>mc_fc_subtot .APPEND ls_exclude TO pt_exclude.ls_exclude = cl_gui_alv_grid=>mc_fc_sum .APPEND ls_exclude TO pt_exclude.ls_exclude = cl_gui_alv_grid=>mc_fc_average .APPEND ls_exclude TO pt_exclude.ls_exclude = cl_gui_alv_grid=>mc_mb_sum .APPEND ls_exclude TO pt_exclude.ls_exclude = cl_gui_alv_grid=>mc_mb_subtot .ENDFORM .⽅法:按照上⾯的步骤,⼀个ALV的DEMO基本可以创建了.下⾯我们将讲述⼀些功能.功能⼀:在第⼀次显⽰以后,修改字段⽬录和布局.在运⾏的时候,很有可能需要在显⽰之后,需要设置⼀个新的布局或者字段⽬录.有下⾯这些⽅法去实现.字段⽬录: get_frontend_fieldcatalogset_frontend_fieldcatalog布局:get_frontend_layoutset_frontend_layout使⽤这些⽅法,你在执⾏的任何时候,可以获取这些内容,然后修改他们.DATA ls_fcat TYPE lvc_s_fcat .DATA lt_fcat TYPE lvc_t_fcat .DATA ls_layout TYPE lvc_s_layo .CALL METHOD gr_alvgrid->get_frontend_fieldcatalogIMPORTINGet_fieldcatalog = lt_fcat[].LOOP AT lt_fcat INTO ls_fcat .IF ls_fcat-fieldname = 'PAYMENTSUM' .ls_fcat-no_out = space .MODIFY lt_fcat FROM ls_fcat .ENDIF .ENDLOOP .CALL METHOD gr_alvgrid->set_frontend_fieldcatalogEXPORTINGit_fieldcatalog = lt_fcat[].CALL METHOD gr_alvgrid->get_frontend_layoutIMPORTINGes_layout = ls_layout.ls_layout-grid_title = 'Flights (with Payment Sums)' .CALL METHOD gr_alvgrid->set_frontend_layoutEXPORTINGis_layout = ls_layout.功能⼆:设置排序条件有时候我们需要使⽤到数据的排序.这个可以通过填充参考结构LVC_T_SORT创建的内表来实现，这个内表中包含了排序的标准.可以传递给set_table_for_first_display这个⽅法的IT_SORT参数来初始化⼀个排序.FORM prepare_sort_table CHANGING pt_sort TYPE lvc_t_sort .DATA ls_sort TYPE lvc_s_sort .ls_sort-spos = '1' .ls_sort-fieldname = 'CARRID' .ls_sort-up = 'X' . "A to Zls_sort-down = space .APPEND ls_sort TO pt_sort .ls_sort-spos = '2' .ls_sort-fieldname = 'SEATSOCC' .ls_sort-up = space .ls_sort-down = 'X' . "Z to AAPPEND ls_sort TO pt_sort .ENDFORM. " prepare_sort_table这有2点特别的说明:1.如果这边排序的字段名，不存在于字段⽬录中，那将出现DUMP.2.排序以后,垂直的⽹格中，如果出现相同的内容,就会合并，如果要避免,请在布局中设置"no_merging"为"X" .你可以通过使⽤⽅法“get_sort_criteria” 和“set_sort_criteria”来获取和设置排序的标准.功能三:设置过滤(和排序类似)ALV的标准按钮中已经有过滤的功能,我们也可以在初始显⽰的时候就设置过滤条件.我们需要把过滤条件填充到参考表类型"LVC_T_FILT"创建的内表中.过滤条件是类似⼀个RANGES结构的.然后把这个内表传递给⽅法"SET_TABLE_FOR_FIRST_DISPLAY"中的参数"IT_FILTER"FORM prepare_filter_table CHANGING pt_filt TYPE lvc_t_filt .DATA ls_filt TYPE lvc_s_filt .ls_filt-fieldname = 'FLDATE' .ls_filt-sign = 'E' .ls_filt-option = 'BT' .ls_filt-low = '20030101' .ls_filt-high = '20031231' .APPEND ls_filt TO pt_filt .ENDFORM. " preparefiltertable我们可以使⽤"get_filter_criteria" 和"set_filter_criteria"来获取过滤条件和设置过滤条件.功能四:选择⽅式有时候，我们需要选择⼀些单元格,⾏或者列,在布局中，有个参数"SEL_MODE"可以设置我们不同的选择⽅式.下⾯是参数的介绍.和不同的地⽅.注意:1.如果你设置了ALV是可编辑的,可能会覆盖你在布局中选择⽅式的设置的.2.设置了选择⽅式以后,我们可以使⽤很多⽅法来获取⽤户的选择.⽐如"GET_SELECTED_CELLS","GET_SELECTED_CELLS_ID", "GET_SELECTED_ROWS","GET_SELECTED_COLUMNS"3.在执⾏PAI以后,⽤户所选择的单元格,⾏或者列可能丢失.你可以在PBO中,使⽤对应的SET⽅法来恢复这些选择.功能五:颜⾊设置有的时候,我们需要在ALV⽹格上绘上⼀些颜⾊.可以给特定的⾏，某个特定的列,某个特定的单元格绘制颜⾊.如果某列被设置为关键列,这列的颜⾊将被⾃动绘制,⽽不需要我们额外的指定.先介绍ALV⾥⾊码.就是颜⾊编码,4位CHAR型.Cx y z------------------------------------------Color | | || 1/0: 相反开/关1/0: 强化开/关其中C是固定的第⼀位,第⼆位代表是颜⾊编码(1到7),第三位是加强的设置,第四位是相反,个⼈理解,在强化关闭的情况下,相反的作⽤是背景和字体的变化.颜⾊编码:A)设置列的颜⾊.我们可以通过字段⽬录的"emphasize"控制字段来控制某列的颜⾊.这个字段同样是4位的CHAR型,传⼊上述的颜⾊编码.例如:LS_FCAT-EMPHASIZE = 'C701'.如果这列被设置为关键列,就是 LS_FCAT-KEY = 'X' ,那么颜⾊设置就不会起作⽤.请注意,⾃动产⽣的字段⽬录中，KEY的设置是⾃动获取的.B)设置⾏的颜⾊为某⾏设置颜⾊,是有点复杂的,我们需要在要显⽰的数据内表中增加⼀个字段,这个字段不需要在字段⽬录中存在.同样,这个字段也是4位的CHAR型,符合颜⾊编码的定义.那我们就需要这样来定义我们的数据内表:DATA BEGIN OF gt_list OCCURS0 .INCLUDE STRUCTURE SFLIGHT .DATA rowcolor(4) TYPE c .DATA END OF gt_list .很明显，填⼊颜⾊编码以后,ALV怎么知道它是我们⽤来设置颜⾊的呢,在布局中，有个控制字段"INFO_FNAME",我们可以设置这个字段来告诉ALV,我们的颜⾊字段是哪个.ps_layout-info_fname = 'ROWCOLOR'.请注意,这个字段随便你起名字,但是记住,⼀定是数据内表⾥的字段，⽽且这边设置的时候⼀定要⼤写.你可以在任何时候设置⾏的颜⾊,只需要去修改内表⾥的这个字段的值,但是记得,⼀定要刷新以后才起作⽤.C)设置单元格的颜⾊设置单元格和设置⾏的颜⾊,本质上没有什么⼤的区别,但是定位单元格需要2个参数.我们需要在数据内表中插⼊⼀个表类型的字段，这样我们的数据内表就变成了DEEP结构了,不过ALV是可以处理的.不需要担⼼.插⼊的这个表类型的类型为"LVC_T_SCOL".⾥⾯有3个参数:FNAME告诉我们你需要设置的是哪个字段,如果为空，然后直接在COLOR中设置颜⾊,就是整⾏设置为这个颜⾊.如果具体到某个单元格,必须指定是哪个字段.COLOR字段是⽤来设置颜⾊的.NOKEYCOL字段⽐较关键了.设置为关键列的⼀些字段,我们的颜⾊设置可能被覆盖.通过这个字段的设置,可以避免被关键列覆盖.同样,ALV在布局中有个字段"CTAB_FNAME"告诉我们,数据内表中，哪个字段是⽤来设置单元格的颜⾊的.DATA BEGIN OF gt_list OCCURS0 .INCLUDE STRUCTURE SFLIGHT .DATA rowcolor(4) TYPE c .DATA cellcolors TYPE lvc_t_scol .DATA END OF gt_list .DATA ls_cellcolor TYPE lvc_s_scol ....READ TABLE gt_list INDEX5 .ls_cellcolor-fname = 'SEATSOCC' .ls_cellcolor-color-col = '7' .ls_cellcolor-color-int = '1' .APPEND ls_cellcolor TO gt_list-cellcolors .MODIFY gt_list INDEX5 .注意:颜⾊设置中有优先级顺序,他们是单元格--->⾏--->列.功能六:插⼊超链接插⼊超链接是通过⼀个含有超级链接和句柄的表来实现的.这个表类型为"LVC_T_HYPE" ,句柄是⼀个INT4类型的字段,我们需要在数据显⽰的内表中，加⼊这样的字段，来告诉ALV,我们的字段指定的句柄,从⽽找到对应的超级链接.在字段⽬录中,WEB_FIELD是⽤来指定对应的句柄名的.下⾯举个例⼦来说明,我们要为字段CARRID,CONNID建⽴超级链接:⾸先,内表定义中，我们加⼊2个句柄字段:DATA BEGIN OF gt_list OCCURS0 .INCLUDE STRUCTURE SFLIGHT .DATA rowcolor(4) TYPE c .DATA cellcolors TYPE lvc_t_scol .DATA carrid_handle TYPE int4 .DATA connid_handle TYPE int4 .DATA END OF gt_list .第⼆: 建⽴⼀个超级链接内表,⾥⾯存放句柄所对应的超级链接.创建的时候注意,它参考的表类型,⼀定是"LVC_T_HYPE". FORM prepare_hyperlinks_table CHANGING pt_hype TYPE lvc_t_hype .DATA ls_hype TYPE lvc_s_hype .ls_hype-handle = '1' .ls_hype-href = '/doc/92c7786f1eb91a37f1115c8d.html /carrids/car1' .APPEND ls_hype TO pt_hype .ls_hype-handle = '2' .ls_hype-href = '/doc/92c7786f1eb91a37f1115c8d.html /carrids/car1' .APPEND ls_hype TO pt_hype .ls_hype-handle = '3' .ls_hype-href = '/doc/92c7786f1eb91a37f1115c8d.html /carrids/car1' .APPEND ls_hype TO pt_hype .ls_hype-handle = '4' .ls_hype-href = '/doc/92c7786f1eb91a37f1115c8d.html /connids/con11' .APPEND ls_hype TO pt_hype .ls_hype-handle = '5' .ls_hype-href = '/doc/92c7786f1eb91a37f1115c8d.html /connids/con12'APPEND ls_hype TO pt_hype ... ..ENDFORM .第三.通过字段⽬录FIELDCATLOG来指定相应的句柄字段.对于CARRID的field catalogLs_fieldcat-web_field = 'CARRID_HANDLE'.对于CONNID的field catalogLs_fieldcat-web_field = 'CONNID_HANDLE’.在⽅法"SET_TABLE_FOR_FIRST_DISPLAY"中把句柄内表传给参数it_hyperlink。

1)颜色含义1:海蓝;2:浅清;3:黄色;4:浅蓝;5:青色;6:红色;7:橙色。

(1)首位为主颜色;(2)次位为辅助颜色;(3)末位为0时,表示首位数字表为表格的底色;末位为1时,则表示以1为底色,首位数字则表为表格字体的颜色;末位为其它颜色时,则表示底色为ALV的默认颜色;以上三条是本人大概总结出来的规律,本人发现的现象基本如上,但也不一定全部正确。

其中C200与系统标准ALV底色比较相似;C410与系统标准关键字颜色比较相似。

2)列颜色:设置ALV字段fieldcat属性:i_fieldcat-emphasize = &3. "颜色把fieldcat属性写入属性内表allfields:alv_append_field 'WERKS' '工厂' 'C110'.C110:为颜色代码; 3)行颜色:(1)在内表itab定义一个字段line_color来存储颜色;loop内表itab,在需要显示颜色的行其值赋为颜色'C110';(2)在定义alv显示格式定义:设置ALV显示layout属性:i_layout-info_fieldname = 'LINE_COLOR',line_color为内表定义的存储颜色的列名。

4)单元格颜色单元格颜色属性:LVC_S_SCOL,该属性为一结构,含三个字段:FNAME(30)、COLOR(颜色结构,含三个字段:col(10)、int(3)、inv(10))、NOKEYCOL(1)(覆盖码颜色)ALV列属性: coltab_fieldnameexa:定义内表itab含字段FLDNAME type LVC_S_SCOL;定义单元格颜色结构cellcolor type LVC_S_SCOL;循环内表,当要设置单元格颜色所在的列字段colname要设置颜色时fldname-FNA ME = ‘COLNAME’fldname-COLOR-col = ‘2’(颜色代码)fldname-COLOR-int = ‘1’fldname-COLOR-inv = ‘0’。

ALV学习资料SAP提供一组ALV（ABAP LIST VIEWER）功能模块，这些功能模块可以修饰报表输出。

这些设置的ALV功能可以提高报表的可读性。

首先呢，我先跟大家说一下ALV是什么东西？ALV=SAP LIST VIEWER，SAP列表显示器。

就目前ALV技术主要分ALV GRID 和ALV TREE。

先跟大家说一下目前本人用的比较多的ALV GRID技术，ALV GRID 的效果见图（1.1）。

图（1.1）第一步在使用ALV时，需要定义一个SAP标准TYPE-POOLS，具体语法为：TYPE-POOLS: SLIS.然后需要定义一个LAYOUT式样，和一个FIELDCAT字段格式，具体语法为：DATA: LIT_FCAT TYPE SLIS_T_FIELDCAT_ALV,LT_LAYO TYPE SLIS_LAYOUT_ALV,GIT_EVENTS TYPE SLIS_T_EVENT,GIT_LISTHEADER TYPE SLIS_T_LISTHEADER.,LIT_EXTAB TYPE SLIS_T_EXTAB.第二步（可选）可以为需要为最初的目录显示选择参数。

在这里需要使用函数‘'REUSE_ALV_V ARIANT_DEFAULT_GET’Sample code:CALL FUNCTION 'REUSE_ALV_V ARIANT_DEFAULT_GET'EXPORTINGi_save = variant save condition ( A=all, U = user-specific )CHANGINGcs_variant = internal table containing the program name (and the defaultvariant---optional )EXCEPTIONSnot_found = 2.使用者也可以使用现有的变量中选择，使用函数‘REUSE_ALV_V ARIANT_F4’。

*--实现用户命令Handle_user_commandFOR EVENT user_command OF cl_gui_alv_gridIMPORTING e_ucomm.*--热点点击控制Handle_hotspot_clickFOR EVENT hotspot_click OF cl_gui_alv_gridIMPORTING e_row_id e_column_id es_row_no.*--在用户命令触发之前Handle_before_user_commandFOR EVENT before_user_command OF cl_gui_alv_grid IMPORTING e_ucomm.*--在用户命令触发之后Handle_after_user_commandFOR EVENT after_user_command OF cl_gui_alv_gridIMPORTING e_ucomm.*--在ALV可修改的情况下,控制数据修改Handle_data_changedFOR EVENT data_changed OF cl_gui_alv_gridIMPORTING er_data_changed.*--在数据修改完成之后Handle_data_changed_finishedFOR EVENT data_changed_finished OF cl_gui_alv_grid IMPORTING e_modified.*--管理菜单Handle_menu_buttonFOR EVENT menu_button OF cl_gui_alv_gridIMPORTING e_object e_ucomm.*--管理按钮点击Handle_button_clickFOR EVENT button_click OF cl_gui_alv_gridIMPORTING e_objec e_ucomm.PRIVATE SECTION.ENDCLASS.下面是类的实现的一些概要代码,参数可以从ALV的事件中直接获取出来:CLASS lcl_event_handler IMPLEMENTATION.*-- Handle toolbarMETHOD handle_toolbar.PERFORM handle_toolbar USIGN e_object e_interactive.ENDMETHOD.*-- Handle hotspot clickMETHOD handle_hotspot_click.PERFORM handle_hotspot_click USING e_row_id e_column_id es_row_no. ENDMETHOD.*-- Handle double clickMETHOD handle_double_click.PERFORM handle_double_click USING e_row e_column es_row_no.ENDMETHOD.*-- Handle after user commandMETHOD handle _after_user_command.PERFORM handle_after_user_command USING e_object.ENDFORM.*-- Handle before user commandMETHOD handle_before_user_command.PERFORM handle_before_user_command.ENDMETHOD.*--Handle data changedMETHOD handle_data_changed.PERFORM handle_data_changed USING er_data_changed.ENDMEHTOD.METHOD handle_data_changed_finished.PERFORM handle_data_chaged USING e_modified.ENDMETHOD.METHOD handle_menu_button.PERFORM handle_menu_button USING e_object e_ucomm.ENDMEHTOD.MEHTOD handle_button_click.PERFORM handle_button_click USING e_objcet e_ucomm.ENDMETHOD.ENDCALSS.光定义了这些还不够,我们需要把事件管理类注册到ALV GRID的实例事件.DATA gr_event_handler TYPE REF TO lcl_event_handler ... ..*--Creating an instance for the event handlerCREATE OBJECT gr_event_handler .*--Registering handler methods to handle ALV Grid eventsSET HANDLER gr_event_handler->handle_user_command FOR gr_alvgrid .SET HANDLER gr_event_handler->handle_toolbar FOR gr_alvgrid .SET HANDLER gr_event_handler->handle_menu_button FOR gr_alvgrid .SET HANDLER gr_event_handler->handle_double_click FOR gr_alvgrid .SET HANDLER gr_event_handler->handle_hotspot_click FOR gr_alvgrid . SET HANDLER gr_event_handler->handle_button_click FOR gr_alvgrid .SET HANDLER gr_event_handler->handle_before_user_commandFOR gr_alvgrid .SET HANDLER gr_event_handler->handle_context_menu_requestFOR gr_alvgrid .SET HANDLER gr_event_handler->handle_data_changed FOR gr_alvgrid .SET HANDLER gr_event_handler->handle_data_changed_finishedFOR gr_alvgrid .1.热点事件(单击事件)前面在介绍字段目录的时候,我们说到,在某个字段的控制字段"HOTSPOT"设置为"X",那么这个字段就可以接受单击事件HOTSPOT_CLICK.这个HOTSPOT_CLICK事件有三个参数,其中第一个参数"E_ROW_ID"已经作废,另外2个参数是:参考类型LVC_S_COL定义的"E_COLUMN_ID",可以通过E_COLUMN_ID-FIELDNAME来反映当前点击的字段名. 参考类型LVC_S_ROID定义的"ES_ROW_NO",可以通过ES_ROW_NO-ROW_ID来反映当前点击的行号,从而可以定位鼠标的位置.下面是响应单击事件的一段处理代码:FORM handle_hotspot_click USING i_row_id TYPE lvc_s_rowI_column_id TYPE lvc_s_colIs_row_no TYPE lvc_s_roid.READ TABLE gt_list INDEX is_row_no-rowid.IF sy-subrc = 0 AND i_column_id-fieldname = ‘SEATSOCC’.CALL SCREEN 200.ENDIF.ENDFORM.当点击的字段是SEATSOCC,调用屏幕200.2.双击事件双击事件和单击事件的处理是类似的,同样也是3个参数.我们不需要设置字段目录就可以响应双击事件了.下面是示例:FORM handle_double_click USING i_row TYPE lvc_s_rowI_column TYPE lvc_s_colIs_row_no TYPE lvc_s_rowid.READ TABLE gt_list INDEX is_row_no-row_id.IF sy-subrc = 0 AND i_column-fieldname = ‘SEATSOCC’.CALL SCREEN 200.ENDIF.ENDFORM.当然鼠标双击字段SEATSOCC才调用屏幕200.3.添加自定义的按钮和响应命令我们在ALV的工具条上增加一些按钮来增加我们自定义的功能,当然也可以在GUI状态中增加,2种的处理方式是不一样的.我们通过toolbar事件来增加按钮,然后通过user_command事件来实现我们自定义的功能.在TOOLBAR事件里,我们把自定义的按钮加到参数"e_object"的表属性"mt_toolbar"中可以了.下面是一段示例代码:FORM handle_toolbar USING i_object TYPE REF TO cl_alv_event_toolbar_set.DATA: ls_toolbar TYPE stb_button.CLEAR ls_toolbar.MOVE 3 TO ls_toolbar-butn_type.APPEND ls_toolbar TO i_object->mt_toolbar.CLEAR ls_toolbar.MOVE 'PER' TO ls_toolbar-function.MOVE icon_display_text TO ls_toolbar-icon.MOVE 'Passenger Info'(201) TO ls_toolbar-quickinfo.MOVE 'Passenger Info'(201) TO ls_toolbar-text.MOVE ' ' TO ls_toolbar-disabled.APPEND ls_toolbar TO i_object->mt_toolbar.CLEAR ls_toolbar.MOVE 'EXCH' TO ls_toolbar-function.MOVE 2 TO ls_toolbar-butn_type.MOVE icon_calculation TO ls_toolbar-icon.MOVE 'Payment in other Curencies'(202) TO ls_toolbar-quickinfo. MOVE ' ' TO ls_toolbar-text.MOVE ' ' TO ls_toolbar-disapbled.APPEND ls_toolbar TO i_object->mt_toolbar.ENDFORM.增加自定义按钮的结构如下:在上面的代码例子里，我们增加了一个常规的按钮和一个含有菜单的按钮.通过把按钮的类型设置为1或者2,我们可以增加一个含有菜单的按钮,在事件menu_button还可以实现子菜单:FORM handle_menu_button USING i_object TYPE REF TO cl_ctmenuI_ucomm TYPE syucomm..CASE i_ucomm.WHEN ‘EXCH’.CALL METHOD i_object->add_functionEXPORTINGFcode = ‘EU’Text = ‘Euro’.CALL METHOD i_object->add_functionEXPORTINGFcode = ‘TRL’Text = ‘Turkish Lira’.ENDCASE.ENDFORM.为了实现这些自定义的按钮的功能,我们使用USER_COMMAND事件来处理.FORM handle_user_command USING i_ucomm TYPE sy-ucomm.DATA lt_selected_rows TYPE lvc_t_rowid.DATA ls_selected_row TYPE lvc_s_roid.CALL METHOD gr_alvgrid->get_selected_rowsIMPORTINGEt_row_no = lt_selected_rows.READ TABLE lt_selected_rows INTO ls_selected_row INDEX 1.If sy-subrc ne 0.MESSAGE S000(su) WITH 'Select a row'(203).ENDIF.CASE i_ucomm.WHEN 'CAR'.READ TABLE gt_list INDEX ls_selected_row-row_id.IF sy-subrc = 0.CALL FUNCTION 'ZDISPLAY_CARRIER_INFO'EXPORTING carrid = gt_list-carridEXCEPTIONS carrier_not_found = 1Oters = 2.ENDIF.WHEN 'EU'.READ TABLE gt_list INDEX ls_selected_row-row_id.IF sy-subrc = 0.CALL FUNCTION 'ZPOPUP_CONV_CURR_ADD_DISPLAY'EXPORTING monun = 'EU'Quant = gt_list-paymentsum.ENDIF.ENDCASE.ENDFORM.我们通过方法get_selected_rows来获取选择的行.功能EXCH有2个子功能,所以我们不需要实现它.为了能显示ALV附加的一些功能,可以在ALV实例创建的时候调用set_toolbar_interactive方法.CALL METHOD gr_alv_grid->set_toolbar_interactive.4.覆盖标准的功能.ALV也给我们提供了修改标准功能的机会.为了实现这个目的,我们需要在"before_user_command"事件中截取标准的功能,然后使用方法"set_user_command"来修改功能码,可以指向自己定义的功能码.下面是示例:FORM handle_before_user_command USING i_ucomm TYPE syucomm . CASE e_ucomm .WHEN '&INFO' .CALL FUNCTION 'ZSFLIGHT_PROG_INFO' .CALL METHOD gr_alvgrid->set_user_commandEXPORTING i_ucomm = space.ENDCASE .ENDFORM .。

REUSE_ALV_FIELDCATALOG_MERGE是一个SAP ABAP中的功能，用于合并两个字段目录（Field Catalogs）并显示在一个ALV网格（ALV Grid）中。

以下是一个简单的例子来说明如何使用它。

假设我们有两个表SFLIGHT（航班信息）和SBOOK（预订信息），我们想要在一个ALV网格中同时显示这两个表的信息。

1.准备字段目录首先，为SFLIGHT和SBOOK准备两个字段目录。

abap复制代码DATA: lt_fieldcat_sflight TYPE TABLE OF slis_fieldcat_alv,lt_fieldcat_sbook TYPE TABLE OF slis_fieldcat_alv.APPEND VALUE #(fieldname = 'CARRID' name = '航班号' ) TO lt_fieldcat_sflight.APPEND VALUE #(fieldname = 'CONNID' name = '连接号' ) TO lt_fieldcat_sflight.APPEND VALUE #(fieldname = 'FLDATE' name = '飞行日期' ) TO lt_fieldcat_sflight.APPEND VALUE #(fieldname = 'CARRID' name = '航班号' ) TO lt_fieldcat_sbook.APPEND VALUE #(fieldname = 'BOOKID' name = '预订ID' ) TO lt_fieldcat_sbook.APPEND VALUE #(fieldname = 'NAME1' name = '乘客姓名' ) TO lt_fieldcat_sbook. 1.合并字段目录使用REUSE_ALV_FIELDCATALOG_MERGE来合并这两个字段目录。

REUSE_ALV_GRID_DISPLAY 常用参数用法Table of Contents1. 前提条件 (2)2. 开发实例 (3)3. 附件 (13)KEY WORDS :REUSE_ALV_GRID_DISPLAY 参数1.前提条件ALV Report是SAP中一种常见的报表展现形式，它可以标准化、简单化R/3系统中的表单，可以提供给用户一个统一的表单格式以及用户接口。

ALV既能显示简单表单（SIMPLE LIST）又能显示有序表单（SEQUENTIAL LIST），编写一个ALV程序包含以下基本流程：第一步：定义将要用到的表，即TALBES定义部分，然后定义TYPE-POOLS：SLIS第二步：定义“第一步”中提到的这些数据类型或者内表的实体对象第三步：定义一些需要用到的变量第四步：定义自己的选择屏幕第五步：定义INITIALIZATION部分，在这个部分往往要指定w_repid 的值，w_repid = sy-repid第六步：start-of-selection部分○1用一个子函数完成对ALV表单标题区域的赋值(i_list_comments)○2用一个子函数完成自己所需要数据的抓取○3用一个子函数完成要显示列表的列名行（第一行）的相关赋值（i_fieldcat_alv）以及设置○4用一个子函数完成输出格式的设置(i_layout)○5用一个子函数FORM DISPLAY_DATA来显示上面封装好的数据，需要调用两个常用的FUNCTION MODULE：FUNCTION 'REUSE_ALV_GRID_DISPLAY' “显示表单数据FUNCTION 'REUSE_ALV_COMMENTARY_WRITE' “显示表单标题本文将着重介绍ABAP中显示表单数据REUSE_ALV_GRID_DISPLAY函数中常用参数的含义及用法，REUSE_ALV_LIST_DISPLAY中参数与此类似。

ALV详细字段介绍ALV常用参数的详细描述调用功能模块：CALL FUNCTION \'REUS E_ALV_GRID_DIS PLAY\'EXPOR TINGi_interface_check = \'\' 接口一致性检查i_callback_program = sy-repid 当前程序名is_layout = layout 输出样式it_f ieldcat = fieldcat[] 字段定义描述表i_callback_pf_status_set = \'PF_STATUS_SET\' 触发事件调用子程序i_callback_user_command = \'USER_COMMAND\' 鼠标事件操作子程序it_events = i_events[] 出口程序触发事件i_callback_html_top_of_page = \'ALV_TOP_OF_PAGE\' ALV输出表头设置i_grid_settings = wl_lvc_s_glay 打印表头设置it_sort = sortable[] 排序设置TABLESt_outtab = ig_outEX CEPTIONSprogram_error = 1OTHERS = 2.常用属性：（赋值‟‟中内容必须为大写）1． Fieldcatdata: fieldcat type slis_t_fieldcat_alv w ith header line.it_fieldcat = fieldcat[]属性（用来定义表单中的各个列的相关信息）Fieldcat-col_pos = n. 输出列Fieldcat-tabname = …FIELDNAME‟.对应的内表字段名Fieldcat-seltext_s/m/l = …列名‟. 输出列文本（_s：短文本 _l：长文本）Fieldcat-emphasize = …CX10‟.带有颜色的高亮列（其中X=（1-7）颜色同f ormat） Fieldcat-hotspot = …X‟.作为热点显示，可触发鼠标触发事件Fieldcat-c urrency = …CURRKEY‟.表 TCURX 中的货币名称 Fieldcat-quantity(3) 计量单位Fieldcat-qfieldname = '数量' 参考计量单位的字段名称 Fieldcat-round = n. 四舍五入至小数位数下n 位Fieldcat-exponent = n. 浮点数的幂指数为nFieldcat-key = …X‟.关键字段Fieldcat-icon = …X‟.作为图标输出Fieldcat-symbol = …X‟.输出作为符号Fieldcat-checkbox = …X‟.作为复选框输出Fieldcat-j ust = SPACE, \'R\', \'L\', \'C\'. 对齐方式Fieldcat-lzero = …X‟.输出前导零Fieldcat-no_sign = …X‟.输出抑制符号Fieldcat-no_zero = …X‟.为输出隐藏零Fieldcat-edit_mask = SPACE, mask.输出为mask的模式 Fieldcat-f ix_column = …X‟.固定列Fieldcat-do_sum = …X‟.总计列值总和Fieldcat-no_out = …X‟.列不输出Fieldcat-tech = …X‟.该字段为技术字段Fieldcat-outputlen = n 列的字符宽度为nFieldcat-decimals_out = n 能控制小数点的位数为nFieldcat-datatype = C,I,N…定义数据类型2． SORTdata: sortable type slis_t_sortinfo_alv with header line.it_sort = sortable[]属性（排序）Sortable-Fieldname 字段名U p 升序排列Dow n 降序排列Subtot3． Layoutdata: layout type slis_layout_alv .is_layout = layout属性 (用于定义ALV表单的相关格式、属性)inf o_f ieldname = 'LINE_COLOR'. 设置特殊行颜色（将LINE_COLOR增加到内表字段，写'CX10'到特殊行的LINE_COLOR, X为颜色值）colwidth_optimize = …X‟.优化列宽设置no_colhead = 'X'. 不显示列名no_vline = 'X'. 不显示列间竖线zebra = 'X' 可选行颜色,如果设置了，出现了间隔色带f2code = '&ETA'. 设置触发弹出详细信息窗口的功能码，这里是双击detail_initial_linesdetail_popup 是否弹出详细信息窗口detail_titlebar 设置弹出窗口的标题栏totals_texttotals_onlygroup_change_editheader_text4．按钮DATA: i_events TYPE slis_t_event WITH HEADER LINE.事件：it_events = i_events[]i_callback_pf_status_set = 'PF_STATUS_SET'i_callback_user_command = 'USER_COMMAND'出口程序触发事件对应子程序：FOR M PF_STATUS_SET USING rt_extab TYPE slis_t_extab.FOR M user_command USING ucomm LIKE sy-ucomm self ield TYPE slis_self ield. 功能代码: 函数文本: 图标名称:&ETA 细节 ICON_SELECT_DETAIL&EB9 调用报告... ICON_TABLE_SETTINGS&REFRESH 刷新 ICON_REFR ESH&ALL 全部选择 ICON_SELECT_ALL&SAL 取消全选 ICON_DES ELECT_ALL&OUP 按升序排列 ICON_SOR T_UP&ODN 按降序排列 ICON_S ORT_DOWN&ILT 设置过滤器 ICON_FILTER&UMC 总计 ICON_SUM&SUM 小计... ICON_INTER MEDIATE_S UM&RNT_PR EV 打印预览 ICON_LAYOUT_CONTR OL&VEX CEL M icrosof t Excel ICON_XLS&AQW 字处理... ICON_W ORD_PR OCESSING%PC 本地文件 ... ICON_EXPORT%SL 邮件收件人 ICON_MAIL&AB C ABC分析 ICON_AB C&GRAPH 图形 ICON_GR APHICS&OL0更改布局... ICON_ALV_VAR IANTS&OAD 选择格式... ICON_ALV_VAR IANT_CHOOS E&AVE 保存格式... ICON_ALV_VAR IANT_S AVE&INF O 信息 ICON_INF OR MATION1． ALV表头设置i_callback_html_top_of_page = 'ALV_TOP_OF_PAGE'form top_of_page using cl_dd type ref to cl_dd_document.语法同HTML fomatALV_GRID介绍一.ALV介绍The ALV Grid Control (ALV = SAP List Viewer)是一个显示列表的灵活的工具,它提供了基本功能的列表操作,也可以通过自定义来进行增强,因此可以允许你可以在大型的应用程序中使用.SAP提示: 在SAP的开发项目中,ALV GRID也可以作为修改和创建数据的一种工具,然而,目前这个功能只在实验计划中使用,还没有向客户发布.下面是一个ALV GRID的图片:它包括3大部分,工具栏,标题,用于显示数据的网格控制器.如果有必要，用户可以隐藏标题和工具栏.ALV家族包含3中ALV工具:简易的,两层ALV,分等级连续的列表和树形结构的ALV.二.ALV GRID CONTR OL (ALV网格控制器)ALV GRID CONTR OL使用了控制器技术以实现艺术性的屏幕显示,象所有的控制器一样，ALV GRID CONTR OL通过系统中的一个全局的类提供了方法,以响应它的动作.使用了AB AP的对象以后,列表是通过ALV的一个实例(INS TANCE)来显示的,程序员可以使用AB AP对象的事件管理.三.ALV GRID CONTR OL 实例ALV GRID实例的定义,参照CL_GUI_ALV_GRID类data ALV_GRID1 type ref to cl_gui_alv_grid.ALV GRID继承结构:ALV_GRID介绍(1)四、ALV GRID相关的几个控制结构1.字段目录 [Field catalog]字段目录是用来控制ALV显示的网格中每个字段的属性的,比如字段的顺序,对齐方式,可编辑状态,颜色,等等.常用的控制字段如下:(下面的示例将说明这些字段的使用,参考STRUCTUR E LVC_S_FCAT)2R OW_POS ALV控制: 输出行 (内部使用)3COL_POS ALV 控制: 输出列列的位置,第几列,例如1,2,…..4FIELDNAME ALV 控制: 内部表字段的字段名称字段名称5TAB NAME LVC 标签名称表名，如果是内表，是16CURRENCY ALV 控制: 货币单位7CF IELDNAME ALV控制: 参考的当前单位的字段名称8QUANTITY ALV 控制: 计量单位9QFIELDNAME ALV 控制: 参考计量单位的字段名称10 IFIELDNAME ALV控制: 内部表字段的字段名称11 ROUND ALV控制: ROUND 值12 EXPONENT ALV 控制：流动表示的指数13 KEY ALV 控制: 关键字段关键字段,前面变蓝色14 KEY_SEL ALV控制: 可以被隐藏的关键列可以被隐藏的关键列15 ICON ALV 控制: 作为图标输出此列作为图标输出16 SYMB OL ALV 控制: 输出作为符号17 CHECKB OX ALV 控制: 作为复选框输出复选框输出18 JUST ALV控制: 对齐对齐方式:\'R\': right j ustif ied\'L\': lef t justified\'C\': centered19 LZER O ALV 控制: 输出前导零 X\'20 NO_SIGN ALV控制：输出抑制符号 X\',不输出符号21 NO_ZER O ALV 控制: 为输出隐藏零 X\',隐藏022 NO_CONVEX T ALV 控制: 不考虑输出的转换退出23 EDIT_MASK ALV 控制: 为输出编辑掩码格式24 EMPHASIZE ALV控制: 带有颜色的高亮列列的颜色25 FIX_COLUMN ALV 控制: 固定列26 DO_S UM ALV控制: 总计列值 X\',合计27 NO_SUM ALV控制: 没有总计列值 X\' ,没有合计28 NO_OUT ALV 控制: 列没有输出 X\' ,隐藏此列29 TECH ALV控制: 技术字段 X\'.也是隐藏，但是有点不一样30 OUTPUTLEN ALV 控制: 列的字符宽度输出的长度31 CONVEX IT 转换例程32 SELTEX T ALV 控制: 对话功能的列标识符33 TOOLTIP ALV 控制: 列抬头的工具提示34 ROLLNAME ALV 控制: F1帮助的数据元素35 DATATYPE AB AP字典中的数据类型 AB AP字典中的数据类型36 INTTYPE AB AP 数据类型(C,D,N,...) AB AP 数据类型(C,D,N,...)37 INTLEN以字节计的内部长度内容的长度38 LOWER CAS E允许/不允许小写字母 X\' 允许大小写39 REPTEX T 标题40 HIER_LEVEL ALV 控制: 内部使用41 REPR EP ALV控制: 价值是补充/补充接口的选择标准42 DOMNAME 定义域名43 SP_GR OUP 组代码44 HOTS POT ALV 控制: 单击敏感 X\',下面出现下划线,响应单击45 DFIELDNAME ALV控制: 数据库中列组的字段名称46 COL_ID ALV控制: 列 ID47 F4AVAILABL 字段有输入帮助吗 X\'.此列有搜索帮助48 AUTO_VALUE ALV控制: 自动复制值49 CHECKTABLE 表名50 VALEXI 固定值存在51 WEB_FIELD ALV 控制: 内部表字段的字段名称52 HREF_HNDL 自然数热点连接的句柄53 STYLE ALV 控制: 样式下面有例子会介绍,比如PUS HBUTTION54 STYLE2 ALV控制: 样式55 STYLE3 ALV控制: 样式56 STYLE4 ALV控制: 样式57 DRDN_HNDL 自然数下拉的句柄58 DRDN_FIELD ALV 控制: 内部表字段的字段名称下拉的字段59 NO_MER GING 字符字段长度 1相同的值不合并60 H_FTYPE ALV树控制: 功能类型 (总计,平均,最大.最小, ...)61 COL_OPT 可选列优化的条目62 NO_INIT_CH 字符字段长度 163 DRDN_ALIAS 字符字段长度 164 REF_FIELD ALV 控制: 内部表字段的参考字段名称65 REF_TABLE ALV控制: 内部表字段的参考表名称66 TXT_FIELD ALV 控制: 内部表字段的字段名称67 ROUNDFIELD ALV 控制: 带有 ROUND 说明的字段名称68 DECIMALS_O ALV 控制: 输出小数位的编号69 DECMLFIELD ALV 控制: 带有 DECIMALS 说明的字段名称70 DD_OUTLEN ALV 控制: 输出字符长度71 DECIMALS 小数点后的位数设置小数的位数72 COLTEX T ALV 控制: 列标题列标题73 SCR TEX T_L 长字段标签74 SCR TEX T_M 中字段标签75 SCR TEX T_S 短字段标签76 COLDDICTX T ALV控制: 确定 DDIC 文本参考77 SELDDICTX T ALV 控制: 确定 DDIC文本参考78 TIPDDICTX T ALV 控制: 确定 DDIC文本参考79 EDIT ALV 控制: 准备输入输出状态.\'X\'可输入80 TECH_COL ALV控制: 内部使用81 TECH_FOR M ALV 控制: 内部使用82 TECH_COMP ALV 控制: 内部使用83 HIER_CPOS ALV 控制: 层次列位置84 H_COL_KEY 树控制: 列名称/项目名称85 H_SELECT标识是否可以选择树控制中的列86 DD_ROLL 数据元素 (语义域)87 DRAGDR OPID ALV控制: 拖&放处理拖放对象88 MAC字符字段长度 189 INDX_FIELD 自然数90 INDX_CFIEL 自然数91 INDX_QFIEL 自然数92 INDX_IFIEL 自然数93 INDX_R OUND 自然数94 INDX_DECML 自然数95 GET_S TYLE 字符字段长度 196 MARK 字符字段长度 1ALV_GRID介绍(2)2.布局控制[layout]布局是用来控制整个ALV的一个布局，比如ALV的标题,是否可编辑,行颜色,列颜色.参照ALV的控制结构[LVC_S_LAYO],以后的例子我将详细介绍如何设置行颜色和列颜色. 详细的结构说明字段名描述 Value rangeCWIDTH_OPT 最优化宽度 SPACE, \'X\'SMALLTITLE小标题,如果设置了这个字段，则标题与列标题大小一样 SPACE, \'X\' GRID_TITLE标题,在网格和工具条之间最长70个字符NO_HEADERS 如果被设置,列标题隐藏 SPACE, \'X\'NO_HGRIDLN 隐藏水平线 SPACE, \'X\'NO_MER GING 禁用单元格合并 SPACE, \'X\'NO_ROWMARK 如果被设置,选择列在选择模式,为D和A的时候隐藏 SPACE, \'X\' NO_TOOLB AR 隐藏工具条 SPACE, \'X\'NO_VGRIDLN 隐藏垂直线 SPACE, \'X\'SEL_MODE 选择模式 SPACE, \'A\', \'B\', \'C\', \'D\'EX CP_CONDS 合计例外 SPACE, \'X\'EX CP_FNAME字段名称带有例外编码最长30个字符EX CP_LED 例外作为 LED SPACE, \'X\'EX CP_R OLLN例外文档的数据元素 SPACE, \'X\'CTAB_FNAME 带有复杂单元格颜色编码的字段名称最长30个字符INF O_FNAME 带有简单行彩色代码的字段名称最长30个字符ZEBR A 可选行颜色,如果设置了，出现了间隔色带 SPACE, \'X\'NO_TOTLINE 没有总计 SPACE, \'X\'NUMC_TOTAL 可以对NUMC字段进行合计 SPACE, \'X\'TOTALS_BEF 总计输出在第一行,小计在新的值之前 SPACE, \'X\'STYLEF NAME 设置单元格,比如PUS HBUTTON 最长30个字符ALV_GRID介绍(3)3.打印和排序,过滤控制打印的参数控制请参考结构[LVC_S_PRNT]排序的参数控制请参考结构[LVC_S_SOR T]过滤的参数控制请参考结构[LVC_S_FILT]这里不再一一解释,进入中文版本,里面应该也有解释的,虽然一些不是很清楚.五.编写简单的ALV程序.首先这里就不详细介绍DIALOG的用法了.OO的ALV GRID必须存在于一个容器当中,就是FUNCTION的ALV,其实也是一样的,底层也是使用CL_GUI_ALV_GR ID这个类的.首先ALV的显示需要有几个先决条件.1,字段目录,这个是必须的,如果没有这个参数,参考一个数据字典也是可以的,就是参数I_STR UCTUR E_NAME.2.存放数据的内表,最好内表的结构和字段目录是一致的,否则可能会出现一些无法预知的错误,当然你说我非要不一样,那也不一定会出现错误.我建议是最好一样的.这2个是必须的,布局的话,应该是可以不设置的,使用默认的就可以了.第一步:创建个SCREEN,在屏幕上创建个容器,CONTAINER.定义变量.DATA:WCL_CONTAINER TYPE REF TO CL_GUI_CUS TOM_CONTAINER,WCL_ALV TYPE REF TO CL_GUI_ALV_GRID .*--- 存放字段目录的内表DATA gt_f ieldcat TYPE lvc_t_f cat .*--- 布局结构DATA gs_layout TYPE lvc_s_layo .*----声明需要显示的内表(以SFLIGHT为例)DATA BEGIN OF gt_list OCCURS 0 .INCLUDE STRUCTUR E SFLIGHT .DATA END OF gt_list .第二步: 创建ALV这个对象，它的父组件是那个容器.在PBO中写入如下代码:PROCESS BEF ORE OUTPUT .创建DISPLAY_ALV的MODULE后,写下如下代码:MODULE display_alv OUTPUT .PERF OR M display_alv .ENDMODULE .在FOR M DISPLAY_ALV中,判断ALV实例是否存在,如果不存在,则创建: IF WCL_ALV IS INITIAL .CREATE OBJ ECT: WCL_CONTAINEREXPOR TINGCONTAINER_NAME = \'ALV_CON\'.CREATE OBJ ECT WCL_ALVEXPORTINGI_PARENT = WCL_CONTAINER."准备获取字段目录PERF OR M prepare_f ield_catalog CHANGING gt_f ieldcat ."设置布局PERF OR M prepare_layout CHANGING gs_layout ."显示ALVCALL METHOD gr_alvgrid->set_table_for_f irst_displayEXPOR TING* I_BUFFER_ACTIVE =* I_CONS IS TENCY_CHECK =* I_STRUCTUR E_NAME =* IS_VARIANT =* I_SAVE =* I_DEF AULT = \'X\'* IS_PRINT =* IT_SPECIAL_GR OUPS =* IT_TOOLB AR_EX CLUDING =* IT_HYPERLINK =CHANGINGit_outtab = gt_list[]it_f ieldcatalog = gt_fieldcat* IT_S ORT =* IT_FILTER =EXCEPTIONSinvalid_parameter_combination = 1program_error = 2too_many_lines = 3OTHERS = 4 .ELSE.*----刷新ALVCALL METHOD gr_alvgrid->ref res h_table_display * EXPORTING* IS_STABLE =* I_SOF T_REFRES H =EXCEPTIONSfinished = 1OTHERS = 2 .IF sy-subrc <> 0.*--异常处理ENDIF.ENDIF .方法"set_table_f or_f irst_display"的参数说明------------------------------------------------------------------------------|I_BUFFER_ACTIVE | 如果方法调用是静态的,可以设置这个标记,| | 这表示,如果每次显示ALV都是相同的字段目录.| | 既然这样,那么字段目录会被放到一个特殊的缓存里, | | 这样加速了ALV的显示------------------------------------------------------------------------------|I_STRUCTURE_NAME | 输出数据参考的数据字典的结构名,例如\'SFLIGHT\'.| | 如果指定了这个参数,字段目录会自动生成,下面的参数| | IT_FIELDCATALOG不需要传值.------------------------------------------------------------------------------|IS_VARIANT | 决定布局显示的变式------------------------------------------------------------------------------|I_SAVE | 决定用户是否可以保存变式:| | 'X' 只能保存全局变式| | 'U' 只能保存特定变式| | 'A' 都可以保存| | SPACE 不可以保存变式------------------------------------------------------------------------------|I_DEF AULT | 决定用户是否可以定义默认的布局:| | 'X' 可以定义默认布局,这个参数是默认的| | SPACE 不可以定义默认布局------------------------------------------------------------------------------|IS_LAYOUT | 布局参数,传递布局控制的一些信息------------------------------------------------------------------------------|IS_PRINT | 后台打印属性的参数------------------------------------------------------------------------------|IT_SPECIAL_GR OUPS | 如果在字段目录中，一些字段通过SP_GR OUP被分组在一起. | | 我们就必须为这些组传递一个组的文本内表进去------------------------------------------------------------------------------|IT_TOOLB AR_EX CLUDING| 需要隐藏的标准的按钮的内表------------------------------------------------------------------------------|IT_HYPERLINK | 为每个句柄分配了超连接的内表,| | LVC_S_HYPE中的HREF存放了超连接的地址,| | HANDLE指定了句柄,使用这些句柄，你可以在GRID中使用超连接------------------------------------------------------------------------------|IT_ALV_GR APHICS | 比较复杂，没有用过,意思好象是可以在图表中显示ALV.------------------------------------------------------------------------------|IT_OUTTAB | 输出数据存放的内表,数据都是存放在这个内表里------------------------------------------------------------------------------|IT_FIELDCATALOG | 字段目录------------------------------------------------------------------------------|IT_S ORT | 排序的标准------------------------------------------------------------------------------|IT_FILTER | 过滤的标准------------------------------------------------------------------------------方法"REFRESH_TABLE_DIS PLAY"的参数说明------------------------------------------------------------------------------IS_STABLE 刷新的稳定性，有2个参数，一个是行，一个是列.如果设置了相应的值,那么对应的行，或者列，在刷新的时候,将会保持稳定，就是滚动条保持不动.------------------------------------------------------------------------------I_SOF T_REFRES H 这个参数只是在异常情况下被使用,如果设置了这个参数, 任何创建的合计,任何排序次序,任何为了显示数据而设置的过滤都将保持不变.这个是非常有意义的.例如:当然你没有修改数据内表里的数据而想刷新ALV,仅仅只是改变一下布局和字段目录.------------------------------------------------------------------------------第三步,获取要显示数据的字段目录.有两种方式.1.手动创建FOR M prepare_field_catalog CHANGING pt_f ieldcat TYPE lvc_t_f cat . DATA ls_f cat type lvc_s_f cat .ls_f cat-f ieldname = \'CARR ID\' .ls_f cat-inttype = \'C\' .ls_f cat-outputlen = \'3\' .ls_f cat-coltext = \'Carrier ID\' .ls_f cat-seltext = \'Carrier ID\' .APPEND ls_f cat to pt_f ieldcat .CLEAR ls_f cat .ls_f cat-f ieldname = \'CONNID\' .ls_f cat-ref_table = \'SFLIGHT\' .ls_f cat-ref_table = \'CONNID\' .ls_f cat-outputlen = \'3\' .ls_f cat-coltext = \'Connection ID\' .ls_f cat-seltext = \'Connection ID\' .APPEND ls_f cat to pt_f ieldcat .2.半自动的创建FOR M prepare_field_catalog CHANGING pt_f ieldcat TYPE lvc_t_f cat . DATA ls_f cat type lvc_s_f cat .CALL FUNCTION \'LVC_FIELDCATALOG_MERGE\'EXPOR TINGi_structure_name = \'SFLIGHT\'CHANGINGct_fieldcat = pt_fieldcat[]EX CEPTIONSinconsistent_interf ace = 1program_error = 2OTHERS = 3.IF sy-subrc <> 0.*--Exception handlingENDIF.LOOP AT pt_fieldcat INTO ls_f cat .CAS E pt_f ieldcat-fieldname .WHEN \'CARRID\' .ls_f cat-outpulen = \'10\' .ls_f cat-coltext = \'Airline Carrier ID\' .MODIFY pt_fieldcat FROM ls_f cat .WHEN \'PAYMENTSUM\' .ls_f cat-no_out = \'X\' .MODIFY pt_fieldcat FROM ls_f cat .ENDCAS E .ENDF ORM .第四步,设置布局FOR M prepare_layout CHANGING ps_layout TYPE lvc_s_layo.ps_layout-zebra = \'X\' .ps_layout-grid_title = \'Flights\' .ps_layout-smalltitle = \'X\' .ENDF ORM. " prepare_layout第五步,排除不需要的标准按钮(可选,这个是第一种方法,还有另外一种，在添加自定义的按钮的时候介绍) 在你的ALV上，如果你想排除一些你不想要的标准按钮,你可以把需要排除的按钮填入到表UI_F UNCTIONS中,然后传给 set_table_f or_first_display方法的参数"IT_TOOLB AR_EX CLUDING".这些按钮的功能码一般都可以通过查看类 cl_gui_alv_grid的常量属性中获取到,或者自己加个断点，在after_user_command事件中.如果你要隐藏全部的工具条,你可以把layout中的no_toolbar设置为"X".FOR M exclude_tb_functions CHANGING pt_exclude TYPE ui_functions .DATA ls_exclude TYPE ui_func.ls_exclude = cl_gui_alv_grid=>mc_f c_maximum .APPEND ls_exclude TO pt_exclude.ls_exclude = cl_gui_alv_grid=>mc_f c_minimum .APPEND ls_exclude TO pt_exclude.ls_exclude = cl_gui_alv_grid=>mc_f c_subtot .APPEND ls_exclude TO pt_exclude.ls_exclude = cl_gui_alv_grid=>mc_f c_sum .APPEND ls_exclude TO pt_exclude.ls_exclude = cl_gui_alv_grid=>mc_f c_average .APPEND ls_exclude TO pt_exclude.ls_exclude = cl_gui_alv_grid=>mc_mb_sum .APPEND ls_exclude TO pt_exclude.ls_exclude = cl_gui_alv_grid=>mc_mb_subtot .ENDF ORM .按照上面的步骤,一个ALV的DEMO基本可以创建了.下面我们将讲述一些功能.功能一:在第一次显示以后,修改字段目录和布局.在运行的时候,很有可能需要在显示之后,需要设置一个新的布局或者字段目录.有下面这些方法去实现. 字段目录: get_frontend_f ieldcatalogs et_f rontend_fieldcatalog布局: get_frontend_layouts et_f rontend_layout使用这些方法,你在执行的任何时候,可以获取这些内容,然后修改他们.DATA ls_f cat TYPE lvc_s_f cat .DATA lt_f cat TYPE lvc_t_f cat .DATA ls_layout TYPE lvc_s_layo .CALL METHOD gr_alvgrid->get_f rontend_fieldcatalogIMPORTINGet_f ieldcatalog = lt_f cat[] .LOOP AT lt_f cat INTO ls_f cat .IF ls_f cat-f ieldname = \'PAYMENTS UM\' .ls_f cat-no_out = s pace .MODIF Y lt_f cat FROM ls_f cat .ENDIF .ENDLOOP .CALL METHOD gr_alvgrid->set_f rontend_fieldcatalogEXPOR TINGit_f ieldcatalog = lt_f cat[] .CALL METHOD gr_alvgrid->get_f rontend_layoutIMPORTINGes_layout = ls_layout .ls_layout-grid_title = \'Flights (w ith Payment Sums)\' .CALL METHOD gr_alvgrid->set_f rontend_layoutEXPOR TINGis_layout = ls_layout .功能二:设置排序条件有时候我们需要使用到数据的排序.这个可以通过填充参考结构LVC_T_S OR T创建的内表来实现，这个内表中包含了排序的标准.可以传递给set_table_f or_f irst_display这个方法的IT_S OR T参数来初始化一个排序.FOR M prepare_sort_table CHANGING pt_sort TYPE lvc_t_sort .DATA ls_sort TYPE lvc_s_sort .ls_sort-spos = \'1\' .ls_sort-f ieldname = \'CARRID\' .ls_sort-up = \'X\' . "A to Zls_sort-down = space .APPEND ls_sort TO pt_sort .ls_sort-spos = \'2\' .ls_sort-f ieldname = \'SEATS OCC\' .ls_sort-up = space .ls_sort-down = \'X\' . "Z to AAPPEND ls_sort TO pt_sort .ENDF ORM. " prepare_sort_table这有2点特别的说明:1.如果这边排序的字段名，不存在于字段目录中，那将出现DUMP.2.排序以后,垂直的网格中，如果出现相同的内容,就会合并，如果要避免,请在布局中设置"no_merging"为"X" .你可以通过使用方法“get_sort_c riteria” 和“set_sort_criteria”来获取和设置排序的标准.功能三:设置过滤(和排序类似)ALV的标准按钮中已经有过滤的功能,我们也可以在初始显示的时候就设置过滤条件.我们需要把过滤条件填充到参考表类型"LVC_T_FILT"创建的内表中.过滤条件是类似一个RANGES结构的.然后把这个内表传递给方法"SET_TABLE_FOR_FIRS T_DIS PLAY"中的参数"IT_FILTER" FOR M prepare_filter_table CHANGING pt_f ilt TYPE lvc_t_f ilt .DATA ls_f ilt TYPE lvc_s_filt .ls_f ilt-fieldname = \'FLDATE\' .ls_f ilt-sign = \'E\' .ls_f ilt-option = \'BT\' .ls_f ilt-low = \'20030101\' .ls_f ilt-high = \'20031231\' .APPEND ls_f ilt TO pt_f ilt .ENDF ORM. " preparef iltertable我们可以使用"get_f ilter_criteria" 和"set_f ilter_criteria"来获取过滤条件和设置过滤条件.功能四:选择方式有时候，我们需要选择一些单元格,行或者列,在布局中，有个参数"SEL_MODE"可以设置我们不同的选择方式.下面是参数的介绍.和不同的地方.值模式可能的选择注释SPACE 等同于B 参考B 默认设置\'A\' 行和列的选择,无法选择单元格多行，多列用户可以使用最左边的选择按钮来选择多行\'B\' 单选,不可以多选行,不可以多选单元格多行，多列\'C\' 多选,可以多选行,不可以多选单元格多行，多列\'D\' 单元格的选择,可以多选单元格多行，多列,任何单元格多选用户可以使用最左边的选择按钮来选择多行注意:1.如果你设置了ALV是可编辑的,可能会覆盖你在布局中选择方式的设置的.2.设置了选择方式以后,我们可以使用很多方法来获取用户的选择.比如"GET_S ELECTED_CELLS","GET_SELECTED_CELLS_ID","GET_S ELECTED_ROWS","GET_SELECTED_COLUMNS"3.在执行PAI以后,用户所选择的单元格,行或者列可能丢失.你可以在PB O中,使用对应的SET方法来恢复这些选择.功能五:颜色设置有的时候,我们需要在ALV网格上绘上一些颜色.可以给特定的行，某个特定的列,某个特定的单元格绘制颜色.如果某列被设置为关键列,这列的颜色将被自动绘制,而不需要我们额外的指定.先介绍ALV里色码.就是颜色编码,4位CHAR型.Cxyz---Color || || 1/0: 相反开/关1/0: 强化开/关其中C是固定的第一位,第二位代表是颜色编码(1到7),第三位是加强的设置,第四位是相反,个人理解,在强化关闭的情况下,相反的作用是背景和字体的变化.颜色编码:x 颜色主要使用在1Gray-blue headers2Light gray List bodies3yellow totals4Blue-green Key columns5green Positive threshold value6red Negative threshold value7orange Control levelsA)设置列的颜色.我们可以通过字段目录的"emphasize"控制字段来控制某列的颜色.这个字段同样是4位的CHAR型,传入上述的颜色编码.例如:LS_FCAT-EMPHAS IZE = \'C701\'.如果这列被设置为关键列,就是 LS_FCAT-K EY = \'X\' ,那么颜色设置就不会起作用.请注意,自动产生的字段目录中，KEY的设置是自动获取的.B)设置行的颜色为某行设置颜色,是有点复杂的,我们需要在要显示的数据内表中增加一个字段,这个字段不需要在字段目录中存在.同样,这个字段也是4位的CHAR型,符合颜色编码的定义.那我们就需要这样来定义我们的数据内表:DATA BEGIN OF gt_list OCCURS 0 .INCLUDE STRUCTURE SFLIGHT .DATA row color(4) TYPE c .DATA END OF gt_list .很明显，填入颜色编码以后,ALV怎么知道它是我们用来设置颜色的呢,在布局中，有个控制字段"INF O_FNAME",我们可以设置这个字段来告诉ALV,我们的颜色字段是哪个.ps_layout-inf o_fname = \'ROWCOLOR\'.请注意,这个字段随便你起名字,但是记住,一定是数据内表里的字段，而且这边设置的时候一定要大写.你可以在任何时候设置行的颜色,只需要去修改内表里的这个字段的值,但是记得,一定要刷新以后才起作用.C)设置单元格的颜色设置单元格和设置行的颜色,本质上没有什么大的区别,但是定位单元格需要2个参数.我们需要在数据内表中插入一个表类型的字段，这样我们的数据内表就变成了DEEP结构了,不过ALV是可以处理的.不需要担心.插入的这个表类型的类型为"LVC_T_S COL".里面有3个参数:FNAME告诉我们你需要设置的是哪个字段,如果为空，然后直接在COLOR中设置颜色,就是整行设置为这个颜色.如果具体到某个单元格,必须指定是哪个字段.COLOR字段是用来设置颜色的.NOK EYCOL字段比较关键了.设置为关键列的一些字段,我们的颜色设置可能被覆盖.通过这个字段的设置,可以避免被关键列覆盖.同样,ALV在布局中有个字段"CTAB_FNAME"告诉我们,数据内表中，哪个字段是用来设置单元格的颜色的.DATA BEGIN OF gt_list OCCURS 0 .INCLUDE STRUCTURE SFLIGHT .DATA row color(4) TYPE c .DATA cellcolors TYPE lvc_t_scol .DATA END OF gt_list .DATA ls_cellcolor TYPE lvc_s_scol ....READ TABLE gt_list INDEX 5 .ls_cellcolor-fname = \'SEATS OCC\' .ls_cellcolor-color-col = \'7\' .ls_cellcolor-color-int = \'1\' .APPEND ls_cellcolor TO gt_list-cellcolors .MODIF Y gt_list INDEX 5 .注意:颜色设置中有优先级顺序,他们是单元格--->行--->列.功能六:插入超链接插入超链接是通过一个含有超级链接和句柄的表来实现的.这个表类型为"LVC_T_HYPE" ,句柄是一个INT4类型的字段,我们需要在数据显示的内表中，加入这样的字段，来告诉ALV,我们的字段指定的句柄,从而找到对应的超级链接.在字段目录中,WEB_FIELD是用来指定对应的句柄名的. 下面举个例子来说明,我们要为字段CARRID,CONNID建立超级链接:首先,内表定义中，我们加入2个句柄字段:DATA BEGIN OF gt_list OCCURS 0 .INCLUDE STRUCTURE SFLIGHT .DATA row color(4) TYPE c .DATA cellcolors TYPE lvc_t_scol .DATA carrid_handle TYPE int4 .DATA connid_handle TYPE int4 .DATA END OF gt_list .第二: 建立一个超级链接内表,里面存放句柄所对应的超级链接.创建的时候注意,它参考的表类型,一定是"LVC_T_HYPE". FOR M prepare_hyperlinks_table CHANGING pt_hype TYPE lvc_t_hype .DATA ls_hype TYPE lvc_s_hype .ls_hype-handle = \'1\' .ls_hype-href = \'http://www.c /carrids/car1\' .APPEND ls_hype TO pt_hype .ls_hype-handle = \'2\' .ls_hype-href = \'http://www.c /carrids/car1\' .APPEND ls_hype TO pt_hype .ls_hype-handle = \'3\' .ls_hype-href = \'http://www.c /carrids/car1\' .APPEND ls_hype TO pt_hype .ls_hype-handle = \'4\' .ls_hype-href = \'http://www.c /connids/con11\' .APPEND ls_hype TO pt_hype .ls_hype-handle = \'5\' .ls_hype-href = \'http://www.c /connids/con12\'APPEND ls_hype TO pt_hype ... ..ENDF ORM .第三.通过字段目录FIELDCATLOG来指定相应的句柄字段.对于CARRID的field catalogLs_fieldcat-w eb_field = …CARRID_HANDLE‟.对于CONNID的field catalogLs_fieldcat-w eb_field = …CONNID_HANDLE‟.在方法"SET_TABLE_F OR_FIRST_DISPLAY"中把句柄内表传给参数it_hyperlink。

*&---------------------------------------------------------------------**& Report ZTEST032*&*&---------------------------------------------------------------------**&*&*&---------------------------------------------------------------------*REPORT ZTEST032MESSAGE-ID 00.TABLES:SPFLI.CLASS cl_event_handle DEFINITION. "定义事件处理类PUBLIC SECTION."初始化ALV工具栏对象事件，如增加按钮并设定属性METHODS handle_toolbar FOR EVENT toolbar OF cl_gui_alv_gridIMPORTING e_object e_interactive."该事件用于在下ALV工具栏的下拉菜单按钮中增加选项METHODS handle_menu_button FOR EVENT menu_button OF cl_gui_alv_gridIMPORTING e_object e_ucomm."ALV工具栏按钮的点击事件METHODS handle_user_command FOR EVENT user_command OF cl_gui_alv_gridIMPORTING e_ucomm."ALV表格双击事件METHODS handle_double_click FOR EVENT double_click OF cl_gui_alv_gridIMPORTING e_row e_column es_row_no."BEFORE ALV工具栏按钮的点击事件METHODS handle_before_user_command FOR EVENT BEFORE_USER_COMMAND OF cl_gui_alv_grid IMPORTING e_ucomm."after ALV工具栏按钮的点击事件METHODS handle_after_user_command FOR EVENT AFTER_USER_COMMAND OF cl_gui_alv_gridIMPORTING e_ucomm.ENDCLASS.*DATA: gt_itab like TABLE OF spfli WITH HEADER LINE.DATA: BEGIN OF GT_ITAB OCCURS 0.INCLUDE STRUCTURE SPFLI.DATA: cellstyles TYPE lvc_t_styl,color(10).DATA END OF GT_ITAB."Docking容器最大特点是在代码中可以动态创建容器，不需要像创建自定义容器CL_GUI_CUSTOM_CONTAINER那样，"在创建时需要将其绑定到一个预先绘制好的用户自定义控件区域中DATA: LR_CONTAINER TYPE REF TO CL_GUI_DOCKING_CONTAINER,GR_GRID TYPE REF TO CL_GUI_ALV_GRID,GT_FIELD TYPE LVC_T_FCAT,GS_FIELD TYPE LVC_S_FCAT,GT_SORT TYPE LVC_T_SORT,GS_SORT TYPE LVC_S_SORT,GS_LAYOUT TYPE LVC_S_LAYO,GS_VARIANT TYPE DISVARIANT,gt_cells type LVC_T_CELL,gs_cells type LVC_S_CELL.DATA: event_handle TYPE REF TO cl_event_handle."定义类对象的引用DATA: GT_TOOLBAR TYPE UI_FUNCTIONS,L_EXECUTE TYPE UI_FUNC.DATA: gs_toolbar TYPE stb_button.DATA: FLAG(1)."防止重复创建容器和实例CALL SCREEN 0100.CLASS cl_event_handle IMPLEMENTATION."事件处理类实现部分METHOD handle_toolbar.gs_toolbar-function = 'B_SUM'."按钮的FunctionCodegs_toolbar-icon = icon_display."按钮图标gs_toolbar-text = '总行数'."按钮标签gs_toolbar-butn_type = '0'."定义按钮类型，0为标准按钮APPEND gs_toolbar TO e_object->mt_toolbar."添加按钮到工具栏中gs_toolbar-function = 'B_DIS'."按钮的FunctionCodegs_toolbar-icon = icon_display."按钮图标gs_toolbar-text = '选中'."按钮标签gs_toolbar-butn_type = '0'."定义按钮类型，0为标准按钮APPEND gs_toolbar TO e_object->mt_toolbar."添加按钮到工具栏中gs_toolbar-function = 'B_LIST'."按钮的FunctionCodegs_toolbar-quickinfo = '自定义下拉菜单按钮'."按钮的冒泡提示gs_toolbar-icon = icon_biw_report_view."按钮图标gs_toolbar-text = '下拉菜单按钮'."按钮标签gs_toolbar-butn_type = '1'."定义按钮类型，1为下拉菜单按钮APPEND gs_toolbar TO e_object->mt_toolbar."添加下拉菜单按钮到工具栏中ENDMETHOD.METHOD handle_menu_button.IF e_ucomm = 'B_LIST'."给下拉菜单按钮增加选项，可以多次调用该方法以增加多行CALL METHOD e_object->add_functionEXPORTINGicon = icon_displayfcode = 'B_SUM'"字菜单按钮的FunCodetext = '显示ALV总行数'.ENDIF.ENDMETHOD.METHOD handle_user_command.DATA: sum TYPE i .IF e_ucomm = 'B_SUM'.DESCRIBE TABLE gt_itab[] LINES sum.MESSAGE i001(00) WITH '当前ALV表格中的数据总行数为：' sum.ENDIF.ENDMETHOD.METHOD handle_double_click.READ TABLE gt_itab INTO gt_itab INDEX es_row_no-row_id.MESSAGE i001(00) WITH '当前行：' es_row_no-row_id '，航线代码：' gt_itab-carrid.ENDMETHOD.METHOD handle_before_user_command."ALV 也给我们提供了修改标预置按钮功能的机会，为了实现这个目的，"我们需要在"before_user_command"事件中截取标准的功能，然后使用方法""set_user_command"来修改功能码，这样便可以指向自己定义的功能码DATA: sum TYPE i .if e_ucomm = 'B_SUM'.DESCRIBE TABLE gt_itab[] LINES sum.MESSAGE i001(00) WITH '不是原来的我了，当前ALV表格中的数据总行数为：' sum.CALL METHOD gr_grid->set_user_commandEXPORTINGi_ucomm = space.endif.* GR_GRID->REFRESH_TABLE_DISPLAY( )."刷新,不变时，无需更新ENDMETHOD.METHOD handle_after_user_command.DATA ls_stylerow TYPE lvc_s_styl.DATA lt_styletab TYPE lvc_t_styl.if e_ucomm = '&MB_VARIANT'.message i001(00) WITH '更改布局'.ELSEIF e_ucomm = 'B_DIS'.GR_GRID->get_frontend_layout(IMPORTINGES_LAYOUT = gs_layout ).GR_GRID->get_selected_cells(IMPORTINGET_CELL = gt_cells[] ).* READ TABLE gt_itab INTO gt_itab INDEX 7.* "需要对第7行的CITYFROM列单元格样式进行设置* ls_style-fieldname = 'CITYFROM'.* ls_style-style = cl_gui_alv_grid=>mc_style_button."显示成按钮形式* APPEND ls_style TO gt_itab-cellstyles.* MODIFY gt_itab FROM gt_itab INDEX 7.* LOOP AT gt_itab[] INTO gt_itab.* if gt_itab-distance < 1000.* gt_itab-color = 'C610'.* endif.* IF gt_itab-carrid = 'AZ'.* ls_stylerow-fieldname = 'DISTANCE'."需对哪列进行样式设置* ls_stylerow-style = cl_gui_alv_grid=>mc_style_disabled."样式设置* APPEND ls_stylerow TO lt_styletab.* ENDIF.* IF gt_itab-carrid = 'AA'.* ls_stylerow-fieldname = 'DISTANCE'.* ls_stylerow-style = cl_gui_alv_grid=>mc_style_enabled.* APPEND ls_stylerow TO lt_styletab.* ENDIF.* GT_ITAB-cellstyles = lt_styletab.* modify GT_ITAB[] from GT_ITAB.* clear:lt_styletab[],GT_ITAB.* ENDLOOP.endif.GR_GRID->REFRESH_TABLE_DISPLAY( )."刷新ENDMETHOD.ENDCLASS.*&---------------------------------------------------------------------* *& Module STATUS_0100 OUTPUT*&---------------------------------------------------------------------* * text*----------------------------------------------------------------------* MODULE STATUS_0100 OUTPUT.SET PF-STATUS 'Z0100'.ENDMODULE. " STATUS_0100 OUTPUT*&---------------------------------------------------------------------* *& Module USER_COMMAND_0100 INPUT*&---------------------------------------------------------------------* * text*----------------------------------------------------------------------* MODULE USER_COMMAND_0100 INPUT.CASE SY-UCOMM.WHEN 'EXECUTE'.if spfli-CARRID = space AND spfli-COUNTRYFR = SPACE.SELECT*FROM spfliINTO CORRESPONDING FIELDS OF TABLE gt_itab.else.SELECT*FROM spfliINTO CORRESPONDING FIELDS OF TABLE gt_itabWHERE CARRID = spfli-CARRID.* AND COUNTRYFR LIKE spfli-COUNTRYFR.endif.DATA ls_stylerow TYPE lvc_s_styl.DATA lt_styletab TYPE lvc_t_styl.LOOP AT gt_itab[] INTO gt_itab.if gt_itab-distance < 1000.gt_itab-color = 'C610'.endif.IF gt_itab-carrid = 'AZ'.ls_stylerow-fieldname = 'DISTANCE'."需对哪列进行样式设置ls_stylerow-style = cl_gui_alv_grid=>mc_style_disabled."样式设置APPEND ls_stylerow TO lt_styletab.ENDIF.IF gt_itab-carrid = 'AA'.ls_stylerow-fieldname = 'DISTANCE'.ls_stylerow-style = cl_gui_alv_grid=>mc_style_enabled.APPEND ls_stylerow TO lt_styletab.ENDIF.GT_ITAB-cellstyles = lt_styletab.modify GT_ITAB[] from GT_ITAB.clear:lt_styletab[],GT_ITAB.ENDLOOP.IF FLAG = ''."防止重复创建容器和实例PERFORM ALV_DISPLAY.FLAG = 'X'.ENDIF.WHEN 'EXIT'.LEAVE PROGRAM.WHEN 'BACK' OR 'CANCLE'.LEAVE TO SCREEN 0.ENDCASE.GR_GRID->REFRESH_TABLE_DISPLAY( )."刷新ENDMODULE. " USER_COMMAND_0100 INPUT*&---------------------------------------------------------------------**& Form ALV_DISPLAY*&---------------------------------------------------------------------** text*----------------------------------------------------------------------** --> p1 text* <-- p2 text*----------------------------------------------------------------------*FORM ALV_DISPLAY .PERFORM GET_FIELD.CREATE OBJECT LR_CONTAINEREXPORTINGside = cl_gui_docking_container=>dock_at_RIGHTREPID = SY-REPIDDYNNR = '0100'EXTENSION = 1100.CREATE OBJECT GR_GRIDEXPORTINGI_PARENT = LR_CONTAINER.CREATE OBJECT :event_handle."为ALV按钮注册监听事件SET HANDLER :event_handle->handle_toolbar FOR GR_GRID,event_handle->handle_menu_button FOR GR_GRID,event_handle->handle_user_command FOR GR_GRID,event_handle->handle_double_click FOR GR_GRID,event_handle->handle_before_user_command FOR GR_GRID,event_handle->handle_after_user_command FOR GR_GRID."调用此方法才能激活工具栏上增加的自定义按钮* CALL METHOD GR_GRID->set_toolbar_interactive.GR_GRID->SET_TABLE_FOR_FIRST_DISPLAY(EXPORTING* I_STRUCTURE_NAME = 'SPFLI'I_SAVE = 'A'IS_VARIANT = GS_VARIANTIS_LAYOUT = GS_LAYOUT* IT_TOOLBAR_EXCLUDING = GT_TOOLBARCHANGINGIT_OUTTAB = gt_itab[]IT_FIELDCATALOG = GT_FIELD[]IT_SORT = GT_SORT[]).ENDFORM. " ALV_DISPLAY*&---------------------------------------------------------------------* *& Form GET_FIELD*&---------------------------------------------------------------------* * text*----------------------------------------------------------------------* * --> p1 text* <-- p2 text*----------------------------------------------------------------------* FORM GET_FIELD .DEFINE GET_FIELD.GS_FIELD-FIELDNAME = &1.* GS_FIELD-TXT_FIELD = &2.GS_FIELD-REF_FIELD = &2.GS_FIELD-REF_TABLE = &3.APPEND GS_FIELD TO GT_FIELD.CLEAR:GS_FIELD.END-OF-DEFINITION.GET_FIELD 'MANDT' 'MANDT' 'SPFLI' .GET_FIELD 'CARRID' 'CARRID' 'SPFLI'.GET_FIELD 'CONNID' 'CONNID' 'SPFLI'.GET_FIELD 'COUNTRYFR' 'COUNTRYFR' 'SPFLI'.GET_FIELD 'CITYFROM' 'CITYFROM' 'SPFLI'.GET_FIELD 'AIRPFROM' 'AIRPFROM' 'SPFLI'.GET_FIELD 'COUNTRYTO' 'COUNTRYTO' 'SPFLI'.GET_FIELD 'CITYTO' 'CITYTO' 'SPFLI'.GET_FIELD 'AIRPTO' 'AIRPTO' 'SPFLI'.GET_FIELD 'FLTIME' 'FLTIME' 'SPFLI'.GET_FIELD 'DEPTIME' 'DEPTIME' 'SPFLI'.GET_FIELD 'ARRTIME' 'ARRTIME' 'SPFLI'.GET_FIELD 'DISTANCE' 'DISTANCE' 'SPFLI'.GET_FIELD 'DISTID' 'DISTID' 'SPFLI'.GET_FIELD 'FLTYPE' 'FLTYPE' 'SPFLI'.GET_FIELD 'PERIOD' 'PERIOD' 'SPFLI'."变式save保存模式GS_VARIANT-REPORT = sy-repid."选择方式GS_LAYOUT-SEL_MODE = 'D'.GS_LAYOUT-CWIDTH_OPT = 'X'.gs_layout-stylefname = 'CELLSTYLES'."cellstylesgs_layout-info_fname = 'COLOR'."指定存放颜色字段* "隐藏工具栏中预置按钮（IT_TOOLBAR_EXCLUDING参数接口）* L_EXECUTE = CL_GUI_ALV_GRID=>MC_FC_SAVE_VARIANT.* APPEND L_EXECUTE TO GT_TOOLBAR.* L_EXECUTE = CL_GUI_ALV_GRID=>MC_FC_MAINTAIN_VARIANT. * APPEND L_EXECUTE TO GT_TOOLBAR.ENDFORM. " GET_FIELD。

选择功能选择某一行，某一列或者某一格是经常需要的功能。

通过layout structure的sel_mode字段可以设置alv grid的选择方式。

下面列表列举了可选择的方式和他们的功能。

除了设置这些属性外，如果你设置了可以选择多行，那么行标志缺省情况下是可见的，可以设置NO_ROWMARK来隐藏行标志。

需要注意的一点是如果ALV GRID是可编辑的，它将会替代你在layout设置中选择的选择模式。

当进行了选择以后，重要的一点便是要知道我们要选择的是什么。

可以通过以下方法来实现：GET_SELECTED_CELLS: 这个方法通过参数‘et_cell’返回类型为LVC_T_CELL的表来描述选择单元格的确切位置。

Alv grid control只返回选择单元格的确切位置。

如果你选择的是整行或整列那么这个方法不返回任何信息。

这个方法返回的是选择单元格的行属性和列属性。

GET_SELECTED_ROWS: 对于A，C，D的选择方式，你可以选择多行。

这个方法可以用来告诉你所选择的行。

他有两个参数，不过参数et_index_rows已经不用，另一个参数et_row_no 的类型为LVC_T_ROWID用来显示所选择行的索引信息。

GET_SELECTED_COLUMNS：跟前面的方法一样。

他的输出参数et_index_columns的类型为lvc_t_col来描述所选择的列信息。

在程序中你可能需要选择某些列，行或格，你可以使用这些方法的set版本来实现与前面相反的目的。

在屏幕切换之后回来到原来的屏幕，alv grid的选择信息有可能会丢掉。

应该在屏幕切换之前使用get方法得到选择信息，然后在屏幕切换之后使用set方法恢复选择信息。

REUSE_ALV_GRID_DISPLAY_LVC函数输⼊参数属性的应⽤REUSE_ALV_GRID_DISPLAY_LVC函数输⼊参数属性的应⽤前⾯我们讲过， Grid 的输出有两个：REUSE__GRID_DISPLAY 和 REUSE__GRID_DISPLAY_LVC两者的操作⼤同⼩异，只是后者能更好的和ALV容器结合使⽤，前后则不能；⽽在输⼊参数属性的结构上也有些差异。

本篇⽂章主要讲解下ALV中输⼊参数的⼀些应⽤。

⾸先了解下ALV输⼊参数的作⽤(粗体为常⽤参数):I_INTERFACE_CHECK: 检查接⼝⼀致性I_BYPASSING_BUFFER: 是否使⽤缓存I_BUFFER_ACTIVE：是否激活缓存，如果每次显⽰ALV都是相同的字段⽬录，则该字段⽬录会被放到⼀特殊的缓存⾥，加快显⽰速度。

：调⽤ALV的程序名称：ALV⼯具栏Subroutine（⼦程序）：ALV User Command Subroutine（⼦程序），实现对应菜单项及相应事件功能：ALV抬头内容信息：ALV HTML格式抬头内容信息I_CALLBACK_HTML_END_OF_LIST：ALV HTML格式页脚内容信息I_STRUCTURE_NAME：为输出表数据结构的命名，指定了这个参数，域⽬录将会⾃动⽣成I_BACKGROUND_ID：ALV背景图⽚Object ID：ALV 标题：GRID信息：ALV输出布局样式：设定显⽰的项⽬名称及输出设定：隐藏设置的ALV⼯具栏IT_SPECIAL_GROUPS / IT_SPECIAL_GROUPS_LVC：若内表中⼀些字段通过SP_GROUP被分组在⼀起，必须为这些组传递组⽂本内表：ALV排序设置IT_FILTER / IT_FILTER_LVC：ALV过滤设置IS_SEL_HIDE：替换或修改屏幕中select-option的值：⽤户是否可以定义默认的布局，’X'-可以定义默认布局，Space-不可以定义默认布局（默认：X）：保存表格布局,’X'-只能保存全局变式；’U'-只能保存特定变式；’A'-都可以保存；Space-不能保存变式（默认：space）：表格布局变式：设置事件, 类型为slis_t_event的内表（name：事件名称，form：事件的FORM）IT_EVENT_EXIT：设置回调的⽅法的执⾏⾏为，表明⽤户所写的代码是在执⾏标准执⾏之前还是之后IS_PRINT：后台打印的相关参数I_SCREEN_START_COLUMN：以对话框形式显⽰的开始列I_SCREEN_START_LINE：以对话框形式显⽰的开始⾏I_SCREEN_END_COLUMN：以对话框形式显⽰的结束列I_SCREEN_END_LINE：以对话框形式显⽰的结束⾏I_HTML_HEIGHT_TOP：HTML抬头的⾼度I_HTML_HEIGHT_END：HTML页脚的⾼度IT_ALV_GRAPHICS：是否可以在图表中显⽰ALVIT_HYPERLINK：使⽤超链接下⾯详细介绍下常⽤的输⼊参数：1. I_CALLBACK_PROGRAM 参数属性定义调⽤程序名称，⼀般为当前程序sy-repid2. I_CALLBACK_PF_STATUS_SET 参数定义ALV屏幕菜单，此参数允许报表展现⽤户⾃定义的屏幕菜单，参数类型为：SLIS_FORMNAME，指定⾃定义按钮的⼦FORM，该⼦FORM不显式的调⽤；如：i_callback_pf_status_set = 'FRM_SET_STATUS'Form中的定义为：FORM frm_set_status USING p_extab TYPE slis_t_extab.SET PF-STATUS 'Z_ALV_STATUS' .ENDFORM. " frm_set_status2.1). 没有⾃定义按钮时候，该参数可以不要，这时会显⽰ALV标准的按钮；当然这些按钮可以部分隐藏（见：）；2.2). 当我们使⽤⾃定义按钮后，ALV⾃带的标准按钮，则会失效，这时需要将⼀些必要的按钮在⼯具条补上；2.3). 其中 “分隔符” 的插⼊⽅法为：在需要插⼊分隔符的⽅框内,选择菜单：Edit->Insert-> Separator line 即可插⼊分隔符；2.4). 下⾯是ALV中的标准⼯具的名称、代码、图标名称、快捷键：名称代码图标名称快捷键刷新REFRESH ICON_REFRESH F8（可随便更改）导出为EXCEL表格EXCEL⽆Shift-F8（可随便更改）ABC 分析&ABC ICON_ABC Ctrl-F1按升序排列&OUP ICON_SORT_UP Ctrl-F4设置过滤器&ILT ICON_FILTER Ctrl-F5总计&UMC ICON_SUM Ctrl-F6邮件查收件%SL ICON_MAIL Ctrl-F7更改布局…&OL0ICON_ALV_VARIANTS Ctrl-F8选择布局…&OAD ICON_ALV_VARIANT_CHOOSECtrl-F9保存布局…&AVE ICON_ALV_VARIANT_SAVE Ctrl-F10信息&INFO ICON_INFORMATION Ctrl-F12明细&ETA ICON_SELECT_DETAIL Ctrl-Shift-F3按降序排列&ODN ICON_SORT_DOWN Ctrl-Shift-F4删除过滤器&ILD ICON_FILTER_UNDO Ctrl-Shift-F5⼩计&SUM ICON_INTERMEDIATE_SUM Ctrl-Shift-F6Microsof&VEXCEL ICON_XLS Ctrl-Shift-F7字处理&AQW ICON_WORD_PROCESSING Ctrl-Shift-F8本地⽂件%PC ICON_EXPORT Ctrl-Shift-F9打印预览&RNT_PREV ICON_LAYOUT_CONTROL Ctrl-Shift-F10图形&GRAPH ICON_GRAPHICS Ctrl-Shift-F112.5). ⼀般情况下，可以快速拷贝标准程序的菜单栏，再进⾏修改、筛选；操作步骤如下：01). 进⼊ SE80，打开 Repository Information System;02). 打开路径: Repository Information System-> Program Library->Program SubObjects->GUI Status;03). 在右边屏幕的程序名称（Program Name）输⼊框内输⼊标准程序名称：SAPLKKBL，然后执⾏；04). 在输出的列表中，找到 STANDARD 或 STANDARD_FULLSCREEN:alv_gui_status05).双击进⼊菜单编辑后，拷贝到需要⽤到的程序中即可。