cobol
DELETE-Anweisung
Suche…
Bemerkungen
Die DELETE
Anweisung löscht Datensätze aus dem Massenspeicher. Bei einigen Compilern kann die DELETE
Anweisung mit einer FILE
Klausel verwendet werden, um FD
Namen (zusammen mit allen zugehörigen Indexierungsstrukturen, die von der verwendeten Datenbankverwaltungs-Engine benötigt werden) zu löschen.
Datensatz löschen, Primärschlüsselfeld eingeben
identification division.
program-id. deleting.
environment division.
configuration section.
input-output section.
file-control.
select optional indexed-file
assign to "indexed-file.dat"
status is indexing-status
organization is indexed
access mode is dynamic
record key is keyfield
alternate record key is altkey with duplicates
.
...
procedure division.
move "abcdef" to keyfield
*> Delete a record by index
delete indexed-file record
invalid key
display "No delete of " keyfield end-display
not invalid key
display "Record " keyfield " removed" end-display
end-delete
perform check-delete-status
...
Modified text is an extract of the original Stack Overflow Documentation
Lizenziert unter CC BY-SA 3.0
Nicht angeschlossen an Stack Overflow