09-08-2008 7:15 AM
Hi Expert ,
I have a requirement for drill down ALVs . Which one is the best way using FM Reuse_ALV_Grid or using the module pool program and custom controls. Please provide some sample codes.
<removed_by_moderator>
Thanks and regards
Renjith MP
Edited by: Julius Bussche on Sep 8, 2008 7:34 AM
09-08-2008 7:20 AM
09-08-2008 7:20 AM
09-08-2008 7:21 AM
hi,
u can try the following code...
CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
EXPORTING
i_callback_program = 'ZSALES_REPORT_884'
I_CALLBACK_PF_STATUS_SET = ' '
I_CALLBACK_USER_COMMAND = 'USER_COMMAND'
it_fieldcat = itab_fieldcat
i_save = 'X'
TABLES
t_outtab = itab_output[]
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.
for drill down approach...
LOOP AT itab_output.
WRITE: / sy-vline, '|',itab_output-zvbeln HOTSPOT ON.
HIDE itab_output-zvbeln.
FORMAT HOTSPOT OFF.
please let me know if it helps u
with best regards
kanika chopra
09-08-2008 8:42 AM
FM
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
I_CALLBACK_PROGRAM = gv_prog
I_CALLBACK_USER_COMMAND = 'USER'
I_CALLBACK_TOP_OF_PAGE = 'TOP'
I_GRID_TITLE = Text-A00
IS_LAYOUT = gs_layout
IT_FIELDCAT = gt_fcat
TABLES
T_OUTTAB = gt_final
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 USER USING ucomm TYPE sy-ucomm
selfield TYPE slis_selfield.
READ TABLE gt_final INTO gs_final INDEX selfield-tabindex.
if sy-subrc = 0.
SET PARAMETER ID: 'VF' FIELD gs_final-vbeln.
CALL TRANSACTION 'VF03' AND SKIP FIRST SCREEN.
CLEAR: gs_final, selfield.
endif.
ENDFORM. "End of form USER