دروس الوحدة (1/2)
الفقرات والأداء
في لغة COBOL، لا تحدث الوحدة النمطية والبنية المنطقية للتعليمات البرمجية داخل PROCEDURE DIVISION عبر الوظائف أو الأساليب، ولكن من خلال الفقرات وعبارة PERFORM.
تعريف الفقرات
الفقرة عبارة عن قسم مسمى من التعليمات البرمجية يبدأ باسم في العمود 8 (المنطقة أ) وينتهي بنقطة .، متبوعة بسلسلة من التعليمات في العمود 12 (المنطقة ب).
DISPLAY-MESSAGE.
DISPLAY "This is a paragraph!".تسمح الفقرات بتقسيم البرامج الطويلة جدًا إلى كتل قابلة لإعادة الاستخدام وذاتية التوثيق.
تنفيذ الفقرات باستخدام PERFORM
تستدعي العبارة PERFORM فقرة وتنفذها، ثم تعيد التحكم إلى التعليمة التي تلي العبارة PERFORM مباشرة.
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..
جربه بنفسك
حدد فقرة باسم DISPLAY-TOTAL تطبع 'TOTAL IS DONE' باستخدام DISPLAY، واستدعها داخل MAIN-PROCEDURE باستخدام PERFORM قبل إيقاف البرنامج.
إظهار التلميح
اكتب عرض الأداء الإجمالي. في العمود 12، وأسفل كتلة الإجراء الرئيسي، قم بتعريف إجمالي العرض. الفقرة في العمود 8.
الحل متاح بعد 3 من المحاولات
قم باستدعاء فقرتين بالتسلسل، أولاً بيانات التهيئة ثم بيانات العملية، داخل كتلة الإجراء الرئيسي.
إظهار التلميح
أدخل جملتي PERFORM بترتيب تسلسلي في العمود 12.
الحل متاح بعد 3 من المحاولات