The Four Divisions Explained

Every COBOL program must contain exactly four divisions in a fixed order: IDENTIFICATION DIVISION, ENVIRONMENT DIVISION, DATA DIVISION, and PROCEDURE DIVISION. Each division answers a different question: IDENTIFICATION says what the program is, ENVIRONMENT says where it runs and what external resources (like files) it uses, DATA says what data it works with, and PROCEDURE says what it actually does step by step. This separation of concerns, decades before the term became fashionable in software engineering, is what lets a COBOL maintainer jump straight to the DATA DIVISION to check a field's size without wading through business logic.

The IDENTIFICATION DIVISION is the mandatory first division and, at minimum, requires a PROGRAM-ID paragraph naming the program, for example PROGRAM-ID. PAYROLL-CALC. Older COBOL standards also allowed optional documentation paragraphs like AUTHOR, DATE-WRITTEN, and INSTALLATION, though these were deprecated starting with COBOL 2002 and modern compilers like GnuCOBOL now typically ignore or warn on them. The PROGRAM-ID value matters functionally, not just cosmetically: it becomes the compiled module's external name, which is how other programs reference it in a CALL statement.

The ENVIRONMENT DIVISION, though optional in many modern programs that don't use files, traditionally contains two sections: CONFIGURATION SECTION, which can specify the source and object computer, and INPUT-OUTPUT SECTION, which contains FILE-CONTROL paragraphs mapping logical file names used in the program to physical files or datasets on disk, using the SELECT ... ASSIGN TO clause. For example, SELECT CUSTOMER-FILE ASSIGN TO "CUSTDATA.DAT" links the internal name CUSTOMER-FILE to an actual file path, and this indirection is what lets the same COBOL program run against different physical file locations on different systems without changing the PROCEDURE DIVISION logic.

The DATA DIVISION declares every piece of data the program will use, most commonly within the WORKING-STORAGE SECTION for program variables and the FILE SECTION for record layouts tied to files declared in ENVIRONMENT DIVISION; each item is defined with a level number (01 for a group, 05/10/etc. for subordinate fields) and a PIC clause. The PROCEDURE DIVISION contains the actual executable logic, written as paragraphs of sentences using verbs like MOVE, ADD, SUBTRACT, IF, PERFORM, READ, WRITE, and STOP RUN, and it is the only division where business rules are expressed; DATA DIVISION describes the nouns of the program while PROCEDURE DIVISION describes the verbs.