IBM OS/390 User Manual

ALPHABET

END-COMPUTE

FALSE

OVERRIDE

ALPHABETIC-LOWER

END-DELETE

FUNCTION

PACKED-DECIMAL

ALPHABETIC-UPPER

END-DIVIDE

GLOBAL

PADDING

ALPHANUMERIC

END-EVALUATE

INHERITS

PROCEDURE-POINTER

ALPHANUMERIC-EDITED

END-IF

INITIALIZE

RECURSIVE

ANY

END-INVOKE

INVOKE

REFERENCE

BINARY

END-MULTIPLY

KANJI

REPLACE

CANCEL

END-PERFORM

LENGTH

REPOSITORY

CLASS

END-READ

LINAGE-COUNTER

RETURNING

CLASS-ID

END-RETURN

LOCAL-STORAGE

SELF

COMMON

END-REWRITE

METACLASS

SHIFT-IN

CONTENT

END-SEARCH

METHOD

SHIFT-OUT

CONTINUE

END-START

METHOD-ID

SORT-CONTROL

CONVERTING

END-STRING

NULL

SORT-MESSAGE

DAY-OF-WEEK

END-SUBTRACT

NULLS

STANDARD-2

DBCS

END-UNSTRING NUMERIC-EDITED SUM

DISPLAY-1

END-WRITE

OBJECT

SUPER

EGCS

EVALUATE

ORDER

TEST

END-ADD

EXTERNAL

OTHER

TRUE

END-CALL

Figure 22. Reserved Words i n COBOL for OS/390 and VM and not i n DOS/VS COBOL

Some words which are not reserved in DOS/VS COBOL are COBOL ANSI 85
standard reserved words for a feature not supported by COBOL for OS/390 and
VM. If used in a program, it is recognized as a reserved word and flagged with a
severe message. These words are listed in Figure 23.

If you used any of these words in your DOS/VS COBOL programs, you will need
to replace them.

CD

EMI

PRINTING

SUB-QUEUE-3

COMMUNICATION ENABLE PURGE

TABLE

DESTINATION

END-RECEIVE

QUEUE

TERMINAL

DISABLE

ESI

SUB-QUEUE-1

TEXT

EGI

MESSAGE

SUB-QUEUE-2

Figure 23. Reserved Words i n COBOL for OS/390 and VM for Unsupported Features

The words listed in Figure 24 are COBOL for OS/390 and VM compiler directing
words. If they are used as a user-defined word, they will be flagged with a
severe message.

If you used these words in your DOS/VS COBOL programs, you will need to
replace them.

CBL

TITLE

Figure 24. Compiler Directing Words i n COBOL for OS/390 and VM

VSE to OS/390 Migration Workbook