دروس الوحدة (1/2)
عناصر المجموعة والسجلات
في لغة COBOL، يمكن تجميع المتغيرات الأولية معًا في بنية هرمية تسمى عنصر المجموعة أو السجل. يتيح لك هذا التعامل مع مجموعة من البيانات المرتبطة إما ككيان واحد (على سبيل المثال، لنسخها أو عرضها) أو كحقول فردية.
أرقام المستوى والعلاقات الهرمية
لتحديد سجل، يمكنك استخدام أرقام المستويات في DATA DIVISION:
- المستوى
01: يحدد السجل الرئيسي (اسم المجموعة). ليس لديه جملةPICTUREخاصة به لأن حجمه يتم تحديده من خلال مجموع حقوله الداخلية. - المستويات الثانوية (
05،10،15، إلخ.): حدد الحقول الثانوية التي تنتمي إلى مجموعة المستوى الأعلى. يمكن أن تكون متغيرات أولية (مع جملةPIC) أو، بدورها، عناصر مجموعة أخرى (سجلات فرعية).
01 WS-EMPLOYEE-RECORD.
05 WS-EMP-ID PIC 9(5).
05 WS-EMP-NAME PIC X(20).
05 WS-EMP-SALARY PIC 9(6)V99.في هذا المثال، WS-EMPLOYEE-RECORD عبارة عن بنية مجموعة تحتوي على ثلاثة حقول ثانوية. إذا أشرنا إلى WS-EMPLOYEE-RECORD، فإننا نقرأ أو نكتب كل 5 + 20 + 8 = 33 حرفًا من السجل مرة واحدة.
بيان الحركة وعناصر المجموعة
يمكننا تعيين قيم للحقول الأولية الفردية:
MOVE 10023 TO WS-EMP-ID.
MOVE "JOHN DOE" TO WS-EMP-NAME.أو يمكننا نسخ سجل كامل إلى سجل آخر متوافق في عملية واحدة:
MOVE WS-EMPLOYEE-RECORD TO WS-EMPLOYEE-BACKUP.جربه بنفسك
قم بتعريف بنية المجموعة 01 المسماة WS-STUDENT-RECORD التي تحتوي على ثلاثة حقول فرعية من المستوى 05: WS-STUDENT-ID (رقمي مكون من 5 أرقام)، WS-STUDENT-NAME (أبجدي رقمي مكون من 15 حرفًا)، وWS-STUDENT-GPA (رقمي مكون من رقم صحيح واحد ورقمين عشريين).
إظهار التلميح
استخدم بناء الجملة: 01 WS-STUDENT-RECORD. (مع فترة وبدون الموافقة المسبقة عن علم)، يليها في الأسطر التالية المستوى 05 WS-STUDENT-ID PIC 9(5).، 05 WS-STUDENT-NAME PIC X(15). و05 WS-STUDENT-GPA PIC 9(1)V99.
الحل متاح بعد 3 من المحاولات
أكمل قسم الإجراء عن طريق نقل القيمة 10023 إلى WS-EMP-ID، والنص "JOHN DOE" إلى WS-EMP-NAME، وأخيرًا عرض بنية المجموعة WS-EMPLOYEE-RECORD باستخدام DISPLAY.
إظهار التلميح
استخدم نقل 10023 إلى WS-EMP-ID. وانقل "JOHN DOE" إلى WS-EMP-NAME. لتعيين القيم، ثم اكتب DISPLAY WS-EMPLOYEE-RECORD. وأخيرًا توقف عن التشغيل.
الحل متاح بعد 3 من المحاولات