Schema DDL Reference section
238 U929-J-Z125-9-76
9.1.3 Record entry
RECORD NAME IS record-name
IN ⎫⎫
⎧DIRECT ⎫ item-name- 1 record-name
⎨ ⎬ ⎨ OF ⎬
⎩DIRECT-LONG ⎭  
[LOCATION MODE IS identifier-1 ⎭⎬]
CALC[ hash-rou tine] USING item-name-2,...
DUPLICATES ARE[ NOT] ALLOWED
WITHIN realm-name-1[,realm-name-2,... AREA-ID IS identifier-2]
CALC[ hash-routine]
[SEARCH KEY IS item-name-3,...USING [ NAME IS name]
INDEX
DUPLICATES ARE[ NOT] ALLOWED]....
{[level-number ]record-element-name
mask-string
PICTURE IS
LX(integer-1) DEPENDING ON item-name-4
15 ⎫
BINARY[ ] 
FIXED REAL 31 
[ ⎬]
DECIMAL[ integer-2[,integer-3]] 
TYPE IS ⎬
CHARACTER[ integer-4[ DEPENDING ON item-name-5]]

DATABASE-KEY 

DATABASE-KEY-LONG ⎭⎭
[OCCURS integer-5 TIMES].}...
The record entry is used to assign a name to a record type. At the sa me time, it can be used
to define:
the allocation of records to realms,
the sequence of records for sequential processing,
additional access paths for direct access via pr imary and secondary keys,
all record elements to be included in the record type.