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.

Syntaxdiagramm der Anweisung COBOL DELETE

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