hi,
use this code afret making table control manually and gave scrolling buttons, and than gave that coding in the TAB control PAI.
here tab_vbap is the table control name, t_vbap is the table which is use in Table contol making, ok_code is sy-ucomm,
PERFORM scrolling_inserting USING 'TAB_VBAP'
'T_VBAP'
'MARK'
CHANGING ok_code.
FORM scrolling_inserting USING p_tc_name TYPE dynfnam
p_table_name
p_mark_name
CHANGING p_ok LIKE sy-ucomm.
DATA l_table_name LIKE feld-name.
FIELD-SYMBOLS <table> TYPE STANDARD TABLE.
FIELD-SYMBOLS <tc> TYPE cxtab_control.
ASSIGN (p_tc_name) TO <tc>.
CONCATENATE p_table_name '[]' INTO l_table_name. "table body
ASSIGN (l_table_name) TO <table>. "not headerline
DESCRIBE TABLE <table> LINES l.
CASE p_ok.
WHEN 'FP'.
<tc>-top_line = 1.
WHEN 'LP'.
<tc>-top_line = ( l - g_tab_marc_lines ) + 1.
WHEN 'NP'.
chek = <tc>-top_line + g_tab_marc_lines.
IF chek < l.
<tc>-top_line = ( <tc>-top_line + g_tab_marc_lines ).
ELSE.
<tc>-top_line = ( l - g_tab_marc_lines ) + 1.
ENDIF.
WHEN 'PP'.
chek = <tc>-top_line - g_tab_marc_lines.
IF chek <= 0.
<tc>-top_line = 1.
ELSE.
<tc>-top_line = ( <tc>-top_line -g_tab_marc_lines ).
ENDIF.
ENDCASE.
ENDFORM. " scrolling_inserting
hope it will help u.
with regards
chetan vishnoi
Bluesky
