TurboIMAGE/XL Database Management System Reference Manual (30391-90012)

248 Chapter6
Host Language Access
Model Program
NAME: INVENTORY,DETAIL(12,14/13,18),DISC2; <<INVENTORY DETAIL>>
ENTRY: STOCK#(PRODUCT),
ONHANDQTY,
SUPPLIER(!SUP-MASTER), <<PRIMARY PATH>>
UNIT-COST,
LASTSHIPDATE(DATE-MASTER),
BINNUM;
CAPACITY: 1800, 450, 10%;
NAME: SALES,DETAIL(11/14,18),DISC2; <<SALES DETAIL>>
ENTRY: ACCOUNT(CUSTOMER(PURCH-DATE)),
STOCK#(PRODUCT),
QUANTITY,
PRICE,
TAX,
TOTAL,
PURCH-DATE(DATE-MASTER),
DELIV-DATE(DATE-MASTER);
CAPACITY: 1800, 504, 112;
END.
DATA SET TYPE FLD PT ENTR MED MAXIMUM BLK BLK DISC
NAME CNT CT LGTH REC CAPACITY FAC LGTH SPACE
DATE-MASTER A 1 3 3 26 365 19 496 96
CUSTOMER M 9 1 41 52 201 7 365 96
PRODUCT M 2 2 14 31 300 16 497 80
SUP-MASTER M 5 1 31 42 201 12 505 80
INVENTORY D 6 3 20 32 1800 15 481 128
INITIAL CAPACITY: 450 INCREMENT ENTRIES: 45
SALES D 8 4 19 35 1008 14 491 160
INITIAL CAPACITY: 504 INCREMENT ENTRIES: 112
TOTAL DISC SECTORS INCLUDING ROOT: 672
NUMBER OF ERROR MESSAGES: 0
ITEM NAME COUNT: 23 DATA SET COUNT: 6
ROOT LENGTH: 1176 BUFFER LENGTH: 505 TRAILER LENGTH: 256
ROOT FILE ORDERS CREATED.
Model Program Conventions
The following conventions are used throughout the model.
n Refers to the option number assigned to each function
shown in the main body of the program.
Indicates an intentional blank.
ACCESS Indicates the user access mode, or how the database was
opened for a particular routine. Note that for this model
the user access mode is always 1 (shared modify access).