IDXFORMAT

Syntax:

>>-.---.--IDXFORMAT--"integer"-------------><
   +-/-+

Parameters:

integer
An integer representing the type to use.
0
System-specific default (for this COBOL system, ).
1
C-ISAM format.
2
Micro Focus Level II format.
3
Micro Focus indexed file format.
4
An optimized form of Micro Focus indexed file format, for fast duplicate key handling.
5
6
7
RLIO format indexed files.
8
Large indexed.
9
Indexed with single key, non-duplicate, key ordered records.
10
Reserved.
11
Mainframe print file format.
12-13
Reserved.
14
Heap file.
15
ESDS
16-255
Reserved.

Properties:

Default: IDXFORMAT"0"
Phase: Syntax check
$SET: Any

Dependencies:

Set to IDXFORMAT"integer" immediately by FILETYPE"integer".

Comments:

Existing files in any of the given formats are processed correctly without the need for this directive. This directive controls the format used when creating new files.

Specifying always causes the format used by this COBOL system to be created; if you specify 0, and you are using your program with a file handler from a different system, the default for that system is created.

Specifying 4 might make the files larger than their IDXFORMAT"3" equivalents.

Micro Focus Level II format files are compatible with Micro Focus products such as Level II COBOL, Professional COBOL V1.2, and VS COBOL Workbench versions up to and including V1.3.

You must not use the ANS85 directive to enable ANSI'85 behavior when using IDXFORMAT"2". However, you can use ANS85"SYNTAX" to enable ANSI'85 syntax.