3

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

        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 List,而不是 ALV Grid。我查看了BALVBT01具有 2 级标题的示例程序,但事实证明这是因为它们正在显示父/子数据。我的数据只有一个级别,我只想对列进行分组。

4

1 回答 1

4

在这里找到我的解决方案。

在打印标准标题之前,使用该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.
于 2010-06-14T22:34:31.593 回答