A COBOL program kitöltőjének magyarázata

A COBOL programozási nyelvben minden változót és adatmezőt definiál a program Data Division nevű szakaszában. Itt állíthatja be a lemezfájlok rekordjait, a nyomtatási elrendezéseket, a számlálókat és a számításokhoz szükséges munkatárat. A legtöbb adatmezőt úgy határozhatja meg, hogy egyedi nevet ad nekik, de a FILLER kulcsszó lehetővé teszi, hogy memóriaterületet szabadítson fel név nélkül.

FILLER

A FILLER egy fenntartott szó, ami azt jelenti, hogy nem használhatja a szót mezők vagy rekordok elnevezésére másként, mint az egyes memóriaelemek meghatározására. A FILLER-t közvetlenül egy szintszám után és egy PICTURE záradék előtt használja, amely meghatározza a mező méretét és adattípusát. A COBOL a FILLER használatát az Adatosztályra korlátozza; nem vonatkozik az Azonosítás, Környezet és Eljárás részlegekre.

Rögzítési elrendezések

A FILLER egyik leggyakoribb felhasználási módja az adatrekord-definíciók. Ha 150 karakteres rekordhosszú adatfájlt használ, és nem kell minden mezőt felcímkéznie, akkor a felesleges karaktereket FILLER-ként definiálhatja, a következő kód szerint:

01 ügyfél-rekord. 05 FILLER PIC X(10). 05 ügyfélnév PIC X(30). 05 ügyfél-cím PIC X(30). 05 ügyfél-város PIC X(30). 05 FILLER PIC X(50).

Ezzel beolvashat egy 150 karakteres rekordot, és azonosíthatja a kívánt mezőket – az ügyfél nevét, címét és városát –, miközben figyelmen kívül hagyja a rekord többi részét.

Alkarakterlánc-kivonás

Használhatja a FILLER kulcsszót, hogy elősegítse a részkarakterláncok kinyerését egy nagyobb karakterláncból. Például egy irányítószám első öt számjegyének kinyeréséhez a következő utasításokat állíthatja be a Munkatárolás részben:

01 teljes irányítószám. 05 elsődleges zip PIC X(5). 05 FILLER PIC X(5).

Az eljárási részlegben áthelyez egy ZIP-plus-4 kódot a teljes irányítószámra, majd az elsődleges ZIP-kódot egy célmezőbe. Ennek során mindent eldob az első öt számjegy után.

FILLER és ÉRTÉK

Egy rekordban a FILLER mező memóriaterületet foglal le, és elfogad minden olyan adatot, amelyet áthelyez. Megadhat egy FILLER mezőt is, hogy legyen értéke. A programozók gyakran használják ezt a technikát a jelentések fejléceinek beállításához, például a következő példában:

01 nyomtatási sor. 05 FILLER PIC X(10) ÉRTÉKTEREK. 05 FILLER PIC X(15) ÉRTÉK "ÉV VÉGI JELENTÉS". 05 FILLER PIC X(20) ÉRTÉKTEREK. 05 FILLER PIC X(5) ÉRTÉK "OLDAL". 05 oldalszámú PIC ZZZ9.

Ne feledje, hogy a jelentésoldalak fejlécének címei és a térközök mindegyike a FILLER-rel történik, kivéve egy elnevezett mezőt, amely oldalszámot jelenít meg.