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

Chapter 3 89
Defining a Database
Schema Processor Output
Schema Processor Example
Figure 3-5. contains the list file output printed when the schema of the sample ORDERS
database is processed. The database has 5 passwords and contains 23 data item definitions
and 6 data set definitions. The Schema Processor summary information is printed
following the schema.
Figure 3-5. ORDERS Database Schema ORDERS Database Schema
PAGE 1 HEWLETT-PACKARD 30391C.05.00 TurboIMAGE/3000: DBSCHEMA
MON, JAN 10, 1994, 3:32 PM (C) HEWLETT-PACKARD CO. 1987
$CONTROL LIST,LINES=46
$PAGE "SCHEMA FOR DATABASE ORDERS"
BEGIN DATABASE ORDERS;
PASSWORDS:
11 CREDIT; << CUSTOMER CREDIT OFFICE >>
12 BUYER; << BUYER - RESPONSIBLE FOR PARTS INVENTORY >>
13 SHIP-REC; << WAREHOUSE - SHIPPING AND RECEIVING >>
14 CLERK; << SALES CLERK >>
18 DO-ALL; << FOR USE BY MGMT >>
ITEMS: << IN ALPHABETICAL ORDER FOR CONVENIENCE >>
ACCOUNT, J2 ; << CUSTOMER ACCOUNT NUMBER>>
BINNUM, Z2 (/13); << STORAGE LOCATION OF PROD>>
CITY, X12 (12,13,14/11); << CITY>>
CREDIT-RATING, R2 (/14); << CUSTOMER CREDIT RATING>>
DATE, X6 ; << DATE (YYMMDD)>>
DELIV-DATE, X6 (/14); << DELIVERY DATE (YYMMDD)>>
DESCRIPTION, X20 ; << PRODUCT DESCRIPTION>>
FIRST-NAME, X10 (14/11); << CUSTOMER GIVEN NAME>>
INITIAL, U2 (14/11); << CUSTOMER MIDDLE INITIAL>>
LAST-NAME, X16 (14/11); << CUSTOMER SURNAME>>
LASTSHIPDATE, X6 (12/ ); << DATE LAST REC D(YYMMDD)>>
ONHANDQTY, J2 (14/12); << TOTAL PRODUCT INVENTORY>>
PRICE, J2 (14/); << SELLING PRICE (PENNIES)>>
PURCH-DATE, X6 (11/14); << PURCHASE DATE (YYMMDD)>>
QUANTITY, I (/14); << SALES PURCHASE QUANTITY>>
STATE, X2 (12,13,14/11); << STATE -- 2 LETTER ABB>>
STOCK#, U8 ; << PRODUCT STOCK NUMBER>>
STREET-ADDRESS, X26 (12,13,14/11); << NUMBER AND STREET ADDRESS>>
SUPPLIER, X16 (12,13/); << SUPPLYING COMPANY NAME>>
TAX, J2 (14/); << SALES TAX (PENNIES)>>
TOTAL, J2 (11,14/); << TOTAL AMOUNT OF SALE(PENNIES)>>
UNIT-COST, P8 (/12); << UNIT COST OF PRODUCT>>
ZIP, X6 (12,13,14/11); << ZIP CODE>>
SETS:
NAME: DATE-MASTER,AUTOMATIC,DISC1; <<DATE MASTER>>
ENTRY: DATE(3);
CAPACITY: 365;