⇓   ⇐

---

Figure 2: Running DBSCHEMA

---

:RUN DBSCHEMA.PUB.SYS;STDIN=SCHEMA


PAGE 1      HEWLETT-PACKARD 30391C.07.04  TurboIMAGE/3000: DBSCHEMA

BEGIN DATA BASE ORDERS;  << CUSTOMER ORDERS >> 


PASSWORDS: 

4 CLERK;        << SALES CLERK >> 
8 SUPER;        << SUPERVISOR OF CUSTOMER ORDERS DEPARTMENT >> 
15 DO-ALL;      << PROGRAMMER/ANALYST - CREATOR OF DATA BASE>> 


ITEMS:               << (READ / WRITE) >> 

ACCOUNT,        X6   (4,8,15/8,15);    << CUSTOMER ACCT=AA-NNN  >> 
CITY,           X14  (4,8,15/8,15);    << CUSTOMER CITY         >> 
DATE,           X6   (4,8,15/8,15);    << DATE = DDMMYY         >> 
DELIV-DATE,     X6   (4,8,15/8,15);    << DEL. DATE = DDMMYY    >> 
FIRSTNAME,      X10  (4,8,15/8,15);    << CUSTOMER NAME         >> 
LASTNAME,       X16  (4,8,15/8,15);    << CUSTOMER NAME         >> 
PRICE,          J2   (4,8,15/8,15);    << PRODUCT UNIT PRICE    >> 
QTY,            J2   (4,8,15/8,15);    << QUANTITY OF ITEMS     >> 
PART-NO,        X8   (4,8,15/8,15);    << PRODUCT PART NUMBER   >> 
PART-NAME,      X14  (4,8,15/8,15);    << PRODUCT DESCRIPTION   >> 
STREET,         X26  (4,8,15/8,15);    << CUSTOMER STREET ADDR  >> 
TOTAL,          J2   (4,8,15/8,15);    << TOTAL OF PURCHASES    >> 
ZIPCODE,        X6   (4,8,15/8,15);    << CUSTOMER ZIPCODE      >> 

SETS: 

NAME:             CUSTOMER,MANUAL(4,8,15/8,15); 

ENTRY:            ACCOUNT(1), 
                  LASTNAME, 
                  FIRSTNAME, 
                  STREET, 
                  CITY, 
                  ZIPCODE; 

CAPACITY:         201; 

NAME:             DATE-MASTER,AUTOMATIC; 

ENTRY:            DATE(1); 

CAPACITY:         211; 

NAME:             SALES,DETAIL(4,8,15/8,15); 

ENTRY:            ACCOUNT(CUSTOMER), 
                  DATE(DATE-MASTER), 
                  PART-NO, 
                  PART-NAME, 
                  QTY, 
                  PRICE, 
                  TOTAL, 
                  DELIV-DATE; 

CAPACITY:         1231; 

END. 

 DATA SET    TYPE  FLD  PT  ENTR  MED  MAXIMUM    BLK  BLK  DISC  
   NAME           CNT  CT  LGTH  REC  CAPACITY   FAC  LGTH SPACE  

CUSTOMER        M  6    1  39    50   201        10   501  96       
DATE-MASTER     A  1    1  3     14   211        36   507  32       
SALES           D  8    2  26    34   1245       15   511  336      

                        TOTAL DISC SECTORS INCLUDING ROOT: 480      

NUMBER OF ERROR MESSAGES: 0     

ITEM NAME COUNT: 13      DATA SET COUNT: 3     

ROOT LENGTH: 908         BUFFER LENGTH: 511     TRAILER LENGTH: 256    

ROOT FILE ORDERS CREATED.

END OF PROGRAM
:

---