NCR GW-BASIC Betriebsanleitung Seite 158

GW-BASIC-BEFEHLE UND FUNKTIONEN
EOF
EOF-Funktion
Syntax:
Verwendung:
Bemerkungen:
Beispiel:
Hinweis:
4-84
EOF (<Dateinummer>)
Testet, ob das Ende einer Datei erreicht ist.
EOF gibt einen wahren Wert (-1) zurück, wenn
keine weiteren Daten mehr in der Datei stehen.
Die Datei ist leer, wenn die nächste Eingabeopera­
tion (z.B. INPUT#, LINE INPUT#) zu einer Feh­
lermeldung "Input past end" (Eingabe über Ende
hinaus) fuhren würde.
Bei einer Übertragungsdatei wird der Wert zurück­
gegeben, wenn der Eingabepuffer leer ist.
Die EOF-Bedingung ist für Direktzugriffsdateien
nicht signifikant.
Bei diesem Beispiel wird jeder Satz einer sequen­
tiellen Datei "NAMES" angezeigt, die schon vor­
handen ist. Das Dateiende wird entdeckt, sobald es
erreicht ist, so daß eine Fehlersituation vermieden
wird.
10 OPEN "NAMES" FOR INPUT AS #1
20 IF EOF(l) THEN PRINT "Das ist alles": END
30 INPUT #1, N$
40 PRINT N$ 50 GOTO 20
EOF kann auch für eine EIA benutzt werden, die
auf Standard-Eingabeeinheiten umgeleitet wird. In
diesem Fall wird 0 als "Dateinummer" angegeben.
GW-BASIC