Master Mainframe Technologies - COBOL, JCL, DB2, VSAM, CICS & More
ABEND Codes SQLCODEs File Status Interview Prep Contact
← Back to Conditional Logic
Conditional Logic | Beginner | COBOL

IF-ELSE-END-IF

Problem Description

Demonstrate nested IF statements and ELSE clause.

Expected Output

Proper conditional branching

Hints

IF can be nested. Always use END-IF for clarity.

Solution

IDENTIFICATION DIVISION. PROGRAM-ID. IFELSE. DATA DIVISION. WORKING-STORAGE SECTION. 01 WS-AGE PIC 9(3). 01 WS-CATEGORY PIC X(15). PROCEDURE DIVISION. DISPLAY "ENTER AGE: ". ACCEPT WS-AGE. IF WS-AGE < 0 DISPLAY "INVALID AGE" ELSE IF WS-AGE < 13 MOVE "CHILD" TO WS-CATEGORY ELSE IF WS-AGE < 20 MOVE "TEENAGER" TO WS-CATEGORY ELSE IF WS-AGE < 60 MOVE "ADULT" TO WS-CATEGORY ELSE MOVE "SENIOR" TO WS-CATEGORY END-IF END-IF END-IF DISPLAY "CATEGORY: " WS-CATEGORY END-IF. STOP RUN.

Explanation:

Nested IF-ELSE with END-IF. Each IF should have matching END-IF.