Data Definition Language (DDL) Reference Manual

DDL Compiler Commands
Data Definition Language (DDL) Reference Manual—529431-004
9-80
OLDFUP_FILEFORMAT
OLDFUP_FILEFORMAT, NEWFUP_FILEFORMAT, or NOFILEFORMAT command)
and stores the records in the dictionary, the user must use the same commands while
requesting FUP output of those records.
The format specification for both the alternate key and the main file is the same (format
1 in this case).
The DDL compiler does not allow the user to define a record length greater than the
maximum allowed length. For format 1 files, the maximum allowed record length
(assuming the block size is 4096 bytes) is.
If you attempt to define a record size greater than the above specified record sizes the
DDL compiler issues an error message.
In Example 9-39 on page 9-80, the DDL compiler generates a statement in FUP
source code files to create a format 1 file.
File type Record size (format 1 file)
Unstructured 4096 bytes
Entry-sequenced 4072 bytes
Relative 4072 bytes
Key-Sequenced 4062 bytes
Example 9-39. OLDFUP_FILEFORMAT Command (page1of2)
20> DDL
?DICT
?OLDFUP_FILEFORMAT
DEF EMP.
02 EMP-NAME PIC X(20).
02 EMP-ID PIC 9(4) COMP.
02 EMP-SALARY PIC 9(6)V9(2).
END.
?FUP
RECORD EMPL.
FILE IS "EMPLOYEE".
DEF IS EMP.
KEY IS EMPL.EMP-ID.
KEY "MN" IS EMPL.EMP-NAME.
END.
?DICT!
Audited dictionary created on subvol $ADE101.MANUAL.
Dictionary opened on subvol $ADE101.MANUAL for update access.
DEF EMP.
02 EMP-NAME PIC X(10).
02 EMP-ID PIC 9(6) COMP.
02 EMP-SALARY PIC 9(7)V9(2).
END.
Definition EMP size is 23 bytes.
Definition EMP added to dictionary.