REPORT  z10_14.

PARAMETERS : p_tname(30)  DEFAULT 'ZEMPLIST'.

DATA: dref TYPE REF TO data.

FIELD-SYMBOLS: <fs1> TYPE ANY , <fs2> TYPE ANY.

CREATE DATA dref TYPE (p_tname).

ASSIGN dref->* TO <fs1>.

SELECT * FROM (p_tname) INTO <fs1> UP TO 3 ROWS.

          DO.

                    ASSIGN COMPONENT sy-index OF STRUCTURE <fs1> TO <fs2>.

                    IF sy-subrc NE 0.

                              SKIP.

                              EXIT.

                    ENDIF.

                    WRITE: <fs2>.

          ENDDO.

ENDSELECT.