Getting Started with TRANSACT (32247-90007)

Chapter 9 167
Creating Custom Applications
Adding, Deleting, and Changing Elements
Figure 9-21. Creating the Database with DICTDBC (Continued)
SETS:
NAME: CUSTOMER, MANUAL ;
ENTRY: CUST-NO (1),
NAME,
STREET-ADDR,
CITY-STATE,
AREA;
CAPACITY: 100;
NAME: PARTS, MANUAL ;
ENTRY: PART-NUMBER (2),
DESCRIPTION;
CAPACITY: 100;
NAME: ORDER, AUTOMATIC ;
ENTRY: ORDER-NO (2);
CAPACITY: 100;
NAME: INVENTORY, DETAIL ;
ENTRY: PART-NUMBER ( PARTS ),
LOCATION,
QUANTITY;
CAPACITY: 100;
NAME: ORDERHEAD, DETAIL ;
ENTRY: ORDER-NO ( ORDER ),
CUST-NO ( CUSTOMER ),
ORDER-STATUS,
ORDER-DATE;
CAPACITY: 100;
NAME: ORDERLINE, DETAIL ;
ENTRY: ORDER-NO ( ORDER )
LINE-NO,
PART-NUMBER ( PARTS ),
QUANTITY;
CAPACITY: 100;
END.
DATA SET TYPE FLD PT ENTR MED CAPACITY BLK BLK DISC
NAME CNT CT LGTH REC FAC LGTH SPACE
CUSTOMER M 5 1 36 46 100 11 507 44
PARTS M 2 2 14 29 100 13 378 27
ORDER A 1 2 4 19 100 20 382 18
INVENTORY D 3 1 8 12 120 40 483 16
ORDERHEAD D 4 2 11 19 100 20 382 18
ORDERLINE D 4 2 11 19 100 20 382 18
TOTAL DISC SECTORS INCLUDING ROOT: 152
NUMBER OF ERROR MESSAGES: 0
ITEM NAME COUNT: 13 DATA SET COUNT: 6
ROOT LENGTH: 587 BUFFER LENGTH: 507 TRAILER LENGTH: 256
ROOT FILE ORDERS CREATED.
END OF PROGRAM
: