Ricerca…


Osservazioni

L'istruzione DELETE cancella i record dalla memoria di massa. Alcuni compilatori consentono di utilizzare l'istruzione DELETE con una clausola FILE , per eliminare i nomi FD (insieme alle strutture di indicizzazione associate che potrebbero essere richieste dal motore di gestione del database in uso).

Diagramma di sintassi dell'istruzione COBOL DELETE

Elimina un record, digita il campo chiave primaria

   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
Autorizzato sotto CC BY-SA 3.0
Non affiliato con Stack Overflow