IF اور EVALUATE کے ساتھ فیصلے

COBOL میں فیصلہ سازی بنیادی طور پر IF مشروط بیان اور ملٹی برانچ سلیکشن سٹرکچر EVALUATE (جدید زبانوں میں switch یا match کے مشابہ) کا استعمال کرتے ہوئے انجام دیا جاتا ہے۔

IF مشروط بیان

IF بیان کا بنیادی نحو ہے:

IF condition
    statements-if-true
ELSE
    statements-if-false
END-IF.

جدید COBOL ورژنز (COBOL-85 اور بعد میں) میں، بیان کو واضح طور پر END-IF. کے ساتھ ختم ہونا چاہیے بجائے اس کے کہ مکمل طور پر حتمی مدت . پر انحصار کیا جائے، جس سے تجزیہ اور منطق کی غلطیوں کو نمایاں طور پر کم کیا جائے۔

عام حالات

• اس سے بڑا: > یا GREATER THAN
• اس سے کم: < یا LESS THAN
• اس کے برابر: = یا EQUAL TO
• اس سے بڑا یا اس کے برابر: >= یا GREATER THAN OR EQUAL TO
• اس سے کم یا اس کے برابر: <= یا LESS THAN OR EQUAL TO

IF WS-BALANCE < 0
    DISPLAY "OVERDRAWN"
ELSE
    DISPLAY "ACCOUNT ACTIVE"
END-IF.

تشخیص کا بیان

جب ہمیں متعدد مجرد اقدار سے متغیر کا موازنہ کرنے کی ضرورت ہوتی ہے، تو نیسٹڈ IF بیانات پیچیدہ ہو سکتے ہیں۔ EVALUATE بیان انتخاب کو صاف ستھرا انداز میں ترتیب دے کر حل کرتا ہے:

EVALUATE WS-USER-ROLE
    WHEN "ADMIN"
        DISPLAY "FULL ACCESS"
    WHEN "EDITOR"
        DISPLAY "EDIT ACCESS"
    WHEN OTHER
        DISPLAY "LIMITED ACCESS"
END-EVALUATE.

• WHEN OTHER: فال بیک برانچ (default کے مساوی یا جدید زبانوں میں حتمی else) کی نشاندہی کرتا ہے۔
• END-EVALUATE.: ڈھانچہ بند کرتا ہے۔

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