U programskom jeziku COBOL definirate sve varijable i podatkovna polja u dijelu vašeg programa koji se zove Data Division. Ovdje postavljate zapise za datoteke na disku, rasporede ispisa, brojače i radnu pohranu za izračune. Većinu podatkovnih polja definirate dajući im jedinstvena imena, ali ključna riječ FILLER omogućuje vam da odvojite memorijski prostor bez potrebe za imenom.
PUNILO
FILLER je rezervirana riječ, što znači da ne možete koristiti riječ za imenovanje polja ili zapisa osim za definiranje pojedinačnih memorijskih elemenata. Koristite FILLER odmah nakon broja razine i prije klauzule PICTURE koja definira veličinu polja i vrstu podataka. COBOL ograničava korištenje FILLER-a na Odjel podataka; ne odnosi se na odjele za identifikaciju, okoliš ili postupke.
Video dana
Izgledi zapisa
Jedna od najčešćih upotreba FILLER-a je za definicije zapisa podataka. Ako koristite podatkovnu datoteku s duljinom zapisa od 150 znakova i ne morate označavati svako polje u njoj, možete definirati nepotrebne znakove kao FILLER, kao u sljedećem kodu:
01 kupac-evidencija. 05 FILLER SLIKA X(10). 05 ime kupca PIC X(30). 05 adresa kupca PIC X(30). 05 kupac-grad PIC X(30). 05 FILLER SLIKA X(50).
To vam omogućuje da pročitate zapis od 150 znakova i identificirate polja koja želite - ime kupca, adresu i grad - dok zanemarujete ostatak zapisa.
Ekstrakcija podniza
Možete koristiti ključnu riječ FILLER za pomoć u ekstrakciji podniza iz većeg niza. Na primjer, da biste izdvojili prvih pet znamenki poštanskog broja, možete postaviti sljedeće izjave u odjeljku Working-Storage:
01 cijeli poštanski broj. 05 primarni patentni zatvarač PIC X(5). 05 FILLER SLIKA X(5).
U odjelu za postupke premještate ZIP-plus-4 kod u cijeli poštanski broj, a zatim premještate primarni poštanski broj u odredišno polje. Pritom ispuštate sve nakon prvih pet znamenki.
PUNILO i VRIJEDNOST
U zapisu, polje FILLER rezervira memorijski prostor i prihvaća sve vrste podataka koje u njega premjestite. Također možete definirati FILLER polje da ima vrijednost. Programeri često koriste ovu tehniku za postavljanje naslova izvješća, kao što je u sljedećem primjeru:
01 redak za ispis. 05 FILLER PIC X(10) VRIJEDNOST PROSTORA. 05 FILLER PIC X(15) VRIJEDNOST "IZVJEŠTAJ KRAJ GODINE". 05 FILLER PIC X(20) VRIJEDNOST PROSTORA. 05 FILLER PIC X(5) VRIJEDNOST "PAGE". 05 broj stranice PIC ZZZ9.
Imajte na umu da se naslovi i razmaci zaglavlja stranice izvješća rade s FILLER, osim jednog polja s imenom koje prikazuje broj stranice.
