The DICTIONARY statement incorporates OpenVMS common data dictionary (CDD) data definitions into the current Compaq Fortran 77 source program during compilation. The statement can occur anywhere in a Fortran source program that a STRUCTURE statement can occur.
The DICTIONARY statement takes the following form:
DICTIONARY 'cdd-path [/[NO]LIST]'
There are two types of CDD pathnames: full and relative. Their formation must conform to the rules for forming CDD pathnames.
A full CDD pathname begins with CDD$TOP and specifies the given names of all its descendants; it is a complete path to the record definition. Descendant names are separated from each other by a period.
A relative CDD pathname begins with any generation name other than CDD$TOP and specifies the given names of the descendants after that point. A relative path comes into existence when a default directory is established with a logical name.
In the following example, the logical name definition specifies the beginning of the CDD pathname; so, a relative pathname specifies the remainder of the path to the record definition:
$ DEFINE CDD$DEFAULT CDD$TOP.FOR
The following examples illustrate how a CDD pathname beginning with CDD$TOP overrides the default CDD pathname. Consider a record with the pathname CDD$TOP.SALES.JONES.SALARY. If you define CDD$DEFAULT to be CDD$TOP.SALES.JONES, you can then specify a relative pathname; for example:
DICTIONARY 'SALARY'
You can also specify this as a full pathname; for example:
DICTIONARY 'CDD$TOP.SALES.JONES.SALARY'