A71700 SCP1700 - Das ist die Eingangsseite, an der noch keiner ...

FORTRAN11 Sprachbeschreibung SCP 1100 1/87
Die Datenliste einer impliziten DO-Liste darf wiederum implizite
DO-Listen enthalten.
Der Schleifenzähler und die Werte für die DO-Variable do va. werden
nach den gleichen Regeln berechnet, die für die DO-Anweisung
gelten.
Die DO-Variable oder eine durch eine EQUIVALENCE-Anweisung mit der
DQ-Variablen verbundene Variable, darf nicht in der Datenliste der
impliziten DO-Liste enthalten sein. Enthält eine E/A-Anweisung
eine implizite DO-Liste, wird die in ihr enthaltene Datenliste so
oft abgearbeitet, wie durch den Schleifenziihler gefordert wi'rd.
Dabei wird bei jedem Auftreten der DO-Variablen ihr aktueller
I~ert verwendet.
6.3.3. Beispiele für READ-, WRITE- und PRINT-Anweisungen
1.
2.
3.
4.
5.
JOO FORI1AT(I5,F8.2)
READ 100, IVAR,REAL
READ(5,100) 1VAR,REAL
READ(3,'I5,A9',END=20,IOSTAT=IOS) IVAR,ZK
READ 200,IV,(IFELD(I),I=1,IV)
PRINT
100, A, « ( (FELD( 1", J, K, L), 1=1 ,20) ,J=l ,5,1 ), K=1, 1 ,-1 ), L=l ,9)
WRlTE (ERR=90,IOSTAT=IOS,UNIT=1UNIT) 'ABCDE'//ZK
WRITE(FHT=l 00, UNIT=1) VAR,B,C, D, (LIST(K) ,K=19, 5, -3),F,G,H
6.4. OPEN-Anweisung
Mittels der OPEN-Anweisung kann eine Verbindung zwischen einer
Einheit und einer Datei hergestellt und eine bestehende Verbindung
modifiziert werden (siehe auch 6.4.2).
Die OPEN-Anweisung hat die Form.
OPEN (olist)
Die Liste der Steue'rinformationen 'olist' muß einen UNIT-Parameter
und kann je ~inen ERR-, IOSTAT-, FILE-, STATUS-, ACCESS-, FORM-,
RECL- und BLANK-Parameter enthalten (siehe Abschnitt 6.4.1.).
96 C 1016-0200-2 M 3030