NCR DECISION MATE V Bedienungsanleitung Seite 293

GW-BAS IC
Ein Programm, das eine sequentielle Datei erstellt, kann auch
mit der P R IN T # USING-Anweisung formatierte Daten auf die
Diskette schreiben. So könnte beispielsweise die Anweisung
P R IN T # 1,USING" # # # .# # ,' ' ;A,B,C,D
dazu benutzt werden, numerische Daten ohne besondere Abgren­
zungszeichen auf die Diskette zu schreiben. Das Komma (,) am
Ende der Formatzeichenfolge wird zur Trennung der einzelnen
Elemente in der Diskettendatei benutzt.
Wird die LOC-Funktion mit einer sequentiellen Datei benutzt,
so gibt sie die Anzahl von Sektoren zurück, die seit dem Eröffnen
in die Datei geschrieben oder von der Datei gelesen wurden.
100 IF (L O C (l) > 50 TH EN STOP
würde beispielsweise die Programmausführung beenden, wenn
mer als 50 Sektoren in die Datei # 1 geschrieben oder von dieser
Datei gelesen würden, seit sie eröffnet wurde.
Programm 1 ist ein kurzes Programm, das eine sequentielle
Datei namens " D A T A " anhand der am Termianl eingegebenen
Informationen erstellt.
Programm 1 ----- Erstellen einer sequentiellen Datendatei
10 OPEN " 0" ,#1," D A T A "
20 IN P U T " N A M E " ;N£
25 IF N£=" DONE" THEN END
30 IN P U T " D E PA R T M E N T " ;D£
40 IN PU T " DATE H IR E D " ;H£
50 P R IN T # 1,N£;" ," ;D £;" ," ;H£
60 P R IN T: GOTO 20
R UN
NAM E? M IC K E Y MOUSE
D E PARTM ENT? AU D IO /VISU A L AID S
D ATE HIRED? 01/12/72
NAM E: SHERLOCK HOLMES
D E PARTM ENT? RESEARCH
D ATE HIRED? 12/03/65
NAM E? EBENEEZER SCROOGE
D EPARTM ENT? A C C O U N TIN G
D ATE HIRED? 04/26/78
MS-DOS ER W EITERUNG
4-5