06-01-2011 5:52 AM
Hi gurus,
how can we freez the column headings in REUSE_ALV_BLOCK_LIST_HS_APPEND while scrolling the bar.
06-01-2011 7:33 PM
06-01-2011 7:33 PM
06-02-2011 7:06 AM
Hi Suman,
Thanks for reply,
I tried with that option, but it is not fullfiling the requirement. I think it is to fix the column while scrolling horizontal bar.
Our requirement is to fix(freez) headings.
Thanks,
Narendra.
06-02-2011 7:25 AM
Hello,
you must put key = 'X' in the fieldcatalog of the fields that you want fix.
See you...
06-02-2011 10:41 AM
06-02-2011 10:53 AM
Hi Narendra,
Check if you are passing an X in the layout structure for field NO_KEYFIX, this should be blank/space.
Regards,
Chen
Edited by: Chen K V on Jun 2, 2011 3:27 PM
06-02-2011 12:58 PM
Hi Chen,
No, I am not passing any value to no_keyfix of layout structure.
Rgds,
Narendra
06-02-2011 9:02 PM
06-03-2011 7:45 AM
06-05-2011 7:50 AM
Hi LM / Suman,
Please suggest me, if any thing is wrong.
clear wa_fieldcat.
v_cnt = 0.
V_cnt = V_cnt + 1.
WA_FIELDCAT-col_pos = V_cnt.
WA_FIELDCAT-fieldname = 'ZONE_TEXT'.
WA_FIELDCAT-key = 'X'.
WA_FIELDCAT-reptext_ddic = 'Zone'.
WA_FIELDCAT-fix_column = 'X'.
wa_fieldcat-outputlen = 10.
wa_fieldcat-emphasize = 'C200'.
WA_FIELDCAT-tabname = 'IT_HEAD'.
APPEND WA_FIELDCAT TO IT_FIELDCAT.
........................
.......................
.........................
CLEAR WA_FIELDCAT.
v_cnt = 0.
V_cnt = V_cnt + 1.
WA_FIELDCAT-col_pos = V_cnt.
WA_FIELDCAT-fieldname = 'EMPTY'.
wa_fieldcat-outputlen = 10.
WA_FIELDCAT-reptext_ddic = '(In lacs)'.
WA_FIELDCAT-key = 'X'.
WA_FIELDCAT-fix_column = 'X'.
WA_FIELDCAT-tabname = 'IT_ITEM'.
APPEND WA_FIELDCAT TO IT_FIELDCAT.
.........................
.......................
.......................
CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_INIT'
EXPORTING
I_CALLBACK_PROGRAM = sy-repid
I_CALLBACK_PF_STATUS_SET = ' '
I_CALLBACK_USER_COMMAND = ' '
IT_EXCLUDING =
.
CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_HS_APPEND'
EXPORTING
IS_LAYOUT = wa_layout
IT_FIELDCAT = it_fieldcat
IS_KEYINFO = wa_keyinfo
I_HEADER_TABNAME = 'IT_HEAD'
I_ITEM_TABNAME = 'IT_ITEM'
IT_EVENTS = it_event
IT_SORT =
I_TEXT = ' '
TABLES
T_OUTTAB_HEADER = it_head
T_OUTTAB_ITEM = it_item
EXCEPTIONS
PROGRAM_ERROR = 1
MAXIMUM_OF_APPENDS_REACHED = 2
OTHERS = 3
.
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
CALL FUNCTION 'REUSE_ALV_BLOCK_LIST_DISPLAY'
EXPORTING
I_INTERFACE_CHECK = ' '
IS_PRINT = wa_print
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 =
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.
Thanks,
Narendra.
Edited by: narendra vasili on Jun 5, 2011 9:33 AM