Output display

Question

Hi Friends,
I have one query regarding my output.
Suppose i have multiple entries in my internal table itab.
Now i wanted to display internal table via screen 0101 as a scrollable output.
will u tell me how to do this??
If coding is there it will be appriciated.
Thanks in advance.

Answer 1

Hi
Check out the code using table control.
Go to se51 editor and drag the table control and give name for that as tabctrl (Which u r referring in the program).
Tables VBAK.
Data Itab like VBAK occurs 0 with header line.
Controls tabctrl type tableview using screen 1000.
Data fill type i.
&----&      Module  Assign_data  OUTPUT
&----       text
MODULE Assign_data OUTPUT.
move itab to vbak.
ENDMODULE.                 " Assign_data  OUTPUT
&----&      Module  USER_COMMAND_1000  INPUT
&----       text
MODULE USER_COMMAND_1000 INPUT.
  case sy-ucomm.
    when 'EXIT'.
     set screen 0.
  endcase.
ENDMODULE.                 " USER_COMMAND_1000  INPUT
&----&      Module  STATUS_1000  OUTPUT
&----       text
MODULE STATUS_1000 OUTPUT.
SET PF-STATUS 'xxxxxxxx'.
SET TITLEBAR 'xxx'.
Select * from vbak into table itab.
describe table itab lines fill.
tabctrl-lines = fill.
ENDMODULE.                 " STATUS_1000  OUTPUT
Logic to be written in screen logic
PROCESS BEFORE OUTPUT.
MODULE STATUS_1000.
loop at itab with control tabctrl cursor tabctrl-top_line.
  Module Assign_data.
endloop.
PROCESS AFTER INPUT.
MODULE USER_COMMAND_1000.
loop at itab.
endloop.
Hope this code will help u
Regards
Haritha