Zugriff Auf Eine Direktzugriffsdatei - NCR DECISION MATE V Bedienungsanleitung

GW-BASIC
Programm 3 ----- Erstellen einer Direktzugriffsdatai
10 OPEN " R " ,# 1," F IL E " ,32
20 FIE LD # 1,20 AS NS, 4 AS AS, 8 AS PS
30 IN PU T " 2-DIGIT CODE" ;CODE%
40 IN P U T " N A M E " ;X$
50 IN P U T " A M O U N T " ;A M T
60 IN P U T " PHONE" ;TE L$: P R IN T
70 LSET N $=X $
80 LSET A $ = M K S $ (A M T )
90 LSET PS=TE L$
100 PU T#1, CODE%
110 GOTO 30
Bei jeder Ausführung der PUT-Anweisung wird ein Satz in die
Datei geschrieben. Der zweistellige Code, der in Zeile 30 eingege­
ben wird, wird zur Satznummer.
HINWEIS: Eine mit FIE LD zugewiesene Zeichenfolgenvariab­
le darf in einer INPUT- oder LET-Anweisung nicht
benutzt werden. Dadurch zeigt der Zeiger für diese
Variable in die Zeichenfolge anstatt in den Puffer
der Direktzugriffsdatei.

Zugriff auf eine Direktzugriffsdatei

Beim Erstellen einer Direktzugriffsdatei sind die folgenden Schrit­
te erforderlich.
1. Die Datei wird im " R " -Modus eröffnet.
OPEN" R " ,# 1," F IL E " ,32
2. M it der FIELD-Anweisung wird Platz im Direktzugriffs­
puffer für die Variablen zugewiesen, die von der Datei ge­
lesen werden.
FIE LD # 1,20 AS NS
4 AS AS, 8 AS PS
HINWEIS: In einem Programm, das sowohl die Eingabe als
auch die Ausgabe bei derselben Direktzugriffs­
datei ausführt, kann häufig eine einzige OPEN-
Anweisung und eine einzige FIELD-Anweisung
benutzt werden.
MS-DOS ER W EITERUNG
4-9