В езика за програмиране COBOL вие дефинирате всички променливи и полета с данни в раздел от вашата програма, наречен Data Division. Тук настройвате записи за дискови файлове, печатни оформления, броячи и работно съхранение за изчисления. Вие дефинирате повечето полета с данни, като им давате уникални имена, но ключовата дума FILLER ви позволява да заделяте място в паметта, без да е необходимо име.
ПЪЛНИТЕЛ
FILLER е запазена дума, което означава, че не можете да използвате думата за именуване на полета или записи, освен за дефиниране на отделни елементи от паметта. Използвате FILLER непосредствено след номер на ниво и предхождаща клауза PICTURE, която дефинира размера на полето и типа данни. COBOL ограничава използването на FILLER до отдела за данни; не се прилага за отделите за идентификация, среда или процедури.
Видео на деня
Оформления за запис
Едно от най-честите употреби на FILLER е за дефиниции на запис на данни. Ако използвате файл с данни с дължина на записа от 150 знака и не е необходимо да маркирате всяко поле в него, можете да дефинирате ненужните знаци като FILLER, както е в следния код:
01 клиент-рекорд. 05 ФИЛЛЪР СНИМКА 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 ПЪЛНИТЕЛ СНИМКА X(5).
В отдела за процедури премествате ZIP-плюс-4 код в цял пощенски код, след което премествате първичен пощенски код в полето за местоназначение. По този начин изпускате всичко след първите пет цифри.
FILLER и СТОЙНОСТ
В запис полето FILLER запазва място в паметта и приема всякакви данни, които преместите в него. Можете също да дефинирате поле FILLER, което да има стойност. Програмистите използват тази техника често за настройване на заглавия на отчети, като например в следния пример:
01 печатен ред. 05 FILLER PIC X(10) СТОЙНОСТНИ МЕСТА. 05 FILLER PIC X(15) СТОЙНОСТ "ОТЧЕТ КРАЯ НА ГОДИНАТА". 05 FILLER PIC X(20) СТОЙНОСТНИ МЕСТА. 05 FILLER PIC X(5) СТОЙНОСТ "PAGE". 05 номер на страница PIC ZZZ9.
Обърнете внимание, че заглавията и интервалите на страницата на отчета се извършват с FILLER, с изключение на едно именувано поле, което показва номер на страница.
