一.ALV介绍 The ALV Grid Control (ALV = SAPList Viewer)是一个显示列表的灵活的工具,它提供了基本功能的列表操作,也可以通过自定义来进行增强,因此可以允许你可以在大型的应用程序中使用. 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 refto cl_gui_alv_grid.
ALV GRID继承结构: 四、ALV GRID相关的几个控制结构 字段目录是用来控制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: *--- 存放字段目录的内表 *----声明需要显示的内表(以SFLIGHT为例) DATA BEGIN OF gt_list OCCURS 0 .
第二步: 创建ALV这个对象,它的父组件是那个容器. 在PBO中写入如下代码:
PROCESS BEFOREOUTPUT .
创建DISPLAY_ALV的MODULE后,写下如下代码: MODULE display_alv OUTPUT .
在FORM DISPLAY_ALV中,判断ALV实例是否存在,如果不存在,则创建: IF WCL_ALV IS INITIAL . CREATE OBJECT: WCL_CONTAINER EXPORTING CONTAINER_NAME = 'ALV_CON'.
*-----准备获取字段目录 PERFORM prepare_field_catalog CHANGINGgt_fieldcat . *-----设置布局 PERFORM prepare_layout CHANGING gs_layout . *-----显示ALV CALL METHODgr_alvgrid->set_table_for_first_display ELSE . *----刷新ALV CALL METHODgr_alvgrid->refresh_table_display
ENDIF .
方法"set_table_for_first_display"的参数说明
方法"REFRESH_TABLE_DISPLAY"的参数说明
第三步,获取要显示数据的字段目录.有两种方式. 1.手动创建 FORM prepare_field_catalog CHANGINGpt_fieldcat TYPE lvc_t_fcat . 2.半自动的创建 FORM prepare_field_catalog CHANGING pt_fieldcat TYPElvc_t_fcat . 第四步,设置布局
FORM prepare_layout CHANGING ps_layout TYPElvc_s_layo.
第五步,排除不需要的标准按钮(可选,这个是第一种方法,还有另外一种,在添加自定义的按钮的时候介绍) 在你的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 TYPEui_functions .
按照上面的步骤,一个ALV的DEMO基本可以创建了.下面我们将讲述一些功能.
功能一:在第一次显示以后,修改字段目录和布局.
在运行的时候,很有可能需要在显示之后,需要设置一个新的布局或者字段目录.有下面这些方法去实现.
字段目录 : get_frontend_fieldcatalog 布局: get_frontend_layout
使用这些方法,你在执行的任何时候,可以获取这些内容,然后修改他们.
DATA ls_fcat TYPE lvc_s_fcat .
CALL METHOD gr_alvgrid->get_frontend_layout 功能二:设置排序条件
有时候我们需要使用到数据的排序.这个可以通过填充参考结构LVC_T_SORT创建的内表来实现,这个内表中包含了排序的标准.可以传递给set_table_for_first_display这个方法的IT_SORT参数来初始化一个排序.
FORM prepare_sort_table CHANGING pt_sort TYPElvc_t_sort .
这有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 TYPElvc_t_filt .
我们可以使用"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 | | | 其中C是固定的第一位,第二位代表是颜色编码(1到7),第三位是加强的设置,第四位是相反,个人理解,在强化关闭的情况下,相反的作用是背景和字体的变化.
颜色编码:
A)设置列的颜色.
我们可以通过字段目录的"emphasize"控制字段来控制某列的颜色.这个字段同样是4位的CHAR型,传入上述的颜色编码.例如: LS_FCAT-EMPHASIZE = 'C701'.
如果这列被设置为关键列,就是 LS_FCAT-KEY = 'X' ,那么颜色设置就不会起作用.请注意,自动产生的字段目录中,KEY的设置是自动获取的.
B)设置行的颜色
为某行设置颜色,是有点复杂的,我们需要在要显示的数据内表中增加一个字段,这个字段不需要在字段目录中存在.同样,这个字段也是4位的CHAR型,符合颜色编码的定义. 那我们就需要这样来定义我们的数据内表:
DATA BEGIN OFgt_list OCCURS 0 .
很明显,填入颜色编码以后,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 . DATA ls_cellcolor TYPE lvc_s_scol .
注意: 颜色设置中有优先级顺序,他们是单元格--->行--->列.
功能六:插入超链接
插入超链接是通过一个含有超级链接和句柄的表来实现的.这个表类型为"LVC_T_HYPE" ,句柄是一个INT4类型的字段,我们需要在数据显示的内表中,加入这样的字段,来告诉ALV,我们的字段指定的句柄,从而找到对应的超级链接.在字段目录中,WEB_FIELD是用来指定对应的句柄名的.
下面举个例子来说明,我们要为字段CARRID,CONNID建立超级链接:
首先,内表定义中,我们加入2个句柄字段:
DATA BEGIN OF gt_list OCCURS 0 .
第二: 建立一个超级链接内表,里面存放句柄所对应的超级链接.创建的时候注意,它参考的表类型,一定是"LVC_T_HYPE".
FORM prepare_hyperlinks_table CHANGINGpt_hype TYPE lvc_t_hype .
第三.通过字段目录FIELDCATLOG来指定相应的句柄字段.
对于CARRID的field catalog Ls_fieldcat-web_field = ‘CARRID_HANDLE’. 对于CONNID的field catalog Ls_fieldcat-web_field = ‘CONNID_HANDLE’.
在方法"SET_TABLE_FOR_FIRST_DISPLAY"中把句柄内表传给参数it_hyperlink。
第四:在数据显示的内表中,指定对应的句柄:
LOOP AT gt_list. IF gt_list-carrid = ‘XX’. Gt_list-carrid_handle = ‘1’. IF gt_list-connid = ‘01’. Gt_list-connid_handle = ‘4’. ENDIF. ENDIF. ENDLOOP.
功能七:把字段设置为下拉
有时候我们可以把一些字段设置为下拉,比如一些类型,一些字段的值是比较固定的一些值,当然,我们也可以通过搜索帮助来做,这些只是看各自的爱好和需要了. 设置为下拉,和上一篇设置超级链接是类似的,也是使用了一个内表存放了句柄和对应的值,这个表类型为"LVC_T_DROP".不过传递给ALV的方式有点区别.超级链接是通过方法"SET_TABLE_FOR_FIRST_DISPLAY"的参数来传递的,而下拉的内表传递需要使用方法"SET_DROP_DOWN_TABLE". 如果我们希望把这个列都设置为下拉,那么我们可以在字段目录中,把控制字段"DRDN_HNDL"指向对应的下拉内表的句柄就可以了.例如:
ps_fcat-drdn_hndl = '1' .
如果是某个单元格设置为下拉,那我们就需要在数据显示的内表中增加一个句柄字段(如果是有多个不同的字段需要设置下拉,可以增加多个字段),同时得在字段目录里设置"DRDN_FIELD".例如:
ps_fcat-drdn_field= 'PTYP_DD_HNDL' .
数据显示内表定义为:
DATA BEGIN OF gt_list OCCURS 0 .
定义下拉的句柄内表:
FORM prepare_drilldown_values.
准备好内表,以后,使用方法set_drop_down_table来传递给ALV.
功能八:基于事件的附加功能
作为使用面向对象的方法开发的一个组件,ALV GRID控制器有很多响应用户交互的事件.这些事件经常被用来增强一些用户响应的功能.为实现这样的功能,我们必须在程序中创建一个类的实例来作为ALV GRID实例的事件处理者.
下表列出了一些ALV GRID的事件,后面的HTML列用来说明是否在HTML形式SAP GUI上支持.
用户定义文本输出:
ALV GRID的鼠标动作事件
自定义和标准功能实现
自定义功能的定义(自定义按钮,菜单等等)
下面是一段代码,举例说明如果定义我们的事件处理类.
CLAS lcl_event_handler DEFINITION. PUBLIC SECTION. METHODS: *--在ALV的工具条上增加新的按钮 Handle_toolbarFOR EVENT toolbar OF cl_gui_alv_grid IMPORTING e_object e_interactive, *--实现用户命令 Handle_user_command FOR EVENT user_command OF cl_gui_alv_grid IMPORTING e_ucomm. *--热点点击控制 Handle_hotspot_click FOR EVENT hotspot_click OF cl_gui_alv_grid IMPORTING e_row_id e_column_id es_row_no. *--在用户命令触发之前 Handle_before_user_command FOR EVENT before_user_command OF cl_gui_alv_grid IMPORTING e_ucomm. *--在用户命令触发之后 Handle_after_user_command FOR EVENT after_user_command OF cl_gui_alv_grid IMPORTING e_ucomm. *--在ALV可修改的情况下,控制数据修改 Handle_data_changed FOR EVENT data_changed OF cl_gui_alv_grid IMPORTING er_data_changed. *--在数据修改完成之后 Handle_data_changed_finished FOR EVENT data_changed_finished OF cl_gui_alv_grid IMPORTING e_modified. *--管理菜单 Handle_menu_button FOR EVENT menu_button OF cl_gui_alv_grid IMPORTING e_object e_ucomm. *--管理按钮点击 Handle_button_click FOR EVENT button_click OF cl_gui_alv_grid IMPORTING e_objec e_ucomm. PRIVATE SECTION. ENDCLASS.
下面是类的实现的一些概要代码,参数可以从ALV的事件中直接获取出来:
CLASS lcl_event_handler IMPLEMENTATION. *-- Handle toolbar METHOD handle_toolbar. PERFORM handle_toolbarUSIGN e_object e_interactive. ENDMETHOD. *-- Handle hotspot click METHOD handle_hotspot_click. PERFORMhandle_hotspot_click USING e_row_id e_column_id es_row_no. ENDMETHOD. *-- Handle double click METHOD handle_double_click. PERFORMhandle_double_click USING e_row e_column es_row_no. ENDMETHOD. *-- Handle after user command METHOD handle _after_user_command. PERFORMhandle_after_user_command USING e_object. ENDFORM. *-- Handle before user command METHOD handle_before_user_command. PERFORMhandle_before_user_command. ENDMETHOD. *--Handle data changed METHOD handle_data_changed. PERFORMhandle_data_changed USING er_data_changed. ENDMEHTOD. METHOD handle_data_changed_finished. PERFORMhandle_data_chaged USING e_modified. ENDMETHOD. METHOD handle_menu_button. PERFORMhandle_menu_button USING e_object e_ucomm. ENDMEHTOD. MEHTOD handle_button_click. PERFORMhandle_button_click USING e_objcet e_ucomm. ENDMETHOD. ENDCALSS.
光定义了这些还不够,我们需要把事件管理类注册到ALV GRID的实例事件.
DATA gr_event_handler TYPE REF TOlcl_event_handler .
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_idTYPE lvc_s_row I_column_id TYPE lvc_s_col Is_row_no TYPE lvc_s_roid. READ TABLE gt_list INDEXis_row_no-rowid. IF sy-subrc = 0 ANDi_column_id-fieldname = ‘SEATSOCC’. CALLSCREEN 200. ENDIF. ENDFORM.
当点击的字段是SEATSOCC,调用屏幕200.
2.双击事件
双击事件和单击事件的处理是类似的,同样也是3个参数.我们不需要设置字段目录就可以响应双击事件了.
下面是示例:
FORM handle_double_click USING i_row TYPElvc_s_row I_column TYPE lvc_s_col Is_row_no TYPE lvc_s_rowid. READ TABLE gt_list INDEXis_row_no-row_id. IF sy-subrc = 0 ANDi_column-fieldname = ‘SEATSOCC’. CALLSCREEN 200. ENDIF. ENDFORM.
当然鼠标双击字段SEATSOCC才调用屏幕200.
3.添加自定义的按钮和响应命令
我们在ALV的工具条上增加一些按钮来增加我们自定义的功能,当然也可以在GUI状态中增加,2种的处理方式是不一样的. 我们通过toolbar事件来增加按钮,然后通过user_command事件来实现我们自定义的功能.
在TOOLBAR事件里,我们把自定义的按钮加到参数"e_object"的表属性"mt_toolbar"中可以了.下面是一段示例代码:
FORM handle_toolbar USING i_object TYPE REFTO cl_alv_event_toolbar_set. DATA: ls_toolbar TYPEstb_button.
CLEAR ls_toolbar. MOVE 3 TOls_toolbar-butn_type. APPEND ls_toolbar TOi_object->mt_toolbar.
CLEAR ls_toolbar. MOVE 'PER' TOls_toolbar-function. MOVE icon_display_text TOls_toolbar-icon. MOVE 'Passenger Info'(201) TOls_toolbar-quickinfo. MOVE 'Passenger Info'(201) TOls_toolbar-text. MOVE ' ' TOls_toolbar-disabled. APPEND ls_toolbar TOi_object->mt_toolbar.
CLEAR ls_toolbar. MOVE 'EXCH' TOls_toolbar-function. MOVE 2 TOls_toolbar-butn_type. MOVE icon_calculation TOls_toolbar-icon. MOVE 'Payment in otherCurencies'(202) TO ls_toolbar-quickinfo. MOVE ' ' TOls_toolbar-text. MOVE ' ' TOls_toolbar-disapbled. APPEND ls_toolbar TOi_object->mt_toolbar. ENDFORM.
增加自定义按钮的结构如下:
在上面的代码例子里,我们增加了一个常规的按钮和一个含有菜单的按钮.通过把按钮的类型设置为1或者2,我们可以增加一个含有菜单的按钮,在事件menu_button还可以实现子菜单: FORM handle_menu_button USING i_object TYPEREF TO cl_ctmenu I_ucommTYPE syucomm.. CASE i_ucomm. WHEN ‘EXCH’. CALLMETHOD i_object->add_function EXPORTING Fcode = ‘EU’ Text = ‘Euro’. CALLMETHOD i_object->add_function EXPORTING Fcode = ‘TRL’ Text = ‘Turkish Lira’. ENDCASE. ENDFORM.
为了实现这些自定义的按钮的功能,我们使用USER_COMMAND事件来处理.
FORM handle_user_command USING i_ucomm TYPEsy-ucomm. DATA lt_selected_rows TYPElvc_t_rowid. DATA ls_selected_row TYPE lvc_s_roid.
CALL METHODgr_alvgrid->get_selected_rows IMPORTING Et_row_no = lt_selected_rows. READ TABLE lt_selected_rows INTOls_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_listINDEX ls_selected_row-row_id. IF sy-subrc = 0. CALLFUNCTION 'ZDISPLAY_CARRIER_INFO' EXPORTING carrid = gt_list-carrid EXCEPTIONS carrier_not_found = 1 Oters = 2. ENDIF. WHEN 'EU'. READ TABLE gt_listINDEX 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 METHODgr_alv_grid->set_toolbar_interactive. 4.覆盖标准的功能.
ALV也给我们提供了修改标准功能的机会.为了实现这个目的,我们需要在"before_user_command"事件中截取标准的功能,然后使用方法"set_user_command"来修改功能码,可以指向自己定义的功能码.
下面是示例:
FORM handle_before_user_command USINGi_ucomm TYPE syucomm .
5.设置单元格的风格(style不知道符合翻译为好,这里的style可以在CL_GUI_ALV_GRID的属性中可以查到,分MC_STYLE4_LINK,MC_STYLE4_LINK_NO,MC_STYLE_BUTTON,MC_STYLE_DISABLED,....),包含单元格级别的可编辑/不可编辑,是否有F4,是否有链接,把单元格设置为按钮,单元格级别的热点......
5.1 把单元格设置为PUSHBUTTON
要想实现这个功能,我们需要在数据显示内表增加一个表字段,参考表类型"LVC_T_STYL".数据实现内表定义为:
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 cellstyles TYPE lvc_t_styl. DATA END OF gt_list.
把需要设置为按钮的字段填进内表字段中:
把第7行的字段SEATSMAX设置为按钮.
DATA ls_style TYPE lvc_s_styl. READ TABLE gt_list INDEX 7. Ls_style-fieldname = 'SEATSMAX'. Ls_style-style =cl_gui_alv_grid=>mc_style_button. APPEND ls_style TO gt_list-cellstyles. MODIFY gt_list INDEX 7.
然后在布局中指定对应的STYLE内表字段,注意字段名字一定要对上:
gs_layout-stylefname = 'CELLSTYLES'.
这里的按钮点击事件和单击事件类似,也是需要2个参数来确定位置.
5.2设置单元格级别的可编辑和不可编辑
单元格级别的可编辑和不可编辑是个非常有用的功能,在SAP标准的一些事务中,经常可以看到这些方面的应用.通常用到的比较多的地方,是需要数据验证的,比如输入类型A,后面的某个字段才可以编辑,如果输入了类型B,后面的这个字段就不可编辑.
想让一列可以编辑,我们可以在字段目录中设置EDIT为"X".在可编辑的情况下,ALV会自动多出来几个编辑按钮,删除,新增,插入,复制.如果你不需要它们,可以使用前面介绍的方法灭了它们.
单元格级别的可编辑和不可编辑,实现起来和5.1是类似的,也是内表字段,参考表类型"LVC_T_STYL".不过填入的style应该为CL_GUI_ALV_GRID=>MC_STYLE_ENABLED和CL_GUI_ALV_GRID=>MC_STYLE_DISABLED.指定字段名就可以.CL_GUI_ALV_GRID=>MC_STYLE_ENABLED使字段可以编辑,而CL_GUI_ALV_GRID=>MC_STYLE_DISABLED使字段不可以编辑.代码如下:
FORM adjust_edittables USING pt_list LIKEgt_list[]. DATA ls_listrow LIKE LINE OF pt_list. DATA ls_stylerow TYPE lvc_s_styl. DATA lt_styletab TYPE lvc_t_styl.
LOOP AT pt_list INTO ls_listrow. IFls_listrow-carrid = 'XY'. Ls_stylerow-fieldname= 'SEATSMAX'. Ls_stylerow-style= cl_alv_grid=>mc_style_disabled. APPENDls_stylerow TO lt_styletab. ENDIF. IFls_listrow-connid = '02'. Ls_stylerow-fieldname= 'PLANETYPE' Ls_stylerow-style= cl_alv_grid=>mc_style_enabled. APPENDls_Pstylerow TO lt_styletab. ENDIF. INSERTLINES OF lt_styletab INTO ls_listrow-cellstyles. MODIFYpt_list FROM ls_listrow. ENDLOOP. ENDFORM.
当然也是一样,需要告诉ALV哪个字段是控制STYLE的内表字段.
gs_layout-stylefname ='CELLSTYLES'.
一般情况下,单元格的设置会覆盖整列的设置。如果想在程序里动态切换各种模式。只需要修改内表里关于STYLE设置的值然后刷新.使用方法set_ready_for_input传入参数i_ready_for_input = 1可以是ALV进入编辑状态。 使用这个方法可以使ALV在编辑和不可编辑模式之间切换。显然如果把参数i_ready_for_input设置为0就进入不可编辑状态。
当然还可以设置搜索帮助啊,等等,这里就不一一赘述了。
6. 控制数据变化
我们可以设置alv处于可编辑状态,当然ALV也提供给我们控制数据的输入。Alv grid有两个事件:data_changed和data_changed_finished.第一个事件在可编辑字段的数据发生变化时触发,可用来检查数据的输入,第二个事件是当数据修改完成后触发。
我们可以通过方式REGISTER_EDIT_EVENT来设置,如何触发数据改变事件.2种方式: 1.按回车触发: i_event_id = cl_gui_alv_grid=>mc_event_enter 2.单元格失去焦点: i_event_id = cl_gui_alv_grid=>mc_event_modifies
必须设置一种方式,要不然数据变化事件不会被触发.
为了获取ALV里字段修改的一些信息,DATA_CHANGED事件会把参考CL_ALV_CHANGED_DATA_PROTOCOL创建的实例通过参数ER_DATA_CHANGED传递给ALV.通过这个参数我们可以知道哪些单元格被修改了,修改了什么值.下面是类CL_ALV_CHANGED_DATA_PROTOCOL的一些方法:
通过这个类的属性,我们可以查到一些修改信息:
通过上述一系列方式和属性,可以获取修改的值,而进行一些输入的检查.
下面是一段示例代码:
FORM handle_data_changed USINGir_data_changed TYPE REF TO cl_alv_changed_data_protocol. DATA: ls_mod_cell TYPE lvc_s_modi, Lv_value TYPE lvc_value.
SORT ir_data_changed->mt_mod_cellsBY row_id. LOOP ATir_data_changed->mt_mod_cells INTO ls_mod_cell WHERE fieldname = 'SEATSMAX'. CALLMETHOD ir_data_changed->get_cell_value EXPORTING i_row_id = ls_mod_cell-row_id I_fieldname = 'CARRID' IMPORTING e_value = lv_value. IFlv_value = 'THY' AND ls_mod_cell-value > '500'. CALL METHOD ir_data_changed->add_protocol_entry EXPORTING I_msgid = 'SU' I_msgno = '000' I_msgty = 'E' I_msgv1 = 'This number can not exceed 500 for ' I_msgv2 = lv_value I_msgv3 = 'The value is et to ''500''' I_fieldname = ls_mod_cell-fieldname I_row_id = ls_mod_cell-rowid. CALL METHOD ir_data_changed->modify_cell EXPORTING i_row_id = ls_mod_cell-row_id I_fieldname = ls_mod_cell-fieldname I_value = '500'. ENDIF. ENDLOOP. ENDFORM.
ALV颜色设置ALV颜色设置实践与总结 一.行颜色 1. 在结果内表中添加字段 color(4) TYPE c ,用来存储四位颜色值. 2. 在内表循环中给这个字段赋值,比如'C310' 黄色. 3. 最关键的一点,在layout结构中设定颜色字段的名字,代码如下: is_layout-info_fieldname = 'COLOR'. " 行颜色字段 is_layout 是我们声明的一个ALV的 type slis_layout_alv 的结构. 二.列颜色 列颜色较为简单,我们在填充结构 it_fieldcat TYPE slis_t_fieldcat_alv 时,为每一列直接赋值就好了。 三.单元格颜色 1.在结果内表中添加字段 cellcolor TYPE lvc_t_scol . 这是一个内表,用来存储单元格的颜色。 2. 在内表循环中给这个内表赋值,示例代码如下: PERFORM fill_cellcolor CHANGING wa_result-cellcolor. " 单元格高亮(黄色) is_layout-coltab_fieldname = 'CELLCOLOR'. " 单元格颜色字段 总结: 当同时设定了行颜色和列颜色后,行颜色会覆盖列颜色,有的时候用户不希望这种结果的出现,解决办法就是设定每行的单元格(当然不包括与设定列颜色的列相交叉的单元格)的颜色。 附录:ABAP颜色代码 ABAP中的颜色代码是由4位字都组成的 Cxyz C:color的简写,颜色代码均以C开头 x:标准色代码,SAP中一共有7个标准色 y:反转颜色启用/关闭 1/0 z:增强颜色启用/关闭 1/0 标准色代码一览表 |
|