cobol
COPY-Direktive
Suche…
Bemerkungen
Die COBOL-Version der C #include Präprozessor-Direktive. Historisch genauer war COBOL der erste, der etwa 10 Jahre zuvor entwickelt wurde.
Aufgrund einiger Entwurfsentscheidungen in COBOL (keine Argumente für PERFORM als Hauptgrund) müssen viele Zugriffsfolgen auf Datenstrukturen das DRY-Prinzip durchbrechen. Die Namen der Strukturkomponenten müssen in der ENVIRONMENT DIVISION, der DATA DIVISION und möglicherweise viele Male in der PROCEDURE DIVISION wiederholt werden. Dies wird normalerweise durch Hinzufügen von Kopierbüchern erledigt. Datensatzdeklarationen und Zugriffscode werden in separaten Dateien gespeichert und die COPY-Anweisung ist die einzige wiederholte Quelle. Durch eine Änderung des Copybooks werden alle Verwendungsarten der Namensschreibweise und des Datenlayouts synchron gehalten, anstatt bei Änderungen mehrere Dateien an mehreren Dateien bearbeiten zu müssen.
COPY Record-Layout.
Programm eins.
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.
Programm zwei.
DATA DIVISION.
01 print-record.
COPY record-layout.
...
PROCEDURE DIVISION.
...
print-line.
COPY record-move.