The OBJECT-COMPUTER paragraph specifies the system for which the object program is designated.
Format >>-OBJECT-COMPUTER.---------------------------------------------> >--+------------------------------------------------------------------------------+->< '-computer-name--+-------------------------------------------+--| entry 1 |--.-' '-MEMORY--+------+--integer--+-WORDS------+-' '-SIZE-' +-CHARACTERS-+ '-MODULES----' entry 1 |--+-------------------------------------------------------------+--> '-+---------+--+-----------+--SEQUENCE--+----+--alphabet-name-' '-PROGRAM-' '-COLLATING-' '-IS-' >--+----------------------------------------+-------------------| '-SEGMENT-LIMIT--+----+--priority-number-' '-IS-'
IBM-system
The collating sequence pertains to this program and to any programs that this program might contain.
The PROGRAM COLLATING SEQUENCE clause also applies to any merge or sort keys described with usage DISPLAY, unless the COLLATING SEQUENCE phrase is specified in the MERGE or SORT statement.
The PROGRAM COLLATING SEQUENCE clause does not apply to data items of usage NATIONAL.
You cannot specify the PROGRAM COLLATING SEQUENCE clause if the source code page is a multibyte code page.
If the PROGRAM COLLATING SEQUENCE clause is omitted, the COLLSEQ compiler option indicates the collating sequence used. For example, if COLLSEQ(EBCDIC) is specified and the PROGRAM COLLATING SEQUENCE clause is not specified (or is NATIVE), the EBCDIC collating sequence is used.
All of the OBJECT-COMPUTER paragraph is syntax checked, but only the PROGRAM COLLATING SEQUENCE clause has an effect on the execution of the program.