Razlaga polnila v programu COBOL

V programskem jeziku COBOL definirate vse spremenljivke in podatkovna polja v delu vašega programa, ki se imenuje Podatkovni odsek. Tukaj nastavite zapise za diskovne datoteke, postavitve tiskanja, števce in delovno shranjevanje za izračune. Večino podatkovnih polj definirate tako, da jim date edinstvena imena, toda ključna beseda FILLER vam omogoča, da pustite pomnilniški prostor brez potrebe po imenu.

POLNILO

FILLER je rezervirana beseda, kar pomeni, da besede ne morete uporabiti za poimenovanje polj ali zapisov, razen za definiranje posameznih pomnilniških elementov. FILLER uporabite takoj za številko ravni in pred stavkom PICTURE, ki definira velikost polja in tip podatkov. COBOL omejuje uporabo FILLERja na Oddelek za podatke; ne velja za oddelke za identifikacijo, okolje ali postopke.

Video dneva

Postavitve zapisov

Ena najpogostejših uporab FILLER je za definicije zapisov podatkov. Če uporabljate podatkovno datoteko z dolžino zapisa 150 znakov in vam ni treba označiti vsakega polja v njej, lahko nepotrebne znake definirate kot FILLER, kot v naslednji kodi:

01 evidenca stranke. 05 FILLER SLIKA X(10). 05 ime stranke PIC X(30). 05 naslov stranke PIC X(30). 05 PIC mesta stranke X(30). 05 FILLER SLIKA X(50).

To vam omogoča branje zapisa s 150 znaki in identifikacijo polj, ki jih želite – ime stranke, naslov in mesto –, medtem ko ignorirate preostali del zapisa.

Ekstrakcija podniza

Za pomoč pri ekstrakciji podnizov iz večjega niza lahko uporabite ključno besedo FILLER. Če želite na primer izvleči prvih pet števk poštne številke, lahko v razdelku Working-Storage nastavite naslednje izjave:

01 cela poštna številka. 05 primarna zadrga PIC X(5). 05 FILLER SLIKA X(5).

V oddelku za postopke premaknete kodo ZIP-plus-4 v celotno poštno kodo, nato pa primarno-zip premaknete v ciljno polje. Pri tem izpustiš vse po prvih petih številkah.

POLNILO in VREDNOST

V zapisu polje FILLER rezervira pomnilniški prostor in sprejme kakršne koli podatke, ki jih premaknete vanj. Določite lahko tudi polje FILLER, ki ima vrednost. Programerji pogosto uporabljajo to tehniko za nastavitev naslovov poročil, na primer v naslednjem primeru:

01 vrstica za tiskanje. 05 FILLER PIC X(10) VREDNOSTNI PRESTORJI. 05 FILLER PIC X(15) VREDNOST "POROČILO OB KONCU LETA". 05 FILLER PIC X(20) VREDNOSTNI PRESTORJI. 05 FILLER PIC X(5) VREDNOST "PAGE". 05 številka strani PIC ZZZ9.

Upoštevajte, da so naslovi glave strani poročila in razmiki vsi narejeni s FILLER, razen enega poimenovanega polja, ki prikazuje številko strani.