cobol
Directiva COPY
Buscar..
Observaciones
La versión COBOL de la directiva de preprocesador C #include incluye. O, más históricamente exacto, COBOL vino primero, desarrollado unos 10 años antes.
Debido a algunas de las decisiones de diseño en COBOL (no hay argumentos para PERFORM como la razón principal), muchas secuencias de acceso a la estructura de datos necesitan romper el principio DRY . Los nombres de los componentes de la estructura deben repetirse en la DIVISIÓN DE MEDIO AMBIENTE, la DIVISIÓN DE DATOS y posiblemente muchas veces en la DIVISIÓN DE PROCEDIMIENTOS. Esto generalmente se maneja agregando cuadernos. Las declaraciones de registro y el código de acceso se guardan en archivos separados y la instrucción COPY es la única fuente repetida. Un cambio en el libro de copia mantiene todos los usos de la ortografía de nombres y el diseño de los datos sincronizados, en lugar de requerir múltiples ediciones a múltiples archivos cuando ocurre un cambio.
Copiar el diseño de registro.
programa uno
FD important-file.
01 file-record.
COPY record-layout.
DATA DIVISION.
01 memory-record.
COPY record-layout.
PROCEDURE DIVISION.
...
COPY record-move.
...
COPY record-move.
programa dos
DATA DIVISION.
01 print-record.
COPY record-layout.
...
PROCEDURE DIVISION.
...
print-line.
COPY record-move.