.קטע האחסון לעבודה

פרק 5 - חטיבת הנתונים (DATA DIVISION)

ט.קטע האחסון לעבודה (WORKING-STORAGE SECTION)

זכור, כי בחטיבת הנתונים שני קטעים עיקריים: FILE SECTION - קטע הקבצים, ו-WORKING-STORAGE SECTION - קטע האחסון לעבודה. הסבר זה הינו היכרות ראשונית עם קטע האחסון לעבודה. הסבר רחב יותר מופיע בפרק 8.

כל שדה הדרוש לעיבוד, שאינו חלק מהקלט או מהפלט, ניתן להגדרה בקטע שטחי האחסון לעבודה..למשל, אם יש לתת לשדה ערך התחלתי 0, ולהגדיל את ערכו ב-1 רק כאשר תיקרא הרשומה האחרונה, ניתן להגדיר שדה זה ב-WORKING-STORAGE SECTION . גם שטחים, הדרושים לאחסון תוצאות ביניים של עיבוד הנתונים, יוגדרו בקטע זה.

כללים לשימיש בקטע שטחי האחסון לעבודה

קטע שטחי האוזסון לעבודה יבוא לאחר כל המשפטים, המופיעים בקטע הקבצים.
יש לקודד WORKING-STORAGE SECTION בשורה נפרדת, במרוח א,ולסיים בנקודה.
הגדרה ראשונית של פריט מקובץ, אשר יתחלק לשטחי-אחסון נוספים. לדוגמה:

.WORKING-STORAGE SECTION

.s 01 STORED-AREA
הגדרת כל השדות הדרושים בתוך הגדרת 01 לעיל:

.WORKING-STORAGE SECTION

.s 01 STORED-AREA

.s 02 END-OF-FILE-SWITCH

.s 02 GROSS-AMT
יש לתת שמות לפריטים המקובצים והבסיסיים, לפי כללי מתן-שמות.

לכל פריט בסיסי בלתי תלוי - יש לכתוב משפט PICTURE :

.WORKING-STORAGE SECTION

.s 01 STORED-AREA

.s 02 END-OF-FILE-SWITCH PIC 9

.s 02 GROSS-AMT PIC 999V99

כל פריט בסיסי בלתי'תלוי יכול לקבל ערך התחלתי, אם דרוש כזה:

.WORKING-STORAGE SECTION

.s 01 STORED-AREA

.s 02 EOF-SWITCH PIC 9 VALUE ZERO

.s 02 GROSS-AMT PIC 999V99 VALUE ZERO

אם אנו רוצים להשתמש בשדה EOF-SWITCH, לסמן מתי בוצעה קריאת הרשומה האחרונה, אנו יכולים להשתמש בו בחטיבת הביצוע כך:

.READ FILE AT END MOVE 1 TO EOF-SWITCH

גם השדה GROSS-AMT , הינו שדה נוסף, שמותר להגדירו בקטע האחסון לעבודה. כל המשפטים בקטע זה יכולים להכיל הצהרות - VALUE, אך אלה אינן הצהרות הובה, אלא רק על פי צרכיו של המתכנת.

קודם | תחילת הדף | הבא

שאלות להערכה עצמית >>

נושאים

הקדמה