Table control scroll error

[Former Member]

Hi Experts,

In the table control, the vertical scroll bar stops working correctly after any paging buttons (up/down/first/last) have been used. Kindly suggest to rectify it. Thanks.

Khan

[MarcinPciak]

Try this way

"PBO module
MODULE get_lines OUTPUT.
  ...
  displ_lines = sy-loopc.   "get number of displayed lines
ENDMODULE.               

"PAI module
MODULE user_command INPUT.
  save_ok = ok_code.
  CLEAR ok_code.

  CASE save_ok.
    WHEN 'L--'.  "reach the top
      tab_control-top_line = 0.
    WHEN 'L++'.
      tab_control-top_line = tab_control-lines - displ_lines..
    WHEN 'P--'.
      SUBTRACT displ_lines FROM tab_control-top_line.
      IF tab_control-top_line < 0.
        tab_control-top_line = 0.
      ENDIF.
    WHEN 'P++'.
      ADD displ_lines TO tab_control-top_line.
      IF tab_control-top_line => tab_control-lines.
        tab_control-top_line = tab_control-lines - displ_lines.
      ENDIF.
  ENDCASE.
ENDMODULE.           

Regards

Marcin

[Former Member]

Self answred