У мові програмування COBOL ви визначаєте всі змінні та поля даних у розділі вашої програми, який називається розділом даних. Тут ви налаштовуєте записи для дискових файлів, розкладки друку, лічильники та робоче сховище для розрахунків. Ви визначаєте більшість полів даних, даючи їм унікальні імена, але ключове слово FILLER дозволяє виділяти місце в пам’яті без необхідності вводити ім’я.
НАПОЛНЮВАЧ
FILLER є зарезервованим словом, що означає, що ви не можете використовувати це слово для іменування полів або записів, крім визначення окремих елементів пам’яті. Ви використовуєте FILLER відразу після номера рівня та перед реченням PICTURE, яке визначає розмір поля та тип даних. COBOL обмежує використання FILLER відділом даних; це не поширюється на відділи ідентифікації, середовища чи процедур.
Відео дня
Макети запису
Одним із найпоширеніших варіантів використання FILLER є визначення записів даних. Якщо ви використовуєте файл даних із довжиною запису 150 символів і вам не потрібно позначати кожне поле в ньому, ви можете визначити непотрібні символи як FILLER, як у наведеному нижче коді:
01 клієнт-рекорд. 05 FILLER PIC X(10). 05 ім'я клієнта PIC X(30). 05 адреса клієнта PIC X(30). 05 клієнт-місто PIC X(30). 05 FILLER PIC X(50).
Це дозволяє прочитати запис із 150 символів і визначити потрібні поля — ім’я клієнта, адресу та місто — при цьому ігнорувати решту запису.
Вилучення підрядка
Ви можете використовувати ключове слово FILLER, щоб допомогти вилучити підрядки з більшого рядка. Наприклад, щоб отримати перші п’ять цифр поштового індексу, ви можете налаштувати такі оператори в розділі Working-Storage:
01 цілий поштовий індекс. 05 первинна блискавка PIC X(5). 05 FILLER PIC X(5).
У розділі процедур ви переміщуєте код ZIP-плюс-4 до повного поштового коду, а потім переміщуєте основний ZIP-код у поле призначення. При цьому ви скидаєте все після перших п’яти цифр.
FILLER і VALUE
У записі поле FILLER резервує місце в пам’яті та приймає будь-які дані, які ви переміщуєте в нього. Ви також можете визначити значення поля FILLER. Програмісти часто використовують цю техніку для налаштування заголовків звітів, як-от у наступному прикладі:
01 рядок друку. 05 FILLER PIC X(10) ПРОБІЛ ЗНАЧЕННЯ. 05 FILLER PIC X(15) ЗНАЧЕННЯ "ЗВІТ ЗА РІК". 05 FILLER PIC X(20) ПРОБІЛ ЗНАЧЕННЯ. 05 FILLER PIC X(5) ЗНАЧЕННЯ "СТОРІНКА". 05 номер сторінки ПІК ZZZ9.
Зауважте, що заголовки сторінки звіту та інтервали виконуються за допомогою FILLER, за винятком одного іменованого поля, яке відображає номер сторінки.
