Data Definition Language (DDL) Reference Manual (G06.24+)

DDL Compiler Commands
Data Definition Language (DDL) Reference Manual—426798-002
9-68
FUP Command
FUP Command Example
The following example illustrates an interactive session in which FUP source code is
generated from a record in the dictionary.
FUPSRC will contain the following FUP source code:
< SECTION CUSTOMER
RESET
SET ALTKEY ( "cn", KEYOFF 4, KEYLEN 22, FILE 0 )
SET NO ALTCREATE
SET ALTFILE ( 0, $data.sales.custome0 )
SET TYPE K
SET KEYLEN 4
SET REC 69
SET BLOCK 4096
SET IBLOCK 4096
SET AUDIT
SET MAXEXTENTS 100
SET EXT( 4, 32 )
CREATE $data.sales.customer
RESET
SET TYPE K
SET KEYLEN 28
SET REC 28
SET BLOCK 4096
SET IBLOCK 4096
SET EXT( 4, 32 )
SET AUDIT
SET MAXEXTENTS 100
CREATE $data.sales.custome0
To create the file CUSTOMER and its alternate key file CUSTOME0, enter the
following command:
35> FUP/IN fupsrc/
34> DDL DICT
!?FUP fupsrc !
!OUTPUT RECORD customer.
?NOFUP
!EXIT
Run DDL and open dictionary
Open FUPSRC; if file exists, purge existing data
Get record from dictionary, write FUP file-
creation commands to FUPSRC
Close FUPSRC
Exit from DDL
VST917.vsd