COBOL-ohjelmointikielellä määrität kaikki muuttujat ja tietokentät ohjelmasi osiossa nimeltä Data Division. Täällä voit määrittää tietueita levytiedostoille, tulostusasettelut, laskurit ja työmuisti laskelmia varten. Useimmat tietokentät määritetään antamalla niille yksilölliset nimet, mutta FILLER-avainsanalla voit varata muistitilaa ilman nimeä.
TÄYTE
FILLER on varattu sana, joten et voi käyttää sanaa kenttien tai tietueiden nimeämiseen muuten kuin yksittäisten muistielementtien määrittelemiseen. Käytät FILLER-komentoa välittömästi tason numeron jälkeen ja ennen PICTURE-lausetta, joka määrittää kentän koon ja tietotyypin. COBOL rajoittaa FILLERin käytön tietoosastoon; se ei koske tunnistus-, ympäristö- tai menettelyosastoja.
Päivän video
Record Layouts
Yksi yleisimmistä FILLERin käyttötavoista on tietueiden määrittely. Jos käytät datatiedostoa, jonka tietueen pituus on 150 merkkiä, etkä tarvitse nimetä jokaista sen kenttää, voit määrittää tarpeettomat merkit TÄYTTEEN, kuten seuraavassa koodissa:
01 asiakasennätys. 05 TÄYTEKUVA X(10). 05 asiakkaan nimi PIC X(30). 05 asiakkaan osoite PIC X(30). 05 asiakas-kaupunki PIC X(30). 05 TÄYTEKUVA X(50).
Näin voit lukea 150 merkin pituisen tietueen ja tunnistaa haluamasi kentät – asiakkaan nimen, osoitteen ja kaupungin – jättäen huomioimatta tietueen loput.
Alimerkkijonon purku
Voit käyttää FILLER-avainsanaa auttamaan alimerkkijonojen poimimisessa suuremmasta merkkijonosta. Jos haluat esimerkiksi poimia postinumeron viisi ensimmäistä numeroa, voit määrittää seuraavat lausekkeet Working-Storage-osiossa:
01 koko postinumero. 05 ensisijainen vetoketju PIC X(5). 05 TÄYTEKUVA X(5).
Menettelyosiossa siirrät ZIP-plus-4-koodin koko-postinumeroon ja siirrät sitten ensisijaisen postinumeron kohdekenttään. Tällöin pudotat kaiken viiden ensimmäisen numeron jälkeen.
FILLER ja VALUE
Tietueessa FILLER-kenttä varaa muistitilaa ja hyväksyy kaikenlaiset siihen siirtämäsi tiedot. Voit myös määrittää TÄYTTE-kenttään arvon. Ohjelmoijat käyttävät tätä tekniikkaa usein raporttien otsikoiden määrittämiseen, kuten seuraavassa esimerkissä:
01 tulostusrivi. 05 TÄYTEKUVA X(10) ARVOTILAT. 05 TÄYTEKUVA X(15) ARVO "VUODEN LOPPURAPORTTI". 05 TÄYTEKUVA X(20) ARVOTILAT. 05 FILLER PIC X(5) ARVO "SIVU". 05 sivunumero PIC ZZZ9.
Huomaa, että raporttisivujen otsikoiden otsikot ja välilyönnit tehdään FILLER-toiminnolla, paitsi yksi nimetty kenttä, jossa näkyy sivunumero.
