|
פרק 6 - חטיבת הביצוע (PROCEDURE DIVISION) |
|
ה. הוראת
MOVE פשוטה
|
|
מבנה
הוראת MOVE
הוא כלהלן
|
.(שם-נתון-2)
TO (שם-נתון-1) MOVE
|
כל
שדה בזיכרון יכול להיות מועבר לשדה אחר
באמצעות הוראת MOVE
|
PROCEDURE
DIVISION.
OPEN
INPUT FILE-1, OUTPUT FILE-2.
READ
FILE-1 AT END MOVE 1 TO EOF.
PERFORM
CALC-RTN UNTIL EOF=1.
CLOSE
FILE-1,FILE-2.
STOP
RUN.
CALC-RTN.
MOVE NAME-IN TO NAME-OUT.
MOVE
AMT-OF-CREDIT-IN TO AMT-OF-CREDIT-OUT.
.MOVE
AMT-OF-DEBIT-IN TO AMT-OF-DEBIT-OUT
|
בהנחה,
שהצהרת ה- PICTUREשל
שדה הפלט זהה לזו של שדה הקלט, הוראת MOVE מעתיקה את נתוני
הקלט אל שטח הפלט. יצויין, שהשיטה, בה
מציינים שם בסיסי זהה לשדות שונים, תוך
שינוי קידומת או תוספת, נחשבת שיטת תכנות
טובה. כלומר, ההבחנה בין AMT-OF-CREDIT-IN,
כשדה קלט, לבין AMT-OF-CREDIT-OUT. כשדה המתאים בפלט, הינה ברורה.
שים לב שוב, כי CALC-RTN הינה שגרה נפרדת. היא מתבצעת אך ורק
תחת שליטתה של הוראת
PERFORM; כדי להשלים את CALC-RTN, עלינו לכתוב (WRITE) את הרשומה שנצטברה בשטח הפלט,
ואז לקרוא את הרשומה הבאה מקובץ הקלט.
קודם | תחילת הדף | הבא
|
פרק 1 - מבוא לתכנות COBOL.
פרק 6 - חטיבת הביצוע
(PROCEDURE DIVISION)
