NCR GW-BASIC Betriebsanleitung Seite 192

GW-BASIC-BEFEHLE UND FUNKTIONEN
INPUT
4-118
nicht über die Tastatur eingegeben zu werden brau­
chen. In diesem Fall muß jede Antwort mit <Ctrl-
Z> abgeschlossen werden. Wird dieses Zeichen
nicht angegeben, so wird eine Fehlermeldung
"Read past end" (Über Ende hinausgelesen) ange­
zeigt. Sämtliche Dateien werden abgeschlossen
und GW-BASIC gibt die Kontrolle zur Befehls­
ebene von NCR-DOS zurück (nicht "Ok"). Bei
Betätigung von <Ctrl-Break> wird ebenfalls auf
NCR-DOS Befehlsebene zurückgegangen.
Wird <Ctrl-Break> benutzt, um die Ausführung
eines INPUT-Befehls zu unterbrechen, und wird
danach mit CONT zu dem Programm zurückge­
kehrt, so nimmt GW-BASIC die Ausführung mit
dem INPUT-Befehl (und nicht mit dem folgenden
Befehl) wieder auf.
In dem folgenden Beispiel wird davon ausgegangen,
daß eine Datei mit Informationen über Telefonteil­
nehmer (Name, Nummer) in Datensätzen mit
einer Länge von jeweils 35 Bytes vorhanden ist. Mit
der ersten Zeile wird die Datei für den Direktzugriff
eröffnet.
10 OPEN "R",# l, "TELNUMS",35
Der erste Datensatz enthält nur die Anzahl von
Teilnehmern bis zu einer Höchstzahl von 99. Für
diesen ersten Datensatz wäre folgende FIELD-
Definition möglich:
20 FIELD 1,2 AS SUBSCRIB$,33 AS UNUSED$
Die restlichen Sätze mit den tatsächlichen Namen
und Telefonnummern könnten folgendermaßen
aufgeteilt sein.
30 FIELD 1,25 AS NNAME$,10 AS
PHONENO$
Als erstes wird der erste Datensatz mit GET geholt.
Danach werden die beiden ersten Bytes dieses
Datensatzes überprüft, um zu sehen, wieviele Teil­
nehmerdatensätze in der Datei stehen. (Diese Zahl
wird aus einer Zeichenfolge in einen ganzzahligen
Wert umgewandelt.):
GW-BASIC