Как работает секция DATA DIVISION в COBOL?

Пользователь

от miguel_ritchie , в категории: Другие , 10 дней назад

Как работает секция DATA DIVISION в COBOL?

Facebook Vk Ok Twitter LinkedIn Telegram Whatsapp

1 ответ

Пользователь

от johnpaul.blick , 10 дней назад

@miguel_ritchie 

В COBOL, секция DATA DIVISION отвечает за определение всех данных, которые будут использоваться в программе. Она описывает формат, тип и структуру данных, позволяя программе взаимодействовать с ними. DATA DIVISION разбивается на несколько подразделов, каждый из которых имеет свою специфику и предназначение. Вот основные элементы, которые входят в состав DATA DIVISION:

  1. FILE SECTION: Определяет структуру и формат данных, которые будут использоваться для работы с внешними файлами. Используется для описания логических файлов и их полей, которые программа будет читать из внешнего источника или записывать в него.
  2. WORKING-STORAGE SECTION: Место, где объявляются переменные, которые будут использоваться для временного хранения данных во время выполнения программы. Позволяет задавать начальные значения и определять размеры переменных.
  3. LOCAL-STORAGE SECTION: Используется для хранения данных, которые являются локальными для каждого вызова программы или процедуры. В отличие от WORKING-STORAGE SECTION, здесь данные инициализируются при каждом вызове программы.
  4. LINKAGE SECTION: Описывает данные, которые передаются в программу или процедуру извне, обычно из другой программы или процесса. Используется для определения параметров, которые программа принимает на вход или передает другим программам.
  5. REPORT SECTION: Предназначена для описания структуры отчетов, которые программа будет генерировать. Используется не так часто в современных программах.


Каждая переменная или поле внутри этих секций описывается с указанием уровня вложенности, имени, типа и, при необходимости, их начальных значений. Например:

1
2
3
4
01  CUSTOMER-RECORD.
    05  CUSTOMER-ID       PIC X(10).
    05  CUSTOMER-NAME     PIC A(30).
    05  CUSTOMER-ADDRESS  PIC X(50).


Здесь уровень 01 используется для определения записи верхнего уровня, а уровень 05 — для элементов внутри этой записи.


DATA DIVISION является критически важной частью программы COBOL, поскольку она определяет, какие данные будут доступны и в каком формате. Тщательная проработка этой секции позволяет избежать многих ошибок и недоразумений при выполнении программы.