Inhalt
Index
Support Über uns
Home

4.16 Statuswerte bei I-O-Operationen





Statuswerte können 2-stellig oder 5-stellig definiert sein. Bei 5-stelliger Definition kann der Status genauer ausgewertet werden.

Folgende Statuswerte können auftreten:

 
StatusBedeutungOperation
10110Datei EndeREAD NEXT
10111Datei Anfang (READ BACKWARD)READ NEXT
11131Gruppenwechsel bei Duplicate KeyREAD NEXT
21012Is-Datei nich geöffnet (intern)REWRITE / DELETE
21047Datei nicht geöffnet (FD)REWRITE / DELETE
21103Schlüssel nicht definiertREWRITE / DELETE
21108Eindeutiger Schlüssel existiert bereitsREWRITE / DELETE
21111Masterkey nicht vorhandenREWRITE / DELETE
22012Is-Datei nicht geöffnet (intern)WRITE
22047Datei nicht geöffnet (FD)WRITE
22100Masterkey existiert bereitsWRITE
22103Schlüssel nicht definiertWRITE
22108Eindeutiger Schlüssel existiert bereitsWRITE
23012Is-Datei nicht geöffnet (intern)READ / START
23047Datei nicht geöffnet (FD)READ / START
23103Schlüssel nicht definiertREAD / START
23108Schlüssel existiert bereitsREAD / START
23111Schlüssel nicht vorhandenREAD / START
30107Record gesperrtREAD
91191FD-Beschreibung falschOPEN
95xxxFehler beim Eröffnen von IS-DateienOPEN
96xxxFehlerstatus bei sequentiellen DateienOPEN
95002Datei nicht vorhandenOPEN
95003Directory nicht vorhandenOPEN
95005Falsche BerechtigungOPEN
95041Datei bereits geöffnetOPEN
95104Bereits 128 IS- ateien geöffnetOPEN
95105Keine Is-DateiOPEN
96032Datei gesperrtOPEN
96047DateiendeREAD



Bei Statuswerten 95 bzw. 96 befindet sich in den niederwertigen 3 Stellen der Systemstatus (z.B. 002 für Datei nicht vorhanden).


Status 11131:

Bei IS-Dateien wird beim READ NEXT mit Duplicate Keys der aktuelle Schlüsselwert mit dem nächsten Schlüsselwert verglichen. Sind die Werte ungleich, wird der Status 11131 gesetzt und die END -Anweisung ausgeführt.

Dieses Verhalten kann durch Setzen der Umgebungsvariablen C11131 ausgeschaltet werden.



Zurück zu Acc-Cobol Close Statement    Hoch zu Datei Ein- und Ausgabe
Entwickler Portal Impressum AGB Kontakt


© 1980-2017 Acc Computertechnik GmbH All rights reserved.