الانتقال إلى المحتوى الرئيسي
الوحدة 1 · الدرس 2 من 22/10 في الدورة~12 min
دروس الوحدة (2/2)

المتغيرات والصورة

في COBOL، يجب الإعلان عن جميع المتغيرات المستخدمة داخل DATA DIVISION. على وجه التحديد، توجد المتغيرات المؤقتة في الذاكرة المستخدمة لمنطق البرنامج داخل ** قسم تخزين العمل **.

أرقام المستوى

يستخدم تعريف متغير COBOL أرقام المستويات لتنظيم البيانات وتنظيمها بشكل هرمي:

  • 01: تعريف متغير رئيسي أو عنصر مجموعة (المستوى الأعلى).
  • 05، 10، 15: تعريف الحقول الثانوية ضمن مستوى 01 عنصر المجموعة.
  • 77: المتغيرات الأولية المستقلة المشار إليها تاريخيًا والتي لا يمكن تقسيمها بشكل أكبر.

في الممارسة الحديثة، يُستخدم المستوى 01 بشكل شائع للإعلان عن المتغيرات الأولية المستقلة.

بند الصورة (أو الموافقة المسبقة عن علم).

تحدد جملة PICTURE (المختصرة PIC) نوع البيانات وطول حرف المتغير. أحرف التنسيق الأساسية الثلاثة هي:

  1. X (أبجدي رقمي): يمكن أن يحتوي على أحرف وأرقام وأحرف خاصة.
    • PIC X(10) يعلن عن سلسلة مكونة من 10 أحرف بالضبط.
  2. 9 (رقمي): يمكن أن يحتوي على أرقام رقمية فقط.
    • PIC 9(3) يعلن عن عدد صحيح مكون من 3 أرقام (حتى 999).
  3. V (الفاصلة العشرية الضمنية): تستخدم في الأرقام العشرية لتمثيل المكان الذي يبدأ فيه الجزء الكسري (لا يتم تخزين العلامة العشرية فعليًا).
    • PIC 9(3)V99 يعلن عن رقم مكون من 3 أرقام صحيحة ومنزلتين عشريتين.

بند القيمة

لتعيين قيمة أولية لمتغير في وقت الإعلان، استخدم جملة VALUE.

COBOL
01 WS-PROJECT-NAME PIC X(15) VALUE "ELEARNER".
01 WS-USER-AGE     PIC 9(3)  VALUE 25.

يجب أن تنتهي كافة تعريفات المتغيرات بفترة ..


جربه بنفسك

تمرين#cobol.m1.l2.e1
المحاولات: 0جارٍ التحميل…

قم بتعريف متغير أبجدي رقمي من المستوى 01 يسمى WS-USER-NAME بطول 20 حرفًا وقم بتعيين قيمته الأولية على "ALICE".

جارٍ تحميل المحرر…
إظهار التلميح

استخدم التنسيق: 01 WS-USER-NAME PIC X(20) VALUE 'ALICE'.

الحل متاح بعد 3 من المحاولات

تمرين#cobol.m1.l2.e2
المحاولات: 0جارٍ التحميل…

قم بتعريف متغير رقمي من المستوى 01 يسمى WS-USER-AGE مكون من 3 أرقام بقيمة أولية تبلغ 25.

جارٍ تحميل المحرر…
إظهار التلميح

استخدم بناء الجملة: 01 WS-USER-AGE PIC 9(3) VALUE 25.

الحل متاح بعد 3 من المحاولات