cobol
Dyrektywa COPY
Szukaj…
Uwagi
Wersja COBOL dyrektywy preprocesora C #include . Lub, dokładniej z historycznego punktu widzenia, COBOL był pierwszy, opracowany około 10 lat wcześniej.
Z powodu niektórych decyzji projektowych w języku COBOL (brak argumentów dla PERFORM jako głównego powodu), wiele sekwencji dostępu do struktury danych musi złamać zasadę DRY . Nazwy elementów konstrukcji należy powtórzyć w DZIALE ŚRODOWISKOWYM, DYWIZJI DANYCH i być może wiele razy w DZIALE PROCEDURY. Zwykle odbywa się to przez dodanie zeszytów. Deklaracje rekordów i kod dostępu są schowane w osobnych plikach, a instrukcja COPY jest jedynym powtarzanym źródłem. Zmiana w zeszycie utrzymuje synchronizację wszystkich zastosowań pisowni nazw i układu danych, zamiast wymagać wielu edycji wielu plików, gdy nastąpi zmiana.
Układ rekordów KOPIUJ.
program pierwszy.
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.
program drugi.
DATA DIVISION.
01 print-record.
COPY record-layout.
...
PROCEDURE DIVISION.
...
print-line.
COPY record-move.