Code: Alles auswählen.
OPEN DATASET expath FOR INPUT IN TEXT MODE.
DO.
READ DATASET expath INTO itab_importbalog.
if sy-subrc <> 0.
if sy-subrc = 2.
message s002 with text-803.
endif.
exit.
endif.
APPEND itab_importbalog to itab_importbalog2.
ENDDO.
CLOSE DATASET expath.
Code: Alles auswählen.
OPEN DATASET expath FOR INPUT IN TEXT MODE.
* hier muss bereits beim Öffnen der SY-SUBRC geprüft werden, um eine Fehlen der Datei abzufangen
if sy-subrc <> 0.
message s002 with text-803.
exit.
endif.
DO.
READ DATASET expath INTO itab_importbalog.
* hier prüft man, ob der READ erfolgreich war
if sy-subrc <> 0.
if sy-subrc = 2.
message s002 with text-803.
endif.
exit.
endif.
APPEND itab_importbalog to itab_importbalog2.
ENDDO.
CLOSE DATASET expath.