cobol => Declaración DELETE

Observaciones

La instrucción DELETE elimina registros del almacenamiento masivo. Algunos compiladores permiten que la instrucción DELETE se use con una cláusula FILE , para eliminar nombres FD (junto con cualquier estructura de indexación asociada que pueda ser requerida por el motor de administración de la base de datos en uso).

Eliminar un registro, clave en el campo de clave principal

   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

Licenciado bajo CC BY-SA 3.0

No afiliado a Stack Overflow

cobol
Declaración DELETE

Buscar..

Observaciones

Eliminar un registro, clave en el campo de clave principal