2.4.22 OPEN
| | | | | |
Format:
OPEN { I-O / INPUT / OUTPUT / EXTEND } Filename1
[{Statusfeld / Filename2 ...}]
| |
| | | |
Eröffnet die Dateien Filename1 ... in dem angegebenen Modus.
Der Status der Openoperation wird im FILE STATUS - Feld der Datei (falls in der SELECT - Anweisung spezifiziert) abgestellt.
Zusätzlich kann beim OPEN - Befehl ein direktes Statusfeld angegeben werden, das ebenfalls den Status der OPEN - Anweisung erhält.
Folgende Tabelle enthält eine Übersicht über die verschiedenen Öffnungsarten.
|
INPUT | Nur zum Lesen der Datei | OUTPUT | Nur zum Schreiben der Datei Ist die Datei vorhanden, wird der alte Inhalt gelöscht. Ist die Datei nicht vorhanden, wird sie angelegt (bei IS-Dateien wird auch der FD-File mit angelegt) | I-O | Zum Lesen und Schreiben der Datei Ist die Datei nicht vorhanden, wird ein Status- Fehler zurückgegeben. | EXTEND | Nur zum Schreiben bei sequentiellen Dateien. Der nächste Datensatz wird am Dateiende ange- fügt. (Wie APPND). |
|
Statusmeldungen werden 5-stellig abgestellt. Die ersten 2-Stellen beinhalten den Cobolstatus, die nächsten 3 Stellen den Systemstatus.
Beim OPEN von sequentiellen und Random-Dateien werden im Cobolstatus bei einem Fehler der Wert 96, für IS-Dateien der Wert 95 oder 91 abgestellt.
96xxx Fehlerstatus beim Eröffnen - Status in xxx (error xxx)
95xxx Fehlerstatus beim Eröffnen - Status in xxx (error xxx)
91191 bedeutet FD-Beschreibung falsch
Die Bedeutung des Cobol-Status kann mit dem Utility error angezeigt werden (Bsp.: error 95002 - Datei nich vorhanden).
Dateien die mit OUTPUT oder EXTEND eröffnet werden, werden exklusiv eröffnet, d.h.:
1. Niemand darf die Datei bereits geöffnet haben.
2. Niemand sonst kann die Datei eröffnen, bis sie im Programm mit CLOSE geschlossen wird.
Siehe auch Fehlerstatus der Dateien
Zurück zu Acc-Cobol Multiply Statement
Hoch zu Procedure Divison in COBOL
Weiter zu PERFORM
|