column name in ALV report

46 Views

Hi friends,

Below is the ALV report.It was executed succesfully .But ,How to add Column names in the display.

REPORT ZCHECK.

TYPE-POOLS : SLIS.

DATA: VT_FIELDCAT TYPE SLIS_T_FIELDCAT_ALV.

DATA : P1 TYPE I VALUE 4.

DATA : P2 TYPE I VALUE 5.

DATA : P3 TYPE I.

COMPUTE P3 = P1 + P2.

DATA : BEGIN OF ITAB OCCURS 0,

P1 LIKE P1 ,

P2 TYPE I,

P3 TYPE I,

END OF ITAB.

ITAB-P1 = 6.

ITAB-P2 = 7.

ITAB-P3 = 13.

APPEND ITAB.

CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'

EXPORTING

I_PROGRAM_NAME = SY-REPID

I_INTERNAL_TABNAME = 'ITAB'

I_CLIENT_NEVER_DISPLAY = 'X'

I_INCLNAME = SY-REPID

CHANGING

CT_FIELDCAT = VT_FIELDCAT.

.

IF SY-SUBRC <> 0.

ENDIF.

CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'

EXPORTING

I_CALLBACK_PROGRAM = SY-REPID

I_CALLBACK_TOP_OF_PAGE = ' TOP_OF_PAGE'

IT_FIELDCAT = vt_fieldcat

I_SAVE = 'A'

TABLES

T_OUTTAB = ITAB.

.

IF SY-SUBRC <> 0.