How to add the double headings in Alv Report.

Question

Hi All,
Plz suggest me how to add the double headings in ALv Report.
Ram

Answer 1

Hi,
Try out this program....
REPORT  ypm_historycard_rep.
TYPE-POOLS : slis.
DATA : it_cbm TYPE STANDARD TABLE OF mara.
DATA : it_layout TYPE STANDARD TABLE OF slis_layout_alv WITH HEADER LINE,
       wa_fcat TYPE slis_fieldcat_alv,
       it_fcat TYPE slis_t_fieldcat_alv.
START-OF-SELECTION.
  SELECT  *
  FROM  mara
  INTO CORRESPONDING FIELDS OF TABLE  it_cbm
  where matnr = 'D80K7'.
END-OF-SELECTION.
  it_layout-zebra = 'X'.
  it_layout-colwidth_optimize = 'X'.
  it_layout-f2code = '&ETA'.
  APPEND it_layout.
  DEFINE macro4fcat.
    wa_fcat-col_pos = &1.
    wa_fcat-fieldname = &2.
    wa_fcat-tabname = &3.
    wa_fcat-seltext_l = &4.
    append wa_fcat to it_fcat.
    clear wa_fcat.
  END-OF-DEFINITION.
  macro4fcat    '1'  'MATNR'         'IT_CBM'   'MATERIAL NO'    .
  DESCRIBE TABLE it_cbm.
  IF sy-ucomm = '&F03'.
    MESSAGE 'hi hello good morning "press enter button" this is quiz' TYPE 'S'.
  ENDIF.
  CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
  EXPORTING
  i_callback_program                = sy-repid
i_callback_html_top_of_page       = 'HTML_TOP_OF_PAGE'
  is_layout                         = it_layout
  it_fieldcat                       = it_fcat
   i_save                            = 'A'
  TABLES
  t_outtab                          = it_cbm
  EXCEPTIONS
  program_error                     = 1
  OTHERS                            = 2
  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  html_top_of_page
*       text
*      -->TOP        text
FORM html_top_of_page USING top TYPE REF TO cl_dd_document.
  DATA: l_text(255) TYPE c.
  DATA: text1(255)  TYPE c.
  DATA: t_header TYPE REF TO cl_dd_table_element ,
        wa_header TYPE REF TO cl_dd_table_area.
  CALL METHOD top->add_gap
    EXPORTING
      width = 10.
  CALL METHOD top->add_text
  EXPORTING
    text          = 'hello'
    sap_style     = 'HEADING'
CALL METHOD top->add_gap
    EXPORTING
      width = 20.
  CALL METHOD top->add_text
  EXPORTING
    text          = 'HOW ARE YOU'
    sap_style     = 'HEADING'.
    CALL METHOD TOP->new_line
*      EXPORTING
*        repeat =
    CALL METHOD top->add_gap
    EXPORTING
      width = 50.
  CALL METHOD top->add_text
  EXPORTING
    text          = '____________________________________________________________'
    sap_style     = 'HEADING'.
    CALL METHOD TOP->new_line
*      EXPORTING
*        repeat =
    CALL METHOD top->add_gap
    EXPORTING
      width = 90.
  CALL METHOD top->add_text
  EXPORTING
    text          = 'YOU CAN TRY LIKE THIS'
    sap_style     = 'HEADING'.
ENDFORM.                    "html_top_of_page
Regards
Debarshi