В языке программирования COBOL вы определяете все переменные и поля данных в разделе вашей программы, называемом Data Division. Здесь вы настраиваете записи для файлов на диске, макеты печати, счетчики и рабочее хранилище для расчетов. Вы определяете большинство полей данных, давая им уникальные имена, но ключевое слово FILLER позволяет выделить пространство памяти без необходимости в имени.
НАПОЛНИТЕЛЬ
ЗАПОЛНИТЕЛЬ - это зарезервированное слово, означающее, что вы не можете использовать это слово для именования полей или записей, кроме как для определения отдельных элементов памяти. Вы используете FILLER сразу после номера уровня и перед предложением PICTURE, которое определяет размер поля и тип данных. COBOL ограничивает использование FILLER Отделом данных; он не применяется к отделам идентификации, окружающей среды или процедур.
Видео дня
Макеты записи
Одно из наиболее распространенных применений FILLER - определение записей данных. Если вы используете файл данных с длиной записи 150 символов и вам не нужно маркировать каждое поле в нем, вы можете определить ненужные символы как FILLER, как в следующем коде:
01 запись о клиенте. 05 НАПОЛНИТЕЛЬ PIC X (10). 05 имя клиента PIC X (30). 05 адрес клиента PIC X (30). 05 город-заказчик PIC X (30). 05 НАПОЛНИТЕЛЬ PIC X (50).
Это позволяет вам читать 150-символьную запись и определять нужные поля - имя клиента, адрес и город - при игнорировании остальной части записи.
Извлечение подстроки
Вы можете использовать ключевое слово FILLER для извлечения подстрок из более крупной строки. Например, чтобы извлечь первые пять цифр почтового индекса, вы можете настроить следующие операторы в разделе рабочего хранилища:
01 весь почтовый индекс. 05 первичная застежка-молния PIC X (5). 05 НАПОЛНИТЕЛЬ PIC X (5).
В разделе «Процедура» вы перемещаете почтовый индекс «почтовый индекс плюс 4» в «весь почтовый индекс», а затем перемещаете основной почтовый индекс в поле назначения. При этом вы отбрасываете все после первых пяти цифр.
НАПОЛНИТЕЛЬ и СТОИМОСТЬ
В записи поле FILLER резервирует пространство памяти и принимает любые данные, которые вы в него перемещаете. Вы также можете определить поле FILLER, чтобы иметь значение. Программисты часто используют этот метод для настройки заголовков отчетов, как в следующем примере:
01 линия печати. 05 НАПОЛНИТЕЛЬ PIC X (10) ЗНАЧЕНИЕ ПРОСТРАНСТВ. 05 FILLER PIC X (15) ЗНАЧЕНИЕ "ОТЧЕТ НА КОНЕЦ ГОДА". 05 НАПОЛНИТЕЛЬ PIC X (20) ЗНАЧЕНИЕ ПРОСТРАНСТВ. 05 FILLER PIC X (5) ЗНАЧЕНИЕ "СТРАНИЦА". 05 номер страницы PIC ZZZ9.
Обратите внимание, что заголовки и интервалы заголовков страниц отчета выполняются с помощью ЗАПОЛНИТЕЛЯ, за исключением одного именованного поля, в котором отображается номер страницы.
