create data ref type table of ...

start-of-selection.
  write: / 'SPFLI', / 'SFLIGHT', / 'SBOOK'.

  at line-selection.
  data: dref type ref to data,
  tabname type tabname.

  field-symbols: <row> type any,
  <component> type any.
   read current line line value into tabname.

* dynamically create appropriate internal table
  create data dref type (tabname).
  assign dref->* to <row>.

* fetch the data
select *
from (tabname) up to 20 rows
into <row>.

* display the result
new-line.
do.
assign component sy-index of structure <row> to <component>.
if sy-subrc <> 0.
   exit. " no more components
endif.
write: <component>.
enddo.
endselect.