+/*$,;():=.]"> ]> PIC PICTURE ACCEPT ADD ALTER CALL COMPUTE DELETE DISPLAY DIVIDE END-ACCEPT END-ADD END-CALL END-COMPUTE END-DELETE END-DISPLAY END-DIVIDE END-EVALUATE END-IF END-MULTIPLY END-PERFORM END-READ END-RECEIVE END-RETURN END-REWRITE END-SEARCH END-START END-STRING END-SUBTRACT END-UNSTRING END-WRITE EVALUATE IF MULTIPLY PERFORM READ RECEIVE RETURN REWRITE SEARCH START STRING SUBTRACT UNSTRING WRITE ASSIGN CHAIN CLOSE CONTINUE CONTROL COPY COUNT ELSE ENABLE ERASE EXIT GENERATE GO GOBACK IGNORE INITIALIZE INITIATE INSPECT INVOKE MERGE MOVE OPEN RELEASE REPLACE RESERVE RESET REWIND ROLLBACK RUN SELECT SEND SET SORT STOP SUM SUPPRESS TERMINATE THEN TRANSFORM UNLOCK UPDATE USE WAIT WHEN BINARY BINARY-C-LONG BINARY-CHAR BINARY-DOUBLE BINARY-LONG BINARY-SHORT COMP COMP-1 COMP-2 COMP-3 COMP-4 COMP-5 COMP-X COMPUTATIONAL COMPUTATIONAL-1 COMPUTATIONAL-2 COMPUTATIONAL-3 COMPUTATIONAL-4 COMPUTATIONAL-5 COMPUTATIONAL-X FLOAT-BINARY-16 FLOAT-BINARY-34 FLOAT-BINARY-7 FLOAT-DECIMAL-16 FLOAT-DECIMAL-34 FLOAT-EXTENDED FLOAT-LONG FLOAT-SHORT FUNCTION-POINTER INDEX NATIONAL PACKED-DECIMAL POINTER PROCEDURE-POINTER PROGRAM-POINTER SIGNED SIGNED-INT SIGNED-LONG SIGNED-SHORT UNSIGNED UNSIGNED-INT UNSIGNED-LONG UNSIGNED-SHORT CD COMMUNICATION CONFIGURATION DATA DECLARATIVES DIVISION ENVIRONMENT FD FILE FILE-CONTROL I-O I-O-CONTROL ID IDENTIFICATION INPUT INPUT-OUTPUT LINKAGE LOCAL-STORAGE OUTPUT PROCEDURE PROGRAM RD REPORT REPOSITORY SD SECTION SPECIAL-NAMES WORKING-STORAGE PROGRAM-ID FUNCTION-ID CLASS-ID INTERFACE-ID METHOD-ID FACTORY OBJECT AND EQUAL EQUALS GREATER LESS OR THAN HIGH-VALUEHIGH-VALUES LOW-VALUE LOW-VALUES NULL NULLS QUOTE QUOTES SPACE SPACES ZERO ZEROES ZEROS ACCESS ACTIVE-CLASS ADDRESS ADVANCING AFTER ALIGNED ALL ALLOCATE ALPHABET ALPHABETIC ALPHABETIC-LOWER ALPHABETIC-UPPER ALPHANUMERIC ALPHANUMERIC-EDITED ALSO ALTERNATE ANY ANYCASE ARE AREA AREAS ARGUMENT-NUMBER ARGUMENT-VALUE ARITHMETIC AS ASCENDING AT ATTRIBUTE AUTO AUTO-SKIP AUTOMATIC AUTOTERMINATE B-AND B-NOT B-OR B-XOR BACKGROUND-COLOR BASED BEEP BEFORE BELL BIT BLANK BLINK BLOCK BOOLEAN BOTTOM BY BYTE-LENGTH CANCEL CENTER CF CH CHAINING CHARACTER CHARACTERS CLASS CLASSIFICATION CODE CODE-SET COL COLLATING COLS COLUMN COLUMNS COMMA COMMAND-LINE COMMIT COMMON CONDITION CONSTANT CONTAINS CONTENT CONTROLS CONVERTING CORR CORRESPONDING CRT CURRENCY CURSOR CYCLE DATA-POINTER DATE DAY DAY-OF-WEEK DE DEBUGGING DECIMAL-POINT DEFAULT DELIMITED DELIMITER DEPENDING DESCENDING DESTINATION DETAIL DISABLE DISK DOWN DUPLICATES DYNAMIC EBCDIC EC EGI EMI END END-OF-PAGE ENTRY ENTRY-CONVENTION ENVIRONMENT-NAME ENVIRONMENT-VALUE EO EOL EOP EOS ERROR ESCAPE ESI EXCEPTION EXCEPTION-OBJECT EXCLUSIVE EXPANDS EXTEND EXTERNAL FALSE FILE-ID FILLER FINAL FIRST FOOTING FOR FOREGROUND-COLOR FOREVER FORMAT FREE FROM FULL GET GIVING GLOBAL GROUP GROUP-USAGE HEADING HIGH-VALUE HIGH-VALUES HIGHLIGHT IGNORING IMPLEMENTS IN INDEXED INDICATE INFINITY INHERITS INITIAL INITIALIZED INTERFACE INTO INTRINSIC INVALID IS JUST JUSTIFIED KEY LABEL LAST LC_ALL LC_COLLATE LC_CTYPE LC_MESSAGES LC_MONETARY LC_NUMERIC LC_TIME LEADING LEFT LENGTH LIMIT LIMITS LINAGE LINAGE-COUNTER LINE LINE-COUNTER LINES LOCALE LOCK LOWLIGHT MANUAL MEMORY MESSAGE METHOD MINUS MODE MULTIPLE NATIONAL-EDITED NATIVE NEGATIVE NESTED NEXT NO NONE NORMAL NOT NUMBER NUMBERS NUMERIC NUMERIC-EDITED OBJECT-COMPUTER OBJECT-REFERENCE OCCURS OF OFF OMITTED ON ONLY OPTIONAL OPTIONS ORDER ORGANIZATION OTHER OVERFLOW OVERLINE OVERRIDE PADDING PAGE PAGE-COUNTER PARAGRAPH PF PH PLUS POSITION POSITIVE PRESENT PREVIOUS PRINTER PRINTING PROCEDURES PROCEED PROMPT PROPERTY PROTOTYPE PURGE QUEUE RAISE RAISING RANDOM RECORD RECORDING RECORDS RECURSIVE REDEFINES REEL REFERENCE RELATION RELATIVE REMAINDER REMOVAL RENAMES REPLACING REPORTING REPORTS REQUIRED RESUME RETRY RETURNING REVERSE-VIDEO RF RH RIGHT ROUNDED SAME SCREEN SCROLL SECONDS SECURE SEGMENT SEGMENT-LIMIT SELF SENTENCE SEPARATE SEQUENCE SEQUENTIAL SHARING SIGN SIZE SORT-MERGE SOURCE SOURCE-COMPUTER SOURCES STANDARD STANDARD-1 STANDARD-2 STATEMENT STATUS STEP STRONG SUB-QUEUE-1 SUB-QUEUE-2 SUB-QUEUE-3 SUPER SYMBOL SYMBOLIC SYNC SYNCHRONIZED SYSTEM-DEFAULT TABLE TALLYING TAPE TERMINAL TEST TEXT THROUGH THRU TIME TIMES TO TOP TRAILING TRUE TYPE TYPEDEF UCS-4 UNDERLINE UNIT UNIVERSAL UNTIL UP UPON USAGE USER-DEFAULT USING UTF-16 UTF-8 VAL-STATUS VALID VALIDATE VALIDATE-STATUS VALUE VALUES VARYING WITH WORDS YYYYDDD YYYYMMDD ABS ACOS ANNUITY ASIN ATAN BYTE-LENGTH CHAR CONCATENATE COS CURRENT-DATE DATE-OF-INTEGER DATE-TO-YYYYMMDD DAY-OF-INTEGER DAY-TO-YYYYDDD E EXCEPTION-FILE EXCEPTION-LOCATION EXCEPTION-STATEMENT EXCEPTION-STATUS EXP EXP10 FACTORIAL FRACTION-PART INTEGER INTEGER-OF-DATE INTEGER-OF-DAY INTEGER-PART LENGTH LOCALE-DATE LOCALE-TIME LOG LOG10 LOWER-CASE MAX MEAN MEDIAN MIDRANGE MIN MOD NUMVAL NUMVAL-C ORD ORD-MAX ORD-MIN PI PRESENT-VALUE RANDOM RANGE REM REVERSE SECONDS-FROM-FORMATTED-TIME SECONDS-PAST-MIDNIGHT SIGN SIN SQRT STANDARD-DEVIATION STORED-CHAR-LENGTH SUBSTITUTE SUBSTITUTE-CASE TAN TEST-DATE-YYYYMMDD TEST-DAY-YYYYDDD TRIM UPPER-CASE VARIANCE WHEN-COMPILED YEAR-TO-YYYY