cobol => Instrukcja DELETE

Uwagi

Instrukcja DELETE usuwa rekordy z pamięci masowej. Niektóre kompilatory pozwalają na użycie instrukcji DELETE z klauzulą FILE celu usunięcia nazw FD (wraz z wszelkimi powiązanymi strukturami indeksującymi, które mogą być wymagane przez używany silnik zarządzania bazą danych).

Usuń rekord, wprowadź klucz w polu klucza podstawowego

   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

Licencjonowany na podstawie CC BY-SA 3.0

Nie związany z Stack Overflow

cobol
Instrukcja DELETE

Szukaj…

Uwagi

Usuń rekord, wprowadź klucz w polu klucza podstawowego