ALV列表中的2级列标题

时间:2010-06-14 21:41:43

标签: abap

我想添加一个对列标题进行分组的标题行。

        Departure                   Arrival        <-- This row is what I want to add
Airport    Gate    Date    Airport    Gate    Date
--------   -----   -----   --------   -----   -------
O'Hare     A10     10Mar   Atlanta    G19     10Mar
DFW        K98     11Mar   Denver     Z76     11Mar

请注意,我使用的是ALV 列表,而不是ALV网格。我查看了具有2级标题的示例程序BALVBT01但事实证明它是因为它们显示父/子数据。我的数据只有一个级别,我只想对列进行分组。

1 个答案:

答案 0 :(得分:3)

找到我的解决方案here。在打印标准标题之前,使用top_of_list事件添加自定义标题信息。如果您想用自己的标头替换标准标头,可以通过在布局表中传递is_layout-no_colhead = 'X'来关闭标准标头。

* Get Event table
CALL FUNCTION 'REUSE_ALV_EVENTS_GET'
IMPORTING
et_events = it_evt.

* Add pointer to custom top_of_list event handler
READ TABLE it_evt INTO wa_evt
WITH KEY name = slis_ev_top_of_list .
wa_evt-form = 'MY_TOP_OF_LIST' .
MODIFY it_evt FROM wa_evt INDEX sy-tabix .

* Pass event table when printing ALV list
CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
  EXPORTING
    i_callback_program = w_prog
    is_layout          = fs_layout
    it_fieldcat        = t_fieldcat
    it_events          = it_evt
  TABLES
    t_outtab           = t_spfli.

************************************
* Custom event handler to write group-level header
FORM MY_TOP_OF_LIST .
ULINE AT 1(43) .
FORMAT COLOR COL_HEADING .
WRITE: / sy-vline ,
       10 'SAP' ,
       22 sy-vline ,
       31 'VPPA' ,
       43 sy-vline .
ENDFORM.