קבועים מספריים קבוע מספרי הוא קבוע המוגדר בחטיבת הביצוע (PROCEDURE DIVISION) ומשמש לביצוע פעולות אריתמטיות.
שים לב, שהסימן חיובי או שלילי אינו חייב להופיע כחלק מן הקבוע, אך יכול להופיע. אם הסימן כלול בקבוע, עליו להופיע משמאל למספר. כלומר המספריס 16+ או 12- הינם קבועיס מספריים חוקיים,אך +16 או -12 אינם חוקיים. אם אין סימן משמאלו של המספר, המספר ייחשב חיובי. מאחר שנקודה עשרונית אינה יכולה להופיע כתו אחרון, הקבוע המספרי 18.2 הינו קבוע מספרי חוקי, בעוד .16 אינו כזה. עם זאת, 16.0 הינו קבוע מספרי חוקי. המספרים הבאים הינם קבועים מספריים חוקיים, שיכולים להופיע בחטיבת הביצוע של תכנית COBOL :
נניח שברצוננו להוסיף 10.3 לשדה פלט, הנקרא TOTAL , והמוגדר בקטע FD (תיאור הקובץ) בחטיבת הנתונים. ההוראה הבאה הינה חוקית:
ניתן להשתמש בקבוע המספרי 10.3 לפעולות חשבוניות. להלן מופיעים קבועים מספריים, שאינם חוקיים, ומוסברות הסיבות לחוסר חוקיותם:
קבוע מספרי, אם כן, הוא קבוע, שניתן להשתמש בו בחטיבת הביצוע של תכבית COBOL. קבועים מספריים הם בעלי ערך מספרי קבוע, שמשתמשים בו לפעולות חשבוניות. יש להשתמש בחוקים שצויינו לעיל, כאשר מגדירים קבוע מספרי. קבועים שאינם מספריים קבוע שאינו מספרי הינו קבוע, שמשתמשים בו לחטיבת הביצוע לכל מטרה, מלבד ביצוע פעולות אריתמטיות. יש להשתמש בחוקים הבאים, כאשר מגדירים קבוע שאינו מספרי.
הדפסת קבוע מהקבועים שלמעלה תגרום הדפסת כל התווים שבין סימני הציטוט. כלומר יודפסו ABC 123 , CODE,1,000 וכו'. שים לב, שקבוע שאינו מספרי יכול להכיל כל ספרה, '123' הוא קבוע לא מספרי חוקי. יש להבחין בינו לבין הקבוע המספרי 123, המשמש לפעולות אריתמטיות. אם ,כרצוננו להציב את ההודעה INVALID RECORD בשדה פלט בשם MESSAGE-FIELD, לפני שאנו כותבים את רשומת הפלט, נכתוב את ההוראה הבאה ב-COBOL:
משמעותה של הוראה זו היא, שהשדה TOTAL ימולא כולו באפסים. לקבוע המיוחד ZERO יש ערך של 'הכל אפסים' (או 'מלא באפסים'). המילים ZEROES, ZEROS, ZERO הינם קבועים מיוחדים שקולים, שיש להם אותו ערך. ניתן להחליפם וה בזה בתכנית COBOL. PACES הינו קבוע מיוח'ר אחר, שמשמעותו 'הכל רווחים' או 'מלא ברווחים'. לדוגמה ההוראה:
תגרום, שהשדה CODE-OUT ימולא ברווחים. המלה SPACES הינה מלה שמורה ב- COBOL, שיש לה ערך של 'מלא ברווחים'. ניתן להחליפה בקבוע המיוחד השקול SPACE . ZERO ו-SPACES הם הקבועים המיוחדים הנפוצים ביותר. עם זאת, קיימים קבועים מיוחדים נוספים, שנדון בהם מאוחר יותר. אם כן, ניתן להגדיר שלושה סוגי נתונים בחטיבת הביצוע: קבוע מספרי, קבוע שאינו מספרי, וקבוע מיוחד. ניתן להגדירם ישירות בכל מקום שהוא בחטיבת הביצוע. משתנים, המופיעים בהוראות בהטיבת הביצוע, חייבים להיות מוגדרים מראש בחטיבת הנתונים. השימוש בקבועים ייעשה, ברור יותר, כאשר נדון בהוראות שונות בחטיבת הביצוע. בנקודה זו, על הקורא לדעת להבחין בין קבועים לבין שמות שדות. המבנה המפורט של משפטי ADD ו-MOVE, בהם מופיעים קבועים כאלה, יובא בפירוט רב יותר בהמשך.
|
פרק 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. כל הזכויות שמורות למערכת המידע איתן © |