נניה, שאנו מגדירים שדה בקטע האחסון לעבודה באופן הבא:
רישום זה מבצע אותה פעולה כמו MOVE ‘ABC’ TO CODE-1, בו CODE-1 חסר פסוק VALUE. מאחר שאורכו של הנתון-המפורש הוא 3 תווים והשדה מוגדר כבעל 8 תווים, 'ABC' ייושר לשמאל השדה. עליך לזכור שכאשר השדות או הנתונים המפורשים הנשלחים הם קטנים מן השדות המקבלים בפעולות-הצבה (MOVE) אלפאנומריות, הנתון ייושר לשמאל השדה המקבל והמקומות בעלי הערך הנמוך (מימין) ממולאים ברווחים. על כן, תוכנו של המשתנה CODE-1, לדוגמה, יהיה ABC~~~~~ (מרווח אחד = ~). לצורך שימושים מסויימים, בעיקר בהצבה של אותיות עבריות, רצוי, לפעמים שהנתון בשדה יהיה מיושר לימין. כלומר, היינו רוצים לקבל ב~~~~~ABC :CODE-1. המשפט JUSTIFIED RIGHT, בו נשתמש בחטיבת-הנתונים, ייתן את התוצאה הדרושה. ניתן להגדיר את CODE-1 כך:
|
פרק 1 - מבוא לתכנות COBOL.
פרק 2 - ארגון נתונים
פרק 3 - חטיבת הזיהוי
(IDENTIFICATION DIVISION)
פרק 4 - חטיבת הסביב
(ENVIRONMENTAL DIVISION)
פרק 5 - חטיבת הנתונים
(DATA DIVISION)
פרק 6 - חטיבת הביצוע
(PROCEDURE DIVISION)
פרק 7 - הוראת MOVE
פרק 8 - קטעי האחסון לעבודה
פרק 9 - הוראות אריתמטיות
פרק 10- הוראות תנאי
פרק 11 - רישומים נוספים בחתיבת הנתונים
פרק 12 - עריכת פלט מודפס
פרק 13 - הוראות מיוחדות לעריכת הדפסה
פרק 14 - הוראת DISPLAY ו-ACCEPT
|
.איתן 2002. כל הזכויות שמורות למערכת המידע איתן © |