Zoeken…


Opmerkingen

Met de instructie DELETE worden records uit massaopslag verwijderd. Sommige compilers staan toe dat de DELETE instructie wordt gebruikt met een FILE clausule om FD namen te verwijderen (samen met eventuele bijbehorende indexeringsstructuren die vereist kunnen zijn door de gebruikte databasebeheer-engine).

COBOL DELETE syntaxisdiagram van de instructie

Verwijder een record, sleutel in veld primaire sleutel

   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
Licentie onder CC BY-SA 3.0
Niet aangesloten bij Stack Overflow