cobol
Direttiva COPY
Ricerca…
Osservazioni
La versione COBOL della direttiva C #include preprocessore. O, più storicamente accurato, il COBOL è arrivato per primo, sviluppato circa 10 anni prima.
A causa di alcune delle decisioni di progettazione in COBOL (nessun argomento per PERFORM come ragione principale), molte sequenze di accesso alla struttura dei dati devono rompere il principio di DRY . I nomi dei componenti della struttura devono essere ripetuti nella DIVISIONE AMBIENTE, nella DIVISIONE DATI e possibilmente in più volte nella DIVISIONE PROCEDURA. Questo di solito viene gestito aggiungendo quaderni. Le dichiarazioni di registrazione e il codice di accesso sono nascosti in file separati e l'istruzione COPY è l'unica fonte ripetuta. Una modifica al quaderno mantiene sincronizzati tutti gli usi dell'ortografia dei nomi e del layout dei dati, invece di richiedere più modifiche a più file quando si verifica una modifica.
Copia il layout del record.
programma-one.
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.
programma-due.
DATA DIVISION.
01 print-record.
COPY record-layout.
...
PROCEDURE DIVISION.
...
print-line.
COPY record-move.