zoukankan      html  css  js  c++  java
  • OO ALV 学习参考

    http://blog.csdn.net/sapliumeng/article/details/18653491

    .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相关的几个控制结构
        1.字段目录 [Field catalog]

           字段目录是用来控制ALV显示的网格中每个字段的属性的,比如字段的顺序,对齐方式,可编辑状态,颜色,等等.

           常用的控制字段如下:(下面的示例将说明这些字段的使用,参考STRUCTURE LVC_S_FCAT)

    2

    ROW_POS

    ALV 控制:输出行 (内部使用)

     

    3

    COL_POS

    ALV 控制:输出列

    列的位置,第几列,例如1,2,…..

    4

    FIELDNAME

    ALV 控制:内部表字段的字段名称

    字段名称

    5

    TABNAME

    LVC 标签名称

    表名,如果是内表,是1

    6

    CURRENCY

    ALV 控制:货币单位

     

    7

    CFIELDNAME

    ALV 控制:参考的当前单位的字段名称

     

    8

    QUANTITY

    ALV 控制:计量单位

     

    9

    QFIELDNAME

    ALV 控制:参考计量单位的字段名称

     

    10

    IFIELDNAME

    ALV 控制:内部表字段的字段名称

     

    11

    ROUND

    ALV 控制: ROUND

     

    12

    EXPONENT

    ALV 控制:流动表示的指数

     

    13

    KEY

    ALV 控制:关键字段

    关键字段,前面变蓝色

    14

    KEY_SEL

    ALV 控制:可以被隐藏的关键列

    可以被隐藏的关键列

    15

    ICON

    ALV 控制:作为图标输出

    此列作为图标输出

    16

    SYMBOL

    ALV 控制:输出作为符号

     

    17

    CHECKBOX

    ALV 控制:作为复选框输出

    复选框输出

    18

    JUST

    ALV 控制:对齐

    对齐方式: 'R': right justified 'L': left justified 'C': centered

    19

    LZERO

    ALV 控制:输出前导零

    X'

    20

    NO_SIGN

    ALV 控制:输出抑制符号

    X',不输出符号

    21

    NO_ZERO

    ALV 控制:为输出隐藏零

    X',隐藏0

    22

    NO_CONVEXT

    ALV 控制:不考虑输出的转换退出

     

    23

    EDIT_MASK

    ALV 控制:为输出编辑掩码

    格式

    24

    EMPHASIZE

    ALV 控制:带有颜色的高亮列

    列的颜色

    25

    FIX_COLUMN

    ALV 控制:固定列

     

    26

    DO_SUM

    ALV 控制:总计列值

    X',合计

    27

    NO_SUM

    ALV 控制:没有总计列值

    X' ,没有合计

    28

    NO_OUT

    ALV 控制:列没有输出

    X' ,隐藏此列

    29

    TECH

    ALV 控制:技术字段

    X'.也是隐藏,但是有点不一样

    30

    OUTPUTLEN

    ALV 控制:列的字符宽度

    输出的长度

    31

    CONVEXIT

    转换例程

     

    32

    SELTEXT

    ALV 控制:对话功能的列标识符

     

    33

    TOOLTIP

    ALV 控制:列抬头的工具提示

     

    34

    ROLLNAME

    ALV 控制: F1帮助的数据元素

     

    35

    DATATYPE

    ABAP 字典中的数据类型

    ABAP 字典中的数据类型

    36

    INTTYPE

    ABAP 数据类型(C,D,N,...)

    ABAP 数据类型(C,D,N,...)

    37

    INTLEN

    以字节计的内部长度

    内容的长度

    38

    LOWERCASE

    允许/不允许小写字母

    X' 允许大小写

    39

    REPTEXT

    标题

     

    40

    HIER_LEVEL

    ALV 控制:内部使用

     

    41

    REPREP

    ALV 控制:价值是补充/补充接口的选择标准

     

    42

    DOMNAME

    定义域名

     

    43

    SP_GROUP

    组代码

     

    44

    HOTSPOT

    ALV 控制:单击敏感

    X',下面出现下划线,响应单击

    45

    DFIELDNAME

    ALV 控制:数据库中列组的字段名称

     

    46

    COL_ID

    ALV 控制: ID

     

    47

    F4AVAILABL

    字段有输入帮助吗

    X'.此列有搜索帮助

    48

    AUTO_VALUE

    ALV 控制:自动复制值

     

    49

    CHECKTABLE

    表名

     

    50

    VALEXI

    固定值存在

     

    51

    WEB_FIELD

    ALV 控制:内部表字段的字段名称

     

    52

    HREF_HNDL

    自然数

    热点连接的句柄

    53

    STYLE

    ALV 控制:样式

    下面有例子会介绍,比如PUSHBUTTION

    54

    STYLE2

    ALV 控制:样式

     

    55

    STYLE3

    ALV 控制:样式

     

    56

    STYLE4

    ALV 控制:样式

     

    57

    DRDN_HNDL

    自然数

    下拉的句柄

    58

    DRDN_FIELD

    ALV 控制:内部表字段的字段名称

    下拉的字段

    59

    NO_MERGING

    字符字段长度 1

    相同的值不合并

    60

    H_FTYPE

    ALV 树控制:功能类型 (总计,平均,最大.最小, ...)

     

    61

    COL_OPT

    可选列优化的条目

     

    62

    NO_INIT_CH

    字符字段长度 1

     

    63

    DRDN_ALIAS

    字符字段长度 1

     

    64

    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

    COLTEXT

    ALV 控制:列标题

    列标题

    73

    SCRTEXT_L

    长字段标签

     

    74

    SCRTEXT_M

    中字段标签

     

    75

    SCRTEXT_S

    短字段标签

     

    76

    COLDDICTXT

    ALV 控制:确定 DDIC 文本参考

     

    77

    SELDDICTXT

    ALV 控制:确定 DDIC 文本参考

     

    78

    TIPDDICTXT

    ALV 控制:确定 DDIC 文本参考

     

    79

    EDIT

    ALV 控制:准备输入

    输出状态.'X'可输入

    80

    TECH_COL

    ALV 控制:内部使用

     

    81

    TECH_FORM

    ALV 控制:内部使用

     

    82

    TECH_COMP

    ALV 控制:内部使用

     

    83

    HIER_CPOS

    ALV 控制:层次列位置

     

    84

    H_COL_KEY

    树控制: 列名称/项目名称

     

    85

    H_SELECT

    标识是否可以选择树控制中的列

     

    86

    DD_ROLL

    数据元素 (语义域)

     

    87

    DRAGDROPID

    ALV 控制:&放处理拖放对象

     

    88

    MAC

    字符字段长度 1

     

    89

    INDX_FIELD

    自然数

     

    90

    INDX_CFIEL

    自然数

     

    91

    INDX_QFIEL

    自然数

     

    92

    INDX_IFIEL

    自然数

     

    93

    INDX_ROUND

    自然数

     

    94

    INDX_DECML

    自然数

     

    95

    GET_STYLE

    字符字段长度 1

     

    96

    MARK

    字符字段长度 1

     

    2.布局控制[layout]

     

       布局是用来控制整个ALV的一个布局,比如ALV的标题,是否可编辑,行颜色,列颜色.

       参照ALV的控制结构[LVC_S_LAYO],以后的例子我将详细介绍如何设置行颜色和列颜色.

       详细的结构说明

     

    字段名

    描述

     Value range

    CWIDTH_OPT

    最优化宽度

    SPACE, 'X'

    SMALLTITLE

    小标题,如果设置了这个字段, 则标题与列标题大小一样

    SPACE, 'X'

    GRID_TITLE

    标题,在网格和工具条之间

    最长70个字符

    NO_HEADERS

    如果被设置,列标题隐藏

    SPACE, 'X'

    NO_HGRIDLN

    隐藏水平线

    SPACE, 'X'

    NO_MERGING

    禁用单元格合并

    SPACE, 'X'

    NO_ROWMARK

    如果被设置,选择列在选择模式 为D和A的时候隐藏

    SPACE, 'X'

    NO_TOOLBAR

    隐藏工具条

    SPACE, 'X'

    NO_VGRIDLN

    隐藏垂直线

    SPACE, 'X'

    SEL_MODE

    选择模式

    SPACE, 'A', 'B', 'C', 'D'

    EXCP_CONDS

    合计例外

    SPACE, 'X'

    EXCP_FNAME

    字段名称带有例外编码

    最长30个字符

    EXCP_LED

    例外作为 LED

    SPACE, 'X'

    EXCP_ROLLN

    例外文档的数据元素

    SPACE, 'X'

    CTAB_FNAME

    带有复杂单元格颜色编码的字段名称

    最长30个字符

    INFO_FNAME

    带有简单行彩色代码的字段名称

    最长30个字符

    ZEBRA

    可选行颜色,如果设置了,出现了间隔色带

    SPACE, 'X'

    NO_TOTLINE

    没有总计

    SPACE, 'X'

    NUMC_TOTAL

    可以对NUMC字段进行合计

    SPACE, 'X'

    TOTALS_BEF

    总计输出在第一行,小计在新的值之前

    SPACE, 'X'

    STYLEFNAME

    设置单元格,比如PUSHBUTTON

    最长30个字符

    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 BEFOREOUTPUT .             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_CONTAINER 

          EXPORTING 

            CONTAINER_NAME = 'ALV_CON'.     

    CREATE OBJECT WCL_ALV       

      EXPORTING         

        I_PARENT = WCL_CONTAINER.

     

           *-----准备获取字段目录

    PERFORM prepare_field_catalog CHANGINGgt_fieldcat .

           *-----设置布局

    PERFORM prepare_layout CHANGING gs_layout .

           *-----显示ALV

    CALL METHODgr_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 =

    CHANGING

    it_outtab = gt_list[]

    it_fieldcatalog = gt_fieldcat

    * IT_SORT =

    * IT_FILTER =

    EXCEPTIONS

    invalid_parameter_combination = 1

    program_error = 2

    too_many_lines = 3

    OTHERS = 4 .

    ELSE .

            *----刷新ALV

    CALL METHODgr_alvgrid->refresh_table_display *

    EXPORTING * IS_STABLE = *

    I_SOFT_REFRESH =

    EXCEPTIONS

    finished = 1

    OTHERS = 2 .

    IF sy-subrc <> 0. *--异常处理 ENDIF.

    ENDIF .

     

     

     方法"set_table_for_first_display"的参数说明

     

    参数

    含义

    I_BUFFER_ACTIVE

    如果方法调用是静态的,可以设置这个标记,这表示,如果每次显示ALV都是 相同的字段目录.既然这样,那么字段目录会被放到一个特殊的缓存里, 这样加速了ALV的显示

    I_STRUCTURE_NAME

    输出数据参考的数据字典的结构名,例如'SFLIGHT'.如果指定了这个参数,字段 目录会自动生成,下面的参数IT_FIELDCATALOG不需要传值.

    IS_VARIANT

    决定布局显示的变式

    I_SAVE

    决定用户是否可以保存变式: 'X' 只能保存全局变式 'U' 只能保存特定变式 'A' 都可以保存 SPACE 不可以保存变式

    I_DEFAULT

    决定用户是否可以定义默认的布局: 'X' 可以定义默认布局,这个参数是默认的 SPACE 不可以定义默认布局

    IS_LAYOUT

    布局参数,传递布局控制的一些信息

    IS_PRINT

    后台打印属性的参数

    IT_SPECIAL_GROUPS

    如果在字段目录中,一些字段通过SP_GROUP被分组在一起.我们就必须为这些 组传递一个组的文本内表进去

    IT_TOOLBAR_EXCLUDING

    需要隐藏的标准的按钮的内表

    IT_HYPERLINK

    为每个句柄分配了超连接的内表,LVC_S_HYPE中的HREF存放了超连接的地址, HANDLE指定了句柄,使用这些句柄,你可以在GRID中使用超连接

    IT_ALV_GRAPHICS

    比较复杂,没有用过,意思好象是可以在图表中显示ALV.

    IT_OUTTAB

    输出数据存放的内表,数据都是存放在这个内表里

    IT_FIELDCATALOG

    字段目录

    IT_SORT

    排序的标准

    IT_FILTER

    过滤的标准

      

    方法"REFRESH_TABLE_DISPLAY"的参数说明

     

    参数

    含义

    IS_STABLE

    刷新的稳定性,有2个参数,一个是行,一个是列.如果设置了相应的值, 那么对应的行,或者列,在刷新的时候,将会保持稳定,就是滚动条保持不动.

    I_SOFT_REFRESH

    这个参数只是在异常情况下被使用,如果设置了这个参数,任何创建的合计, 任何排序次序,任何为了显示数据而设置的过滤都将保持不变.这个是非常 有意义的.例如:当然你没有修改数据内表里的数据而想刷新ALV,仅仅只是 改变一下布局和字段目录.

    第三步,获取要显示数据的字段目录.有两种方式.

           1.手动创建

     

    FORM prepare_field_catalog CHANGINGpt_fieldcat TYPE lvc_t_fcat . 
    
    DATA ls_fcat type lvc_s_fcat . 
    
    ls_fcat-fieldname = 'CARRID' . 
    
    ls_fcat-inttype = 'C' . l
    
    s_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 TYPElvc_t_fcat .
    
    DATA ls_fcat type lvc_s_fcat . 
    
    CALL FUNCTION 'LVC_FIELDCATALOG_MERGE' 
    
    EXPORTING i_structure_name = 'SFLIGHT' 
    
    CHANGING ct_fieldcat = pt_fieldcat[] 
    
    EXCEPTIONS
    
    inconsistent_interface = 1 
    
    program_error = 2 
    
    OTHERS = 3. 
    
    IF sy-subrc <> 0. *--Exception handling
    
    ENDIF. 
    
    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 TYPElvc_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 TYPEui_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_fieldcatalog                set_frontend_fieldcatalog

       布局:         get_frontend_layout                        set_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_fieldcatalog   
    
    IMPORTING     
    
    et_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_fieldcatalog   
    
    EXPORTING      
    
    it_fieldcatalog = lt_fcat[] .
    
     
    
    CALL METHOD gr_alvgrid->get_frontend_layout  
    
    IMPORTING     es_layout = ls_layout .    
    
    ls_layout-grid_title = 'Flights (with Payment Sums)' . 
    
    CALL METHOD gr_alvgrid->set_frontend_layout   
    
    EXPORTING     
    
    is_layout = ls_layout .

    功能二:设置排序条件

     

       有时候我们需要使用到数据的排序.这个可以通过填充参考结构LVC_T_SORT创建的内表来实现,这个内表中包含了排序的标准.可以传递给set_table_for_first_display这个方法的IT_SORT参数来初始化一个排序.

     

     FORM prepare_sort_table CHANGING pt_sort TYPElvc_t_sort .      DATA ls_sort TYPE lvc_s_sort .      ls_sort-spos = '1' .      ls_sort-fieldname = 'CARRID' .      ls_sort-up = 'X' . "A to Z      ls_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 A      APPEND 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 TYPElvc_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"可以设置我们不同的选择方式.下面是参数的介绍.和不同的地方.

     

    模式

    可能的选择

    注释

    SPACE

    等同于B

    参考B

    默认设置

    'A'

    行和列的选择,无法选择单元格

    多行,多列

    用户可以使用最左边的选择按钮来选择多行

    'B'

    单选,不可以多选行,不可以多选单元格

    多行,多列

     

    'C'

    多选,可以多选行,不可以多选单元格

    多行,多列

     

    'D'

    单元格的选择,可以多选单元格

    多行,多列,任何单元格多选

    用户可以使用最左边的选择按钮来选择多行

     

    注意:

      1.如果你设置了ALV是可编辑的,可能会覆盖你在布局中选择方式的设置的.

      2.设置了选择方式以后,我们可以使用很多方法来获取用户的选择.比如

    "GET_SELECTED_CELLS",

     "GET_SELECTED_CELLS_ID",

    "GET_SELECTED_ROWS",

    "GET_SELECTED_COLUMNS"

      3.在执行PAI以后,用户所选择的单元格,行或者列可能丢失.你可以在PBO,使用对应的SET方法来恢复这些选择.

      

    功能六:插入超链接

     

        插入超链接是通过一个含有超级链接和句柄的表来实现的.这个表类型为"LVC_T_HYPE" ,句柄是一个INT4类型的字段,我们需要在数据显示的内表中,加入这样的字段,来告诉ALV,我们的字段指定的句柄,从而找到对应的超级链接.在字段目录中,WEB_FIELD是用来指定对应的句柄名的.

     

       下面举个例子来说明,我们要为字段CARRID,CONNID建立超级链接:

     

    首先,内表定义中,我们加入2个句柄字段:

     

    DATA BEGIN OF gt_list OCCURS 0 .    

    INCLUDE STRUCTURESFLIGHT .

    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 CHANGINGpt_hype TYPE lvc_t_hype . DATA ls_hype TYPE lvc_s_hype .    ls_hype-handle = '1' .    ls_hype-href ='http://www.company.com/carrids/car1' .    APPEND ls_hype TO pt_hype .    ls_hype-handle = '2' .    ls_hype-href ='http://www.company.com/carrids/car1' .    APPEND ls_hype TO pt_hype .    ls_hype-handle = '3' .    ls_hype-href ='http://www.company.com/carrids/car1' .    APPEND ls_hype TO pt_hype .    ls_hype-handle = '4' .    ls_hype-href = 'http://www.company.com/connids/con11'.    APPEND ls_hype TO pt_hype.    ls_hype-handle = '5' .    ls_hype-href ='http://www.company.com/connids/con12'     APPEND ls_hype TO pt_hype . .. .. ENDFORM .

     

    第三.通过字段目录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 .
    
    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 ptype_dd_hndl TYPE int4 . 
    
    DATA END OF gt_list .

    定义下拉的句柄内表: 

    FORM prepare_drilldown_values. 
    
    DATA lt_ddval TYPE lvc_t_drop . 
    
    DATA ls_ddval TYPE lvc_s_drop .    
    
    ls_ddval-handle = '1' .    
    
    ls_ddval-value = 'JFK-12' .    
    
    APPEND ls_ddval TO lt_ddval .   
    
     ls_ddval-handle = '1' .   
    
     ls_ddval-value = 'JSF-44' .   
    
     APPEND ls_ddval TOlt_ddval .    
    
    ls_ddval-handle = '1' .    
    
    ls_ddval-value = 'KMDA-53' .    
    
    APPEND ls_ddval TO lt_ddval .    
    
    ls_ddval-handle = '1' .    
    
    ls_ddval-value = 'SS3O/N' .    
    
    APPEND ls_ddval TO lt_ddval . 
    
    CALL METHODgr_alvgrid->set_drop_down_table    
    
    EXPORTING       
    
    it_drop_down= lt_ddval . 
    
    ENDFORM. " prepare_drilldown_values
    
     

    准备好内表,以后,使用方法set_drop_down_table来传递给ALV.

    功能八:基于事件的附加功能

     

         作为使用面向对象的方法开发的一个组件,ALV GRID控制器有很多响应用户交互的事件.这些事件经常被用来增强一些用户响应的功能.为实现这样的功能,我们必须在程序中创建一个类的实例来作为ALV GRID实例的事件处理者.

     

        下表列出了一些ALV GRID的事件,后面的HTML列用来说明是否在HTML形式SAP GUI上支持.

     

    用户定义文本输出:

     

    Event

    Application

    HTML

    Print_end_of_list

    Define output text to be printed at the end of the entire list

    Print_top_of_list

    Define output text to be printed at begin of the entire list

    Print_top_of_page

    Define output text to be printed at begin of each page

    Print_end_of_page

    Define output text to be printed at the end of each page

    Subtotal_text

    Define self-defined subtotal texts

     

    ALV GRID的鼠标动作事件

     

    Event

    Application

    HTML

    Button_click

    Query click on a push button in the ALV GRID control

    Double_click

    Query a double click on a cell of the ALV GRID

    Hotspot_click

    Query a hotspot click on columns defined for this purpose in advance

    Ondrag

    Collect information when elements of the ALV GRID Control are dragged

    ×

    Ondrop

    Process information when elements of the ALV GRID Control are dropped

    ×

    ondropComplete

    Perform final actions after successful drag&drop

    ×

    ondropGetFlavor

    Distinguish between options for drag&drop behavior

    ×

     

    自定义和标准功能实现

     

    Event

    Application

    HTML

    Before_user_command

    Query self-defined and standard functions

    User_command

    Query self-defined function codes

    After_user_command

    Query self-defined and standard functions codes

     

    自定义功能的定义(自定义按钮,菜单等等)

     

    Event

    Application

    HTML

    Tool bar

    Change,delete or add gui elements on alv grid

    Menu_button

    Define menus for menu buttons in the toolbar

    Context_menu_request

    Change context menu

    ×

    Onf1

    Define self-defined f1 help

     

    下面是一段代码,举例说明如果定义我们的事件处理类. 

    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.
    
    METHODS HANDLE_ONF4                     "F4
        FOR EVENT ONF4 OF CL_GUI_ALV_GRID
        IMPORTING E_FIELDNAME ES_ROW_NO ER_EVENT_DATA.

    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.
     MEHTOD METHODS HANDLE_ONF4 .
    PERFORM METHODS HANDLE_ONF4 USING .
     ENDMETHOD. ENDCALSS. *光定义了这些还不够,我们需要把事件管理类注册到ALV GRID的实例事件. *--------------f4--
      DATA: L_FIELD TYPE LVC_FNAME,
            LT_F4   TYPE LVC_T_F4,
            LS_F4   TYPE LVC_S_F4.

    *  LS_F4-FIELDNAME  = 'UMSKZ'.
    *  LS_F4-REGISTER   = 'X'.
      "LS_F4-GETBEFORE  = 'X'. "打'X'会在弹出窗体之前先刷新ALV数据
      "LS_F4-CHNGEAFTER = 'X'. "打'X'会在关闭窗体之后刷新ALV数据
      "LS_F4-INTERNAL   = ''.
      INSERT LS_F4 INTO TABLE LT_F4.

      CALL FUNCTION 'GET_GLOBALS_FROM_SLVC_FULLSCR'
        IMPORTING
          E_GRID = TEM_GRID.

      CALL METHOD TEM_GRID->REGISTER_EDIT_EVENT     "注册GRID事件
        EXPORTING
          I_EVENT_ID = CL_GUI_ALV_GRID=>MC_EVT_ENTER"事件:回车
        EXCEPTIONS
          ERROR      = 1
          OTHERS     = 2.

    *  CALL METHOD TEM_GRID->REGISTER_F4_FOR_FIELDS
    *    EXPORTING
    *      IT_F4 = LT_F4.

      CREATE OBJECT GT_EVENT_RECEIVER.
      SET HANDLER GT_EVENT_RECEIVER->HANDLE_MODIFY FOR TEM_GRID.
      SET HANDLER GT_EVENT_RECEIVER->HANDLE_ONF4   FOR TEM_GRID.

    *-----------
    DATA gr_event_handler TYPE REF TOlcl_event_handler . .. .. *--Creating an instance for the eventhandler
    CREATE OBJECT gr_event_handler . *--Registering handler methods to handleALV Grid events
    SET HANDLERgr_event_handler->handle_user_command FOR gr_alvgrid .
    SET HANDLERgr_event_handler->handle_toolbar FOR gr_alvgrid .
    SET HANDLERgr_event_handler->handle_menu_button FOR gr_alvgrid .
    SET HANDLERgr_event_handler->handle_double_click FOR gr_alvgrid .
    SET
    HANDLERgr_event_handler->handle_hotspot_click FOR gr_alvgrid .
    SET HANDLERgr_event_handler->handle_button_click FOR gr_alvgrid .
    SET HANDLERgr_event_handler->handle_before_user_command FOR gr_alvgrid .
    SET HANDLERgr_event_handler->handle_context_menu_request FOR gr_alvgrid .
    SET HANDLERgr_event_handler->handle_data_changed FOR gr_alvgrid .
    SET HANDLER gr_event_handler->handle_data_changed_finished FOR 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_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.

    增加自定义按钮的结构如下:

    Field

    Description

    FUNCTION

    功能代码

    BUTN_TYPE

    按钮类型

    可用的按钮类型:

    0                                                     Button(normal)

    1                                                     Menu and default button

    2                                                     Menu

    3                                                     分割符

    4                                                     Radio button

    5                                                     Checkbox

    6                                                     Menu entry

    ICON

    按钮图标(可选)

    TEXT

    按钮文本(可选)

    QUICKINFO

    按钮的悬停文本(可选)

    DISABLED

    灰化

    在上面的代码例子里,我们增加了一个常规的按钮和一个含有菜单的按钮.通过把按钮的类型设置为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来获取选择的行.功能EXCH2个子功能,所以我们不需要实现它.为了能显示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 .    
    
    CASE e_ucomm .      
    
    WHEN '&INFO' .        
    
    CALL FUNCTION 'ZSFLIGHT_PROG_INFO' .        
    
    CALL METHOD gr_alvgrid->set_user_command            
    
    EXPORTING i_ucomm = space.    ENDCASE .  E
    
    NDFORM .

        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_ENABLEDCL_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_changeddata_changed_finished.第一个事件在可编辑字段的数据发生变化时触发,可用来检查数据的输入,第二个事件是当数据修改完成后触发。

        

             我们可以通过方式REGISTER_EDIT_EVENT来设置,如何触发数据改变事件.2种方式:

         1.按回车触发:      i_event_id = cl_gui_alv_grid=>mc_evt_enter

         2.单元格失去焦点:   i_event_id = cl_gui_alv_grid=>mc_evt_modified

     

    必须设置一种方式,要不然数据变化事件不会被触发.

     

             为了获取ALV里字段修改的一些信息,DATA_CHANGED事件会把参考CL_ALV_CHANGED_DATA_PROTOCOL创建的实例通过参数ER_DATA_CHANGED传递给ALV.

    通过这个参数我们可以知道哪些单元格被修改了,修改了什么值.下面是类CL_ALV_CHANGED_DATA_PROTOCOL的一些方法:

    Get_cell_value

    获取单元格的值

    Modify_cell

    修改单元格

    Add_protocol_entry

    增加日志记录

    Protocol_is_visible

    是否允许错误表可见

    Refresh_protocol

    刷新日志记录

     

      通过这个类的属性,我们可以查到一些修改信息:

    MT_MOD_CELLS

    Contains address of modified cells with rowed and field name

    MT_MOD_ROWS

    Contain modified rows Its type is genric

    MT_GOOD_CELLS

    Contain cells have proper values

    MT_DELETED_ROWS

    Contain rows deleted from the list

    MT_INSERTED_ROWS

    Contain rows deleted from the list

    通过上述一系列方式和属性,可以获取修改的值,而进行一些输入的检查.

     

     

    下面是一段示例代码:

     

    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.

    附录:ABAP颜色代码

    ABAP中的颜色代码是由4位字都组成的

    Cxyz

    C:color的简写,颜色代码均以C开头

       x:标准色代码,SAP中一共有7个标准色

       y:反转颜色启用/关闭 1/0

       z:增强颜色启用/关闭 1/0

    注意:

       颜色设置中有优先级顺序,他们是单元格--->--->.

     

     
                
  • 相关阅读:
    《一线架构师实践指南》第三编Refined Architecture阶段读后感
    大数据技术与应用课堂测试2-数据初级分析分类2
    大数据技术与应用课堂测试2-数据初级分析分类
    对Datax的理解
    2020春季学期第三周总结
    可测试性战术总结
    2020春季学期第一周总结
    以《淘宝网》为例,描述质量属性的六个常见属性场景
    软件架构师如何工作
    MapReduce+HIVE 课堂练习
  • 原文地址:https://www.cnblogs.com/mingdashu/p/6163355.html
Copyright © 2011-2022 走看看