פסקאות וביצוע

ב-COBOL, מודולריות ומבנה לוגי של קוד בתוך PROCEDURE DIVISION אינם מתרחשים באמצעות פונקציות או שיטות, אלא באמצעות Paragraphs והמשפט PERFORM.

הגדרת פסקאות

פסקה היא קטע קוד מתויג שמתחיל בשם בעמודה 8 (אזור A) המסתיים בנקודה ., ואחריו רצף הוראות בעמודה 12 (אזור B).

COBOL

DISPLAY-MESSAGE.
    DISPLAY "This is a paragraph!".

פסקאות מאפשרות לפצל תוכניות שעלולות להיות ארוכות מאוד לבלוקים הניתנים לשימוש חוזר ולתיעוד עצמי.

ביצוע פסקאות עם PERFORM

ההצהרה PERFORM מפעילה פסקה ומבצעת אותה, ואז מחזירה את השליטה להוראה מיד לאחר ההצהרה PERFORM.

COBOL

PROCEDURE DIVISION.
MAIN-PROCEDURE.
    DISPLAY "Starting program...".
    PERFORM PROCESS-DATA.
    DISPLAY "Ending program.".
    STOP RUN.

PROCESS-DATA.
    DISPLAY "Processing data in memory...".

ברשימה לעיל:

ה-DISPLAY בתוך MAIN-PROCEDURE מבוצע.
PERFORM PROCESS-DATA מסניף את הביצוע לפסקה PROCESS-DATA.
לאחר שהפסקה PROCESS-DATA מסתיימת, הביצוע חוזר ל-MAIN-PROCEDURE כדי להדפיס "תוכנית סיום". והפסק להשתמש ב-STOP RUN..

נסה זאת בעצמך

פעילות גופנית#cobol.m3.l1.e1

ניסיונות: 0טוען...

הגדירו פסקה בשם DISPLAY-TOTAL שמדפיסה 'TOTAL IS DONE' באמצעות DISPLAY, וקראו לה בתוך MAIN-PROCEDURE באמצעות PERFORM לפני עצירת התוכנית.

טוען עורך...

הצג רמז

כתוב PERFORM DISPLAY-TOTAL. בעמודה 12, ומתחת לבלוק MAIN-PROCEDURE הכריזו על DISPLAY-TOTAL. פסקה בעמודה 8.

הפתרון זמין לאחר 3 ניסיונות

פעילות גופנית#cobol.m3.l1.e2

ניסיונות: 0טוען...

קרא שתי פסקאות ברצף, תחילה INITIALISE-DATA ולאחר מכן PROCESS-DATA, בתוך בלוק MAIN-PROCEDURE.

טוען עורך...

הצג רמז

הכנס את שני הצהרות PERFORM בסדר עוקב בעמודה 12.

הפתרון זמין לאחר 3 ניסיונות