Application Development Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Showing results for 
Search instead for 
Did you mean: 

ALV header

Former Member
0 Kudos

Can i create two headers in an ALV report?

thanks in advance

4 REPLIES 4

Former Member
0 Kudos

hi friend,

i think we can create ....

Thank you

santhosh

Former Member
0 Kudos

Hi,

YES we can create.

Regards,

Suresh.

Former Member
0 Kudos

Hi

Do you mean Coulmn containing 2 levels of header ?

Try this code by Vijay Babu

TYPE-POOLS: SLIS.
DATA: X_FIELDCAT TYPE SLIS_FIELDCAT_ALV,
IT_FIELDCAT TYPE SLIS_T_FIELDCAT_ALV,
L_LAYOUT type slis_layout_alv,
x_events type slis_alv_event,
it_events type SLIS_T_EVENT.

DATA: BEGIN OF ITAB OCCURS 0,
VBELN LIKE VBAK-VBELN,
POSNR LIKE VBAP-POSNR,
MALE type i,
female type i,
END OF ITAB.

SELECT VBELN
POSNR
FROM VBAP
UP TO 20 ROWS
INTO TABLE ITAB.


X_FIELDCAT-FIELDNAME = 'VBELN'.
X_FIELDCAT-SELTEXT_L = 'VBELN'.
X_FIELDCAT-TABNAME = 'ITAB'.
X_FIELDCAT-COL_POS = 1.
APPEND X_FIELDCAT TO IT_FIELDCAT.
CLEAR X_FIELDCAT.

X_FIELDCAT-FIELDNAME = 'POSNR'.
X_FIELDCAT-SELTEXT_L = 'POSNR'.
X_FIELDCAT-TABNAME = 'ITAB'.
X_FIELDCAT-COL_POS = 2.
APPEND X_FIELDCAT TO IT_FIELDCAT.
CLEAR X_FIELDCAT.
X_FIELDCAT-FIELDNAME = 'MALE'.
X_FIELDCAT-SELTEXT_L = 'MALE'.
X_FIELDCAT-TABNAME = 'ITAB'.
X_FIELDCAT-COL_POS = 3.
APPEND X_FIELDCAT TO IT_FIELDCAT.
CLEAR X_FIELDCAT.
X_FIELDCAT-FIELDNAME = 'FEMALE'.
X_FIELDCAT-SELTEXT_L = 'FEMALE'.
X_FIELDCAT-TABNAME = 'ITAB'.
X_FIELDCAT-COL_POS = 3.
APPEND X_FIELDCAT TO IT_FIELDCAT.
CLEAR X_FIELDCAT.
x_events-NAME = SLIS_EV_TOP_OF_PAGE.
x_events-FORM = 'TOP_OF_PAGE'.
APPEND x_events TO iT_EVENTS.
CLEAR x_events .

L_LAYOUT-NO_COLHEAD = 'X'.

CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
  EXPORTING
    I_CALLBACK_PROGRAM = SY-REPID
    IS_LAYOUT          = L_LAYOUT
    IT_FIELDCAT        = IT_FIELDCAT
    it_events          = it_events
  TABLES
    T_OUTTAB           = ITAB
  EXCEPTIONS
    PROGRAM_ERROR      = 1
    OTHERS             = 2.
IF SY-SUBRC NE 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.

*-To display the headers for main list
  FORMAT COLOR COL_HEADING.
  WRITE: / SY-ULINE(103).
  WRITE: / SY-VLINE,
  (8) ' ' ,
  SY-VLINE,
  (8) ' ' ,
  SY-VLINE,
  (19) 'SEX'(015) centered,
  sy-vline.

  WRITE: / SY-VLINE,
  (8) 'VBELN'(013) ,
  SY-VLINE,
  (8) 'POSNR'(014) ,
  SY-VLINE,
  (8) 'MALE'(016) ,
  sy-vline,
  (8) 'FMALE'(017) ,
  sy-vline.

  FORMAT COLOR OFF.

ENDFORM.                    "TOP_OF_PAGE

This is the [Link|;

Regards

Edited by: Rajvansh Ravi on Oct 21, 2008 7:23 AM

Former Member
0 Kudos

Hi,

Go through the following link.. It may be useful for you.

Thanks.

Nitesh