1.CDO>  DEFINE FIELD LAST_NAME DATATYPE TEXT 30.
      CDO>  DEFINE FIELD FIRST_NAME DATATYPE TEXT 20.
      CDO>  DEFINE FIELD EMP_ID DATATYPE UNSIGNED LONGWORD.
      CDO>  DEFINE RECORD EMPLOYEE_REC.
      cont>   LAST_NAME.
      cont>   FIRST_NAME.
      cont>   EMP_ID.
      cont> END.

      This example has three steps. It shows you how a corporation
      can create a logical RMS database definition that can be used
      by all of its divisions to maintain employee information in a
      physical RMS database.

      The data administrator creates the EMPLOYEE_STORAGE RMS
      database element in the central corporate repository, using
      the DEFINE RMS_DATABASE command.

    2.CDO>  DEFINE RMS_DATABASE EMPLOYEE_STORAGE.
      cont>   RECORD EMPLOYEE_REC.
      cont>   FILE_DEFINITION
      cont>     ALLOCATION 200
      cont>     FILE_PROCESSING_OPTIONS CONTIGUOUS
      cont>     ORGANIZATION INDEXED.
      cont>   AREAS.
      cont>     AREA 0
      cont>       ALLOCATE 10
      cont>       BUCKET_SIZE 5
      cont>       EXTENSION 7.
      cont>     AREA 1
      cont>       ALLOCATE 15
      cont>       BUCKET_SIZE 3
      cont>       EXTENSION 11.
      cont>     AREA 2
      cont>       ALLOCATE 20
      cont>       BUCKET_SIZE 7.
      cont>   END.
      cont>   KEYS.
      cont>     KEY 0
      cont>       DUPLICATES
      cont>       SEGMENT LAST_NAME IN EMPLOYEE_REC.
      cont>     KEY 1
      cont>       CHANGES
      cont>       SEGMENT EMP_ID IN EMPLOYEE_REC.
      cont>   END.
      cont> END.
      CDO>  DEFINE DATABASE DISG_FILE USING EMPLOYEE_STORAGE
      cont>   ON DISK1:[DISG]EMP.DAT.
      CDO>  DEFINE DATABASE SSG_FILE USING EMPLOYEE_STORAGE
      cont>   ON DISK2:[SSG]EMP.DAT.
      CDO>  DEFINE DATABASE DBS_FILE USING EMPLOYEE_STORAGE
      cont>   ON DISK3:[DBS]EMP.DAT.

      Each division creates its own employee information database on
      disk using the DEFINE DATABASE command and the same logical RMS
      database element, EMPLOYEE_STORAGE, from the central corporate
      repository.