בשפת התכנות COBOL, אתה מגדיר את כל המשתנים ושדות הנתונים בקטע של התוכנית שלך שנקרא חטיבת הנתונים. כאן אתה מגדיר רשומות עבור קבצי דיסקים, פריסות הדפסה, מונים ואחסון עבודה לחישובים. אתה מגדיר את רוב שדות הנתונים על ידי מתן שמות ייחודיים, אבל מילת המפתח FILLER מאפשרת לך להפריש שטח זיכרון ללא צורך בשם.
מִלוּי
FILLER היא מילה שמורה, כלומר אינך יכול להשתמש במילה לשם מתן שמות לשדות או לרשומות מלבד הגדרת רכיבי זיכרון בודדים. אתה משתמש ב-FILLER מיד אחרי מספר רמה ולפני משפט PICTURE המגדיר את גודל השדה וסוג הנתונים. COBOL מגביל את השימוש ב-FILLER לחטיבת הנתונים; זה לא חל על חטיבות זיהוי, סביבה או נוהל.
סרטון היום
פריסות הקלטות
אחד השימושים הנפוצים ביותר עבור FILLER הוא עבור הגדרות רשומות נתונים. אם אתה משתמש בקובץ נתונים באורך רשומה של 150 תווים ואינך צריך לתייג כל שדה בו, אתה יכול להגדיר את התווים הלא נחוצים כ-FILLER, כמו בקוד הבא:
שיא לקוח 01. 05 FILLER PIC X(10). 05 שם לקוח PIC X(30). 05 כתובת הלקוח PIC X(30). 05 לקוחות-עיר PIC X(30). 05 FILLER PIC X(50).
זה מאפשר לך לקרוא רשומה של 150 תווים ולזהות את השדות הרצויים - שם הלקוח, הכתובת והעיר - תוך התעלמות משאר הרשומה.
מיצוי מחרוזת משנה
אתה יכול להשתמש במילת המפתח FILLER כדי לסייע בחילוץ של מחרוזות משנה ממחרוזת גדולה יותר. לדוגמה, כדי לחלץ את חמש הספרות הראשונות של מיקוד, אתה יכול להגדיר את ההצהרות הבאות ב-Working-Storage Section:
01 מיקוד שלם. 05 ראשי-zip PIC X(5). 05 FILLER PIC X(5).
בחטיבת ההליכים, אתה מעביר קוד ZIP פלוס 4 לקוד שלם, ולאחר מכן מעביר את הקוד הראשי לשדה יעד. בכך, אתה מוריד הכל אחרי חמש הספרות הראשונות.
FILLER ו-VALUE
ברשומה, שדה FILLER שומר שטח זיכרון ומקבל כל סוג של נתונים שאתה מעביר אליו. ניתן גם להגדיר לשדה FILLER ערך. מתכנתים משתמשים בטכניקה זו לעתים קרובות להגדרת כותרות דוחות, כגון בדוגמה הבאה:
01 קו הדפסה. 05 FILLER PIC X(10) VALUE SPACES. 05 FILLER PIC X(15) VALUE "דוח סוף שנה". 05 FILLER PIC X(20) VALUE SPACES. 05 FILLER PIC X(5) VALUE "PAGE". 05 עמוד מספר PIC ZZZ9.
שים לב שהכותרות והמרווחים של כותרות הדוח נעשים כולם עם FILLER, מלבד שדה אחד בעל שם שמציג מספר עמוד.
