Razlaga polnila v programu COBOL

V programskem jeziku COBOL definirate vse spremenljivke in podatkovna polja v razdelku vašega programa, imenovanem Data Division. Tukaj nastavite zapise za diskovne datoteke, postavitve tiskanja, števce in delovno shrambo za izračune. Večino podatkovnih polj definirate tako, da jim daste unikatna imena, vendar ključna beseda FILLER omogoča, da rezervirate 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 klavzulo PICTURE, ki določa velikost in tip podatkov polja. COBOL omejuje uporabo FILLER na Data Division; ne velja za oddelke za identifikacijo, okolje ali postopke.

Postavitve zapisa

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

01 zapis o strankah. 05 POLNILO SLIKE X(10). 05 ime stranke PIC X(30). 05 naslov stranke PIC X(30). 05 mesto stranke PIC X(30). 05 POLNILO SLIKE X(50).

To vam omogoča, da preberete 150-mestni zapis in identificirate želena polja – ime stranke, naslov in mesto – medtem ko zanemarite preostali del zapisa.

Ekstrakcija podniza

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

01 celotna poštna številka. 05 primarni-zip PIC X(5). 05 POLNILO SLIKE X(5).

V razdelku postopkov premaknete kodo ZIP-plus-4 v celotno poštno številko, nato premaknete primarno-zip v ciljno polje. Pri tem izpustite vse po prvih petih številkah.

FILLER in VALUE

V zapisu polje FILLER rezervira pomnilniški prostor in sprejme vse vrste podatkov, ki jih premaknete vanj. Definirate lahko tudi polje FILLER, ki ima vrednost. Programerji to tehniko pogosto uporabljajo za nastavitev naslovov poročil, kot je v naslednjem primeru:

01 tiskalna vrstica. 05 POLNILO SLIKE X(10) VREDNOSTNI PRESTOLI. 05 POLNILO SLIKE X(15) VREDNOST "POROČILO KONEC LETA". 05 POLNILO SLIKE X(20) VREDNOSTNI PRESTOLI. 05 POLNILO SLIKE X(5) VREDNOST "STRANI". 05 številka strani PIC ZZZ9.

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