IDENTIFICATION DIVISION. PROGRAM-ID. RESWORD. DATA DIVISION. WORKING-STORAGE SECTION. * FORMAT is reserved WORD in COBOL 2002 and not in COBOL 1985 ! 01 FORMAT PIC X(1) VALUE SPACE. PROCEDURE DIVISION. STOP RUN.