Re: How to add multiple column header using factory model alv grid display?

Hi Anish balachandran,

Use REUSE_ALV_LIST_DISPLAY for getting two headers,

see this link..

http://scn.sap.com/thread/3159254

TYPE-POOLS: slis, icon.

DATA: it_fieldcat  TYPE  slis_fieldcat_alv.
DATA: t_alv_fieldcat      TYPE slis_t_fieldcat_alv WITHHEADERLINE,
       alv_layout TYPE slis_layout_alv .


DATA : it_fld TYPE slis_t_fieldcat_alv,
        it_evt TYPE slis_t_event,
        wa_fld TYPE slis_fieldcat_alv,
        wa_evt TYPE slis_alv_event,
        wa_lay TYPE slis_layout_alv.

DATA: BEGINOF itab OCCURS0,
       carrid LIKE sflight-carrid,
       connid LIKE sflight-connid,
       planetype LIKE sflight-planetype,
       seatsmax LIKE sflight-seatsmax,
       ENDOF itab.

START-OF-SELECTION.

   SELECT carrid connid planetype seatsmax
           FROM sflight
           INTOTABLE itab.

   CALLFUNCTION'REUSE_ALV_EVENTS_GET'
     IMPORTING
       et_events = it_evt.

   READTABLE it_evt INTO wa_evt
        WITHKEY name = slis_ev_after_line_output .
                 wa_evt-form = slis_ev_after_line_output .

   MODIFY it_evt FROM wa_evt INDEX sy-tabix .

   READTABLE it_evt INTO wa_evt
        WITHKEY name = slis_ev_top_of_page .
   wa_evt-form = slis_ev_top_of_page .
   MODIFY it_evt FROM wa_evt INDEX sy-tabix .

   CLEAR: it_fieldcat.
   it_fieldcat-tabname       = 'ITAB'.
   it_fieldcat-fieldname     = 'CARRID'.
   it_fieldcat-ref_tabname   = 'SFLIGHT'.
   it_fieldcat-outputlen     = '10'.
   APPEND it_fieldcat TO t_alv_fieldcat.
   CLEAR it_fieldcat.

   CLEAR: it_fieldcat.
   it_fieldcat-tabname       = 'ITAB'.
   it_fieldcat-fieldname     = 'CONNID'.
   it_fieldcat-ref_tabname   = 'SFLIGHT'.
   it_fieldcat-outputlen     = '10'.
   APPEND it_fieldcat TO t_alv_fieldcat.
   CLEAR it_fieldcat.

   CLEAR: it_fieldcat.
   it_fieldcat-tabname       = 'ITAB'.
   it_fieldcat-fieldname     = 'PLANETYPE'.
   it_fieldcat-ref_tabname   = 'SFLIGHT'.
   it_fieldcat-outputlen     = '10'.
   APPEND it_fieldcat TO t_alv_fieldcat.
   CLEAR it_fieldcat.

   CLEAR: it_fieldcat.
   it_fieldcat-tabname       = 'ITAB'.
   it_fieldcat-fieldname     = 'SEATSMAX'.
   it_fieldcat-ref_tabname   = 'SFLIGHT'.
   it_fieldcat-outputlen     = '10'.
   APPEND it_fieldcat TO t_alv_fieldcat.
   CLEAR it_fieldcat.

   alv_layout-no_colhead = 'X' .

   CALLFUNCTION'REUSE_ALV_LIST_DISPLAY'
     EXPORTING
       is_layout          = alv_layout
       i_bypassing_buffer = 'X'
       i_callback_program = sy-repid
       it_fieldcat        = t_alv_fieldcat[]
       it_events          = it_evt
       i_save             = 'A'
     TABLES
       t_outtab           = itab. "internal table

   IF sy-subrc <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
*         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
   ENDIF.

*&---------------------------------------------------------------------*
*&      Form  top_of_page
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
FORM top_of_page .

   ULINEAT1(45) .

   FORMATCOLOR7 .

   WRITE: / sy-vline , 02'HEADER 1',
   23 sy-vline, 25'HEADER 2', 45 sy-vline.

   WRITE: / sy-vline , 02'CARRID' ,12 sy-vline, 14'CONNID',
   23 sy-vline, 25'PLANE ', 34 sy-vline, 36'SEATS MAX', 45 sy-vline.

ENDFORM.                    "top_of_page

Output