FILETYPE

Specifies the file format to use when creating files.

Syntax:

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

Parameters:

integer

An integer representing the type to use.

0	System-specific default (for this COBOL system, same as 3).
1	C-ISAM format.
2	Micro Focus Level II format.
3	Micro Focus COBOL format.
4	An optimized form of the format used by this COBOL system, for fast duplicate key handling.
5	Reserved
6	Reserved
7	Reserved.
8	Large indexed files.
9-10	Reserved.
11	Mainframe print file format.
12-255	Reserved.

Properties:

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

Dependencies:

FILETYPE"integer" sets IDXFORMAT"integer" immediately.

Comments:

This directive only works on files processed by the Micro Focus File Handler. Use the CALLFH directive if you are processing files other than indexed files.

To produce print files in the style of an IBM mainframe using FILETYPE"11", you must also:

Set the directive OSVS or VCS2
Use WRITE AFTER ADVANCING syntax
Set the CALLFH directive (so your program uses the Micro Focus File Handler)
Use a SELECT statement in the form:
```
select printfile assign "print" organization is sequential.
```
(Print files in the style of an IBM mainframe have a print control character in the first column.)