گروپ آئٹمز اور ریکارڈز

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.

خود ہی آزمائیں۔