2.4.29 REWRITE
| | | | | |
Format:
REWRITE Recordname [FROM Datenfeld]
[INVALID [KEY] Befehlsseqenz1]
[NOT INVALID [KEY] Befehlsseqenz2]
[END-REWRITE]
| |
| | | |
Der REWRITE - Befehl überschreibt den aktuellen Datensatz in der zugehörigen Datei.
Wird die FROM - Klausel angegeben, wird vor dem REWRITE intern ein MOVE vom Datenfeld in Recordname ausgeführt.
Bei Random-Dateien wird der zuletzt gelesene Datensatz verändert.
Bei IS-Dateien wird der Datensatz verändert, der durch den entsprechenden Recordbereich als Masterkey spezifiziert wird.
Sollte der Datensatz vorher mit einer READLOCK - Anweisung gesperrt worden sein, wird er automatisch freigegeben (siehe auch UNLOCK).
Verläuft der REWRITE nicht fehlerfrei, wird Befehlssequenz1 ausgeführt und der Fehlercode im zugehörigen Statusfeld (falls spezifiziert) abgestellt.
Folgende Fehlercodes können auftreten:
|
21012 | Datei nicht eröffnet | 21103 | Schlüssel nicht definiert | 21108 | Eindeutiger Schlüssel existiert bereits | 30107 | Record gesperrt |
|
Zurück zu Acc-Cobol Return Statement
Hoch zu Procedure Divison in COBOL
Weiter zu SEARCH
|