Code: Alles auswählen.
DATA fname(60) TYPE c VALUE '/Ant/REWER/HS/test1.txt'.
DATA: text(70) TYPE c.
OPEN DATASET fname FOR INPUT IN TEXT MODE ENCODING DEFAULT.
IF sy-subrc = 0.
WRITE / 'File opened'.
DO. "Für jede Zeile der Datei
READ DATASET fname INTO text.
IF sy-subrc = 0.
WRITE / text.
ELSE.
EXIT. "Schleife verlassen
ENDIF.
ENDDO.
CLOSE FILE fname. "Datei schließen nicht vergessen
ELSE.
WRITE / 'File not found'.
ENDIF.