Skip to Content
0
May 10, 2018 at 05:44 AM

How to display Header for ALV list display similar to ALV Grid display.

1651 Views

PERFORM TOP_OF_PAGE.
PERFORM GET_JOB_DETAILS.
*&---------------------------------------------------------------------*
*&      Form  GET_JOB_DETAILS
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
*  -->  p1        text
*  <--  p2        text
*----------------------------------------------------------------------*
FORM GET_JOB_DETAILS .
*  CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
*    EXPORTING
*      IT_FIELDCAT = IT_FCAT
*i_callback_top_of_page   = 'TOP-OF-PAGE'
*    TABLES
*      T_OUTTAB    = IT_TBTCO.
*  IF SY-SUBRC <> 0.
** Implement suitable error handling here
*  ENDIF.
*
  CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
    EXPORTING
      IT_FIELDCAT = IT_FCAT
    TABLES
      T_OUTTAB    = IT_TBTCO.
  IF SY-SUBRC <> 0.
* Implement suitable error handling here
    WRITE: 'HI'.
  ENDIF.
ENDFORM.                    " GET_JOB_DETAILS



*&---------------------------------------------------------------------*

*&      Form  TOP_OF_PAGE

*&---------------------------------------------------------------------*

*       text

*----------------------------------------------------------------------*

*  -->  p1        text

*  <--  p2        text

*----------------------------------------------------------------------*

FORM TOP_OF_PAGE .

  WA_HEADING-TYP = 'H' .

*  WA_HEADING-KEY = 'H' .

  WA_HEADING-INFO = 'IDOC Monitoring' .

  APPEND WA_HEADING TO I_HEADING .

  CLEAR WA_HEADING.



  WA_HEADING-TYP = 'S' .

  WA_HEADING-KEY = 'USERNAME' .

  WA_HEADING-INFO = SY-UNAME .

  APPEND WA_HEADING TO I_HEADING .

  CLEAR WA_HEADING.



  WA_HEADING-TYP = 'A' .

  WA_HEADING-KEY = 'DATE' .

  WA_HEADING-INFO = SY-DATUM .

  APPEND WA_HEADING TO I_HEADING .

  CLEAR WA_HEADING.



  CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'

    EXPORTING

      IT_LIST_COMMENTARY = I_HEADING

*     I_LOGO             = I_HEADING

*     I_END_OF_LIST_GRID =

*     I_ALV_FORM         =

    .



ENDFORM.                    " TOP_OF_PAGE