Function
Create a direct access file in filestore and/or pushes down the workfile stack.
Format
CREATE file description
The file description must either be a file name qualified by *DA or *DR, or a workfile name, optionallyl= qualified by *DA or *DR. If it is a workfile name, it must refer to the top of the workfile stack (! or !0).
If the file is direct access (that is, *DA or *DR) a size must be given in units of 1024 words (KWORDS number). If it is a disc file (*DA), further information may be given about the organisation of the file by means of the optional entrant description qualifiers in the table below.
| Entrant Description Qualifier | Default Setting |
| BUCKET digit | 4 |
| FIXED | variable length |
| HEADLEN digit | 2 |
| INTEGRITY digit | 3 |
| KEYLENGTH number | 0 |
| KEYPLACE number | 0 |
| ODDBITS digit | 0 |
| OFLOW number | 0 |
| RANDOM | sequential |
| RECORD number | bucket size |
| SERIAL | sequential |
The TRAPGO entrant description qualifier can be used to permit a user or group of users access, in the modes specified in the qualifier, to the file that is to be CREATEd.
Forbidden contexts
NO USER
Execution
If the file description begins with '!', the workfile stack is
pushed down, but, unless a direct access file is specified, no file is
set up until a command such as
ASSIGN *LP0,!
is issued.
If a direct access file is specified (that is, *DA or *DR), a file of the specified length (and so on) is created when the CREATE command is given.
Examples
CREATE !
CREATE !0(*DA,BUCK8,KWOR245)
CREATE :Z.B(*DA,KWOR40,INTE2)
CREATE FRED(*DR,KWORDS32)
Error Messages
NO FILE SIZE SPECIFIED
z IS NEITHER A DIRECT ACCESS NOR A WORKFILE
A WORKFILE MUST BE CREATED AT THE TOP OF THE STACK