HP 3000 Manuals

Ap B. ORDERS Schema [ DBChange Plus User's Guide ] MPE/iX 5.0 Documentation


DBChange Plus User's Guide

Appendix B  ORDERS Schema 

The ORDERS database schema that is used for examples throughout this
guide is reproduced below before any DBChange Plus modifications.

     BEGIN DATA BASE ORDERS;

     PASSWORDS:
       11  CREDIT  ;
       12  BUYER   ;
       13  SHIP-REC;
       14  CLERK   ;
       18  DO-ALL  ;

     ITEMS:
       ACCOUNT        , I4(11,12,13,14,18/);
       BINNUM         , Z2(/13);
       CITY           , X12(12,13,14/11);
       CREDIT-RATING  , R2(/14);
       DATE           , X6(11,12,13,14,18/);
       DELIV-DATE     , X6(/14);
       DESCRIPTION    , X20(11,12,13,14,18/);
       FIRST-NAME     , X10(14/11);
       INITIAL        , U2(14/11);
       LAST-NAME      , X16(14/11);
       LASTSHIPDATE   , X6(12/);
       ONHANDQTY      , J2(14/12);
       PRICE          , J2(14/);
       PURCH-DATE     , X6(11/14);
       QUANTITY       , I1(/14);
       STATE          , X2(12,13,14/11);
       STOCK#         , U8(11,12,14,18/);
       STREET-ADD     , X26(12,13,14/11);
       SUPPLIER       , X16(12,13/);
       TAX            , J2(14/);
       TOTAL          , J2(11,14/);
       UNIT-COST      , P8(/12);
       ZIP            , X6(12,13,14/11);

     SETS:

       NAME:   DATE-MASTER   ,A;
       ENTRY:  DATE           (3)                        ;
       CAPACITY: 365(19);

     $CONTROL BLOCKMAX = 640
       NAME:   CUSTOMER      ,M(14/11,18);
       ENTRY:  ACCOUNT        (1)                        ,
               LAST-NAME                                 ,
               FIRST-NAME                                ,
               INITIAL                                   ,
               STREET-ADD                                ,
               CITY                                      ,
               STATE                                     ,
               ZIP                                       ,
               CREDIT-RATING                             ;
       CAPACITY: 201(10);

     $CONTROL BLOCKMAX = 512
       NAME:   PRODUCT       ,M(13,14/12,18);
       ENTRY:  STOCK#         (2)                        ,
               DESCRIPTION                               ;
       CAPACITY: 300(16);

       NAME:   SUP-MASTER    ,M(13/12,18);
       ENTRY:  SUPPLIER       (1)                        ,
               STREET-ADD                                ,
               CITY                                      ,
               STATE                                     ,
               ZIP                                       ;
       CAPACITY: 201(12);

       NAME:   INVENTORY     ,D(12,14/13,18);
       ENTRY:  STOCK#         ( PRODUCT                 ),
               ONHANDQTY                                 ,
               SUPPLIER       (!SUP-MASTER              ),
               UNIT-COST                                 ,
               LASTSHIPDATE   ( DATE-MASTER             ),
               BINNUM                                    ;
       CAPACITY: 450(15);

       NAME:   SALES         ,D(11/14,18);
       ENTRY:  ACCOUNT        ( CUSTOMER   (PURCH-DATE )),
               STOCK#         (!PRODUCT                 ),
               QUANTITY                                  ,
               PRICE                                     ,
               TAX                                       ,
               TOTAL                                     ,
               PURCH-DATE     ( DATE-MASTER             ),
               DELIV-DATE     ( DATE-MASTER             );
       CAPACITY: 500(10);

     END.



MPE/iX 5.0 Documentation