Dictionary/3000 Reference Manual (32244-90001)

Chapter 5 161
Dictionary/3000 Utilities
DICTDBD
In the first example, the database is unique, and no renaming is required. The second
example shows a database that is not totally unique and the prompts issued by the utility
to resolve the definition transfer.
Example
The following example shows the use of DICTDBD, using a unique database name:
:RUN DICTDBD.PUB.SYS How to execute this utility.
<The Dictionary/3000 DB Info Loader program banner appears here.>
DICTIONARY PASSWORD> Password that grants modify
access used.
BASE> SHPMGT Name of existing IMAGE database.
BASE PASSWORD> MANAGER is password used.
MODE> [[RETURN]] pressed; default used.
LOADING DATA DICTIONARY Utility loading definition of
base into data Dictionary.
END OF PROGRAM
The following example shows how DICTDBD is used to rename the database name:
:RUN DICTDBD.PUB.SYS How to execute this utility.
<The Dictionary/3000 DB Info Loader program banner appears here.>
DICTIONARY PASSWORD> Password that grants modify access.
BASE> SHPMGT Base to be defined in Dictionary.
BASE PASSWORD> MANAGER was used.
MODE> [[RETURN]] pressed; default used.
LOADING DATA DICTIONARY
*ERROR: BASE ALREADY DEFINED IN DATA DICTIONARY
DO YOU WANT TO LOAD UNDER A DIFFERENT NAME(Y/N)?>Y
NEW BASE NAME> MYSHPM Will be name of base in Dictionary.
COMPATIBLE DEFINITION ALREADY IN DICTIONARY FOR ELEMENT DESCRIPTION
DO YOU WANT ELEMENT TO HAVE A DIFFERENT NAME(N/Y)?> [[RETURN]] pressed.
COMPATIBLE DEFINITION ALREADY IN DICTIONARY FOR ELEMENT ITEM-NO
DO YOU WANT ELEMENT TO HAVE A DIFFERENT NAME(N/Y)?> Y
NEW PRIMARY ELEMENT NAME> MY-ITEM-NO
COMPATIBLE DEFINITION ALREADY IN DICTIONARY FOR ELEMENT QTY-REC
DO YOU WANT ELEMENT TO HAVE A DIFFERENT NAME(N/Y)?> Y
NEW PRIMARY ELEMENT NAME> [[RETURN]] pressed.
*WARNING: DATA ELEMENT QTY-REC HAS NOT BEEN LOADED INTO DICTIONARY
INCOMPATIBLE DEFINITION ALREADY IN DICTIONARY FOR ELEMENT PO-NUMBER
NEW PRIMARY ELEMENT NAME> [[RETURN]] pressed.