У програмском језику ЦОБОЛ, ви дефинишете све варијабле и поља података у делу вашег програма који се зове Дата Дивисион. Овде подешавате записе за датотеке на диску, распореде за штампање, бројаче и радну меморију за прорачуне. Већину поља података дефинишете тако што ћете им дати јединствена имена, али кључна реч ФИЛЛЕР вам омогућава да одвојите меморијски простор без потребе за именом.
ФИЛЛЕР
ФИЛЛЕР је резервисана реч, што значи да не можете користити реч за именовање поља или записа осим за дефинисање појединачних меморијских елемената. Користите ФИЛЛЕР одмах иза броја нивоа и испред клаузуле ПИЦТУРЕ која дефинише величину поља и тип података. ЦОБОЛ ограничава употребу ФИЛЛЕР-а на Одељење података; не односи се на одељења за идентификацију, окружење или процедуре.
Видео дана
Распореди записа
Једна од најчешћих употреба ФИЛЛЕР-а је за дефиниције записа података. Ако користите датотеку са подацима са дужином записа од 150 знакова и не морате да означавате свако поље у њој, можете да дефинишете непотребне знакове као ФИЛЛЕР, као у следећем коду:
01 купац-евиденција. 05 ФИЛЛЕР ПИЦ Кс(10). 05 име купца ПИЦ Кс(30). 05 адреса купца ПИЦ Кс(30). 05 корисник-град ПИЦ Кс(30). 05 ФИЛЛЕР ПИЦ Кс(50).
Ово вам омогућава да прочитате запис од 150 знакова и идентификујете поља која желите - име клијента, адресу и град - док игноришете остатак записа.
Екстракција подстринга
Можете користити кључну реч ФИЛЛЕР да помогнете у екстракцији подстрингова из већег низа. На пример, да бисте издвојили првих пет цифара поштанског кода, можете подесити следеће изјаве у одељку Воркинг-Стораге:
01 цео поштански број. 05 примарни-зип ПИЦ Кс(5). 05 ФИЛЛЕР ПИЦ Кс(5).
У одељку за процедуре, преместите ЗИП-плус-4 код у цео поштански број, а затим преместите примарни-зип у одредишно поље. При томе испуштате све после првих пет цифара.
ФИЛЕР и ВРЕДНОСТ
У запису, поље ФИЛЛЕР резервише меморијски простор и прихвата било коју врсту података које у њега преместите. Такође можете да дефинишете ФИЛЛЕР поље да има вредност. Програмери често користе ову технику за подешавање наслова извештаја, као што је у следећем примеру:
01 принт-лине. 05 ФИЛЛЕР ПИЦ Кс(10) ВРЕДНОСТИ ПРОСТОРА. 05 ФИЛЛЕР ПИЦ Кс(15) ВРЕДНОСТ "ИЗВЕШТАЈ КРАЈ ГОДИНЕ". 05 ФИЛЛЕР ПИЦ Кс(20) ВРЕДНОСТИ ПРОСТОРА. 05 ФИЛЛЕР ПИЦ Кс(5) ВРЕДНОСТ "ПАГЕ". 05 број странице ПИЦ ЗЗЗ9.
Имајте на уму да се наслови и размаци заглавља страница извештаја обављају помоћу ФИЛЛЕР, осим једног именованог поља које приказује број странице.
