related to reports
hi all,
this is my code...
DATA:BEGIN OF itab OCCURS 0,
lifnr LIKE lfa1-lifnr,
name1 LIKE lfa1-name1,
END OF itab.
TYPE-POOLS:slis.
DATA:repid LIKE sy-repid.
DATA:f_lfa11 TYPE slis_t_fieldcat_alv,
f_lfa1 TYPE slis_fieldcat_alv.
repid = sy-repid.
PERFORM col_head.
FORM col_head.
f_lfa1-fieldname = 'LIFNR'.
f_lfa1-ref_tabname = 'LFA1'.
f_lfa1-ref_fieldname = 'LIFNR'.
APPEND f_lfa1 TO f_lfa11.
clear f_lfa1.
f_lfa1-fieldname = 'name1'.
f_lfa1-ref_tabname = 'LFA1'.
f_lfa1-ref_fieldname = 'name1'.
APPEND f_lfa1 TO f_lfa11.
clear f_lfa1.
ENDFORM. "COL_HEAD
SELECT lifnr name1 FROM lfa1 INTO TABLE itab WHERE lifnr IN vno.
CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
EXPORTING
I_INTERFACE_CHECK = ' '
I_BYPASSING_BUFFER =
I_BUFFER_ACTIVE = ' '
i_callback_program = repid
I_CALLBACK_PF_STATUS_SET = ' '
I_CALLBACK_USER_COMMAND = ' '
I_STRUCTURE_NAME =
IS_LAYOUT =
it_fieldcat = f_lfa11
IT_EXCLUDING =
IT_SPECIAL_GROUPS =
IT_SORT =
IT_FILTER =
IS_SEL_HIDE =
I_DEFAULT = 'X'
I_SAVE = ' '
IS_VARIANT =
it_events = i_events
IT_EVENT_EXIT =
IS_PRINT =
IS_REPREP_ID =
I_SCREEN_START_COLUMN = 0
I_SCREEN_START_LINE = 0
I_SCREEN_END_COLUMN = 0
I_SCREEN_END_LINE = 0
IMPORTING
E_EXIT_CAUSED_BY_CALLER =
ES_EXIT_CAUSED_BY_USER =
TABLES
t_outtab = itab
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.
so, my problem is....
im not able to print the names of the vendors,
the header im able to print,the numbers of the vendor also getting printed.