Data Definition Language (DDL) Reference Manual

DDL Compiler Commands
Data Definition Language (DDL) Reference Manual—529431-004
9-76
NEWFUP_FILEFORMAT
Example 9-37. NEWFUP_FILEFORMAT Command (page 1 of 2)
20> DDL
?DICT
?NEWFUP_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.
?NEWFUP_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.
Definition EMP size is 30 bytes.
Definition EMP added to dictionary.
!?FUP
< SCHEMA PRODUCED DATE - TIME : 3/02/2000 17:59:53
Output source for FUP is opened on $ZTNT.#PTVWAT5
!RECORD EMPL.
!FILE IS EMPLOYEE.
!DEF IS EMP.
!KEY IS EMPL.EMP-ID.
!KEY "MN" IS EMPL.EMP-NAME.
!END.
Record EMPL size is 30 bytes.
Record EMPL added to dictionary.