https://DevOpsCloud.io -- Cloud Monk Losang Jinpa

Return to COBOL for the 21st Century, COBOL bibliography]], COBOL, COBOL DevOps]], Awesome [[COBOL, Awesome [[IBM Mainframe, IBM Mainframe development]], IBM Mainframe bibliography]], Fortran

" ([[Cbl21stC]] [[2006]])

VI. APPENDIXES

A. COBOL Character Set and Reserved Words

Appendix A. COBOL Character Set and Reserved Words

See the COBOL Syntax Reference Guide that accompanies this book for full Instruction Formats.

COBOL CHARACTERS The following lists are in ascending order:

EBCDIC

ASCII

.

<

(

+

$

)

;

-

/

,

'

=

“

a–z

A–Z

0–9

space

period, decimal point

less than

left parenthesis

plus symbol

dollar sign

asterisk, multiplication

right parenthesis

semicolon

hyphen, minus sign

slash, division

comma

greater than

single quotation mark

equal sign

quotation mark

lowercase letters

uppercase letters

digits

”

$

'

(

)

+

,

-

.

/

0–9

;

<

=

A–Z

a–z

space

quotation mark

dollar sign

single quotation mark

left parenthesis

right parenthesis

asterisk, multiplication

plus symbol

comma

hyphen, minus sign

period, decimal point

slash, division

digits

semicolon

less than

equal sign

greater than

uppercase letters

lowercase letters

COBOL RESERVED WORDS Each COBOL compiler has a list of reserved words that:

Includes all entries in the ANS COBOL standard.

Includes additional entries not part of the standard but that are either VAX or IBM compiler extensions. These are called enhancements.

You may find that your computer has additional reserved words. Diagnostic messages will print if you are using a reserved word incorrectly.

Reserved words that are not relevant for COBOL 74 are denoted with a single asterisk (*). COBOL 74 reserved words that are not reserved in the new standard are denoted with a double asterisk (**). Words marked with a (V) are VAX COBOL 85 extensions. Words marked with an (I) are IBM COBOL 85 extensions.

ACCEPT

ACCESS

ACTUAL (I)

ADD

ADVANCING

AFTER

ALL

ALLOWING (V)

ALPHABET

ALPHABETIC

ALPHABETIC-LOWER

ALPHABETIC-UPPER

ALPHANUMERIC

ALPHANUMERIC-EDITED *

ALSO

ALTER

ALTERNATE

AND

ANY *

APPLY (V)

ARE

AREA

AREAS

ASCENDING

ASSIGN

AT

AUTHOR

AUTOTERMINATE (V)

BASIS (I)

BATCH (V)

BEFORE

BEGINNING (V)/(I)

BELL (V)

BINARY

BIT (V)/(I)

BITS (V)/(I)

BLANK

BLINKING (V)

BLOCK

BOLD (V)

BOOLEAN (V)/(I)

BOTTOM

BY

CALL

CANCEL

CBL (I)

CD

CF

CH

CHARACTER

CHARACTERS

CLASS

CLOCK-UNITS

CLOSE

COBOL

CODE

CODE-SET

COLLATING

COLUMN

COM-REG (I)

COMMA

COMMIT (V)/(I)

COMMON (V)

COMMUNICATION

COMP

COMP-1 (V)/(I)

COMP-2 (V)/(I)

COMP-3 (V)/(I)

COMP-4 (V)/(I)

COMP-5 (V)

COMP-6 (V)

COMPUTATIONAL

COMPUTATIONAL-1 (V)/(I)

COMPUTATIONAL-2 (V)/(I)

COMPUTATIONAL-3 (V)/(I)

COMPUTATIONAL-4 (V)/(I)

COMPUTATIONAL-5 (V)

COMPUTATIONAL-6 (V)

COMPUTE

CONCURRENT (V)

CONFIGURATION

CONNECT (V)/(I)

CONSOLE (I)

CONTAIN (V)

CONTAINS

CONTENT *

CONTINUE *

CONTROL

CONTROLS

CONVERSION (V)

CONVERTING *

COPY

CORE-INDEX (I)

CORR

CORRESPONDING

COUNT

CURRENCY

CURRENT (V)

CURRENT-DATE (I)

DATA

DATE

DATE-COMPILED

DATE-WRITTEN

DAY

DAY-OF-WEEK

DB (V)

DB-ACCESS-CONTROL-KEY (V)

DB-CONDITION (V)

DB-CURRENT-RECORD-ID (V)

DB-CURRENT-RECORD-NAME (V)

DB-EXCEPTION (V)

DBKEY (V)

DB-KEY (V)

DB-RECORD-NAME (V)

DB-SET-NAME (V)

DB-STATUS (V)

DEBUG-SUB (V)

DB-UWA (V)

DE

DEBUG-CONTENTS

DEBUG-ITEM

DEBUG-LENGTH (V)

DEBUG-LINE

DEBUG-NAME

DEBUG-NUMERIC-CONTENTS (V)

DEBUG-SIZE (V)

DEBUG-START (V)

DEBUG-SUB (V)

DEBUG-SUB-1

DEBUG-SUB-2

DEBUG-SUB-3

DEBUG-SUB-ITEM (V)

DEBUG-SUB-N (V)

DEBUG-SUM-NUM (V)

DEBUGGING

DECIMAL-POINT

DECLARATIVES

DEFAULT

DELETE

DELIMITED

DELIMITER

DEPENDING

DESCENDING

DESCRIPTOR (V)

DESTINATION

DETAIL

DICTIONARY (V)

DISABLE

DISCONNECT

DISP (I)

DISPLAY

DISPLAY-1 (I)

DISPLAY-6 (V)

DISPLAY-7 (V)

DISPLAY-9 (V)

DIVIDE

DIVISION

DOES (V)

DOWN

DUPLICATE

DUPLICATES

DYNAMIC

ECHO (V)

EGCS (I)

EGI

EJECT (I)

ELSE

EMI

EMPTY

ENABLE

END

END-ACCEPT (V)

END-ADD

END-CALL

END-COMMIT (V)

END-COMPUTE

END-CONNECT (V)

END-DELETE

END-DISCONNECT (V)

END-DIVIDE

END-ERASE (V)

END-EVALUATE

END-FETCH (V)

END-FIND (V)

END-FINISH (V)

END-FREE (V)

END-GET (V)

END-IF

ENDING (V)/(I)

END-KEEP (V)

END-MODIFY (V)

END-MULTIPLY *

END-OF-PAGE

END-PERFORM

END-READ

END-READY (V)

END-RECEIVE *

END-RECONNECT (V)

END-RETURN

END-REWRITE

END-ROLLBACK (V)

END-SEARCH

END-START

END-STORE (V)

END-STRING

END-SUBTRACT *

END-UNSTRING

END-WRITE

ENTER

ENTRY (I)

ENVIRONMENT

EOP

EQUAL

EQUALS

ERASE

ERROR

ESI

EVALUATE

EVERY **

EXCEEDS (V)

EXCEPTION

EXCLUSIVE (V)

EXIT

EXOR (V)

EXTEND

EXTERNAL *

FAILURE (V)

FALSE *

FD

FETCH (V)

FILE

FILE-CONTROL

FILE-LIMIT (I)

FILE-LIMITS (I)

FILLER

FINAL

FIND (V)

FINISH (V)

FIRST

FOOTING

FOR

FREE (V)

FROM

GENERATE

GET (V)

GIVING

GLOBAL *

GO

GOBACK (I)

GREATER

GROUP

HEADING

HIGH-VALUE

HIGH-VALUES

ID (I)

IDENTIFICATION

IF

IN

INCLUDING (V)

INDEX

INDEXED

INDICATE

INITIAL

INITIALIZE *

INITIATE

INPUT

INPUT-OUTPUT

INSERT (I)

INSPECT

INSTALLATION

INTO

INVALID

I-O

I-O-CONTROL

IS

JUST

JUSTIFIED

KANJI (I)

KEEP (V)

KEY

LABEL

LAST

LD (V)

LEADING

LEAVE (I)

LEFT

LENGTH

LESS

LIMIT

LIMITS

LINAGE

LINAGE-COUNTER

LINE

LINE-COUNTER

LINES

LINKAGE

LOCALLY

LOCK

LOW-VALUE

LOW-VALUES

MATCH (V)

MATCHES (V)

MEMBER (V)

MEMBERSHIP (V)

MEMORY **

MERGE

MESSAGE

MODE

MODIFY

MODULES **

MORE-LABELS (I)

MOVE

MULTIPLE

MULTIPLY

NATIVE

NEGATIVE

NEXT

NO

NOMINAL (I)

NON-NULL (V)

NONE (I)

NOT

NOTE (I)

NULL (V)/(I)

NULLS (I)

NUMBER

NUMERIC

NUMERIC-EDITED

OBJECT-COMPUTER

OCCURS

OF

OFF

OFFSET (V)

OMITTED

ON

ONLY

OPEN

OPTIONAL

OR

ORDER

ORGANIZATION

OTHER *

OTHERS (V)

OUTPUT

OVERFLOW

OWNER (V)

PACKED-DECIMAL

PADDING *

PAGE

PAGE-COUNTER

PARAGRAPH (I)

PASSWORD (I)

PERFORM

PF

PH

PIC

PICTURE

PLUS

POINTER

POSITION

POSITIVE

PRESENT (I)

PRINTING

PRIOR

PROCEDURE

PROCEDURES

PROCEED

PROGRAM

PROGRAM-ID

PROTECTED

PURGE *

QUEUE

QUOTE

QUOTES

RANDOM

RD

READ

READERS (V)

READY (V)/(I)

REALM

REALMS (V)

RECEIVE

RECONNECT

RECORD

RECORD-NAME

RECORD-OVERFLOW (I)

RECORDING (I)

RECORDS

REDEFINES

REEL

REFERENCE

REFERENCE-MODIFIER (V)

REFERENCES

REGARDLESS (V)

RELATIVE

RELEASE

RELOAD (I)

REMAINDER

REMOVAL

RENAMES

REPLACE *

REPLACING

REPORT

REPORTING

REPORTS

REREAD (I)

RERUN

RESERVE

RESET

RETAINING

RETRIEVAL

RETURN

RETURN-CODE (I)

REVERSED

REWIND

REWRITE

RF

RH

RIGHT

RMS-FILENAME (V)

RMS-STS (V)

RMS-STV (V)

ROLLBACK (V)

ROUNDED

RUN

SAME

SCREEN (V)

SD

SEARCH

SECTION

SECURITY

SEGMENT

SEGMENT-LIMIT

SELECT

SEND

SENTENCE

SEPARATE

SEQUENCE

SEQUENCE-NUMBER (V)

SEQUENTIAL

SERVICE (I)

SET

SETS (V)

SHIFT-IN (I)

SHIFT-OUT (I)

SIGN

SIZE

SKIP-1 (I)

SKIP-2 (I)

SKIP-3 (I)

SORT

SORT-CONTROL (I)

SORT-CORE-SIZE (I)

SORT-FILE-SIZE (I)

SORT-MERGE

SORT-MESSAGE (I)

SORT-MODE-SIZE (I)

SORT-RETURN (I)

SOURCE

SOURCE-COMPUTER

SPACE

SPACES

SPECIAL-NAMES

STANDARD

STANDARD-1

STANDARD-2 *

START

STATUS

STOP

STORE

STRING

SUB-QUEUE-1

SUB-QUEUE-2

SUB-QUEUE-3

SUB-SCHEMA

SUBTRACT

SUCCESS (V)

SUM

SUPPRESS

SYMBOLIC

SYNC

SYNCHRONIZED

TABLE

TALLY (I)

TALLYING

TAPE

TENANT

TERMINAL

TERMINATE

TEST

TEXT

THAN

THEN *

THROUGH

THRU

TIME

TIME-OF-DAY (I)

TIMES

TITLE (I)

TO

TOP

TRAILING

TRUE *

TYPE

UNDERLINED (V)

UNEQUAL

UNIT

UNLOCK (V)

UNSTRING

UNTIL

UP

UPDATE

UPDATERS (V)

UPON

USAGE

USAGE-MODE (V)

USE

USING

VALUE

VALUES

VARYING

WAIT

WHEN

WHEN-COMPILED (I)

WHERE (V)

WITH

WITHIN

WORDS **

WORKING-STORAGE

WRITE

WRITE-ONLY (I)

WRITERS (V)

ZERO

ZEROES

ZEROS

+

-

/

**

<

=

= *

⇐

FUNCTION NAMES INCLUDED IN THE EXTENSIONS TO COBOL 85 The following is the list of function names included in the extensions to COBOL 85:

ABS

ACOS

ANNUITY

ASIN

ATAN

CHAR

CHAR-NATIONAL

COS

CURRENT-DATE

DATE-OF-INTEGER

DAY-OF-INTEGER

DISPLAY-OF

EXCEPTION-FILE

EXCEPTION-LOCATION

EXCEPTION-STATEMENT

EXCEPTION-STATUS

EXP

FACTORIAL

FRACTION-PART

INTEGER

INTEGER-OF-DATE

INTEGER-OF-DAY

INTEGER-PART

LENGTH

LENGTH-AN

LOG

LOG10

LOWER-CASE

MAX

MEAN

MEDIAN

MIDRANGE

MIN

MOD

NATIONAL-OF

NUMVAL

NUMVAL-C

ORD

ORD-MAX

ORD-MIN

PI

PRESENT-VALUE

RANDOM

RANGE

REM

REVERSE

SIGN

SIN

SQRT

STANDARD-DEVIATION

SUM

TAN

UPPER-CASE

VARIANCE

WHEN-COMPILED

COBOL RESERVED WORDS

NEW COBOL 2008 RESERVED WORDS The following is the list of reserved words already approved for the new standard:

ALIGN

B-AND

B-NOT

B-OR

B-XOR

CLASS-ID

CONFORMING

END-INVOKE

EXCEPTION-OBJECT

FACTORY

FUNCTION

INHERITS

INTERFACE

INTERFACE-ID

INVARIANT

INVOKE

METHOD

METHOD-ID

NATIONAL

NATIONAL-EDITED

OBJECT

OVERRIDE

PROPERTY

RAISE

REPOSITORY

RESERVED

RETURNING

REUSES

SELF

SUPER

SYSTEM-OBJECT

UNIVERSAL

COBOL RESERVED WORDS

Fair [[Use Sources]]:

• 1118739531 (Cbl21stC 2013, 2006)