HP 3000 Manuals

Environment Division [ COBOL/HP-UX Language Reference for the Series 700 and 800 ] MPE/iX 5.0 Documentation


COBOL/HP-UX Language Reference for the Series 700 and 800

Environment Division 

Switch-Names 

In addition to the switches 0 to 8 supported by COBOL, another form of
switch-name can be used.  It is an upper-case letter in the range A to Z.

These letters are mapped to switches 0 to 25, so at run time you should
use the appropriate digit on your command line and not the letter itself.

For example, to turn on switch J you would put:

     +9 filename 

after the run command.  You cannot, however, specify a run-time switch in
a CALL statement, as in:

     CALL "PROG.INT/A"

because this is not supported.

File-Name on Disk 

When you assign a file to disk, the file on disk is named in upper case
letters, regardless of whether the name you specify is in upper- or
lower-case letters.

The DATA SIZE Clause 

You can use the following clause in a SELECT statement:

     [ DATA SIZE IS integer]

It is treated as documentary.

The INDEX SIZE Clause 

You can use the following clause in a SELECT statement for a relative or
indexed file:

     [ INDEX SIZE IS integer]

It is treated as documentary.

Duplicate Alternate Keys 

If you specify the DG system directive when you submit your source files
to your COBOL system, you can have duplicate alternate keys in an indexed
file regardless of whether or not you have specified the DUPLICATES
phrase.

Alternate Keys 

If you specify the DG system directive when you submit your source files
to your COBOL system, alternate keys can occupy the same area as primary
keys.

I-O Control Paragraph 

If you specify the DG system directive when you submit your source files
to your COBOL system, the SAME AREA phrase is treated as equivalent to
the SAME RECORD AREA phrase.



MPE/iX 5.0 Documentation