HP OpenVMS Systems Documentation | 
	
HP COBOL
 | 
	
| Previous | Contents | Index | 
When you compile a program with the /DEPENDENCY_DATA qualifier, the compiler creates the following repository objects to represent the compiled modules, the resulting object module, and the relationships between them:
The /DEPENDENCY_DATA qualifier can also direct the compiler to create relationships between the compiled module object and other objects in the repository:
For example, recall the program that used COPY FROM DICTIONARY to include the customer and employee address record definitions:
      IDENTIFICATION DIVISION. PROGRAM-ID. MASTER-FILE. DATA DIVISION. WORKING-STORAGE SECTION. COPY "DEVICE:[VMS_DIRECTORY]SALES.CUSTOMER_ADDRESS_RECORD" FROM DICTIONARY. COPY "DEVICE:[VMS_DIRECTORY]SALES.EMPLOYEE_ADDRESS_RECORD" FROM DICTIONARY. . . .  | 
When this program is compiled with the /DEPENDENCY_DATA qualifier, the following objects are created in the repository:
In addition, the record definitions are included in the compiled module.
The COPY FROM DICTIONARY statement is used when you want to create a relationship between a compiled module and a record or field definition. The RECORD statement is used when you need to create a relationship between a compiled module and some other kind of repository object --- one that you do not want copied into the compiled module. For example, suppose you need to create a relationship between the MASTER_FILE compiled module object and a text file object, such as a functional specification. This relationship would indicate that the compiled module is derived from the functional specification. For example:
      
IDENTIFICATION DIVISION.
PROGRAM-ID. MASTER-FILE.
    .
    .
    .
PROCEDURE DIVISION.
A0100.
    .
    .
    .
    RECORD DEPENDENCY "DEVICE:[VMS_DIRECTORY]SALES.SPECIFICATION"
    TYPE IS "CDD$COMPILED_DERIVED_FROM" IN DICTIONARY.
    .
    .
    .
 | 
When this program is compiled with the /DEPENDENCY_DATA qualifier, the compiler creates the following objects and relationships:
For more information on the RECORD statement, refer to the
HP COBOL Reference Manual. For more information on the /DEPENDENCY_DATA qualifier,
invoke the online help facility for COBOL at the operating system
prompt.
C.5.4 Data Types
Oracle CDD/Repository supports some data types that are not native to HP COBOL. If a data definition contains a field declared with an unsupported data type, HP COBOL issues a fatal diagnostic. The HP COBOL compiler does not attempt to approximate a data type that it does not support.
Table C-1 shows how Oracle CDD/Repository data types are translated into COBOL data types. It also states the level of support HP COBOL provides for Oracle CDD/Repository data types.
| Data Type | VAX | Alpha | I64 | 
|---|---|---|---|
| UNSPECIFIED | U | U | U | 
| SIGNED BYTE | W | W | W | 
| UNSIGNED BYTE | W | W | W | 
| SIGNED WORD | S | S | S | 
| UNSIGNED WORD | W | W | W | 
| SIGNED LONGWORD | S | S | S | 
| UNSIGNED LONGWORD | S | S | S | 
| SIGNED QUADWORD | S | S | S | 
| UNSIGNED QUADWORD | W | W | W | 
| SIGNED OCTAWORD | W | W | W | 
| UNSIGNED OCTAWORD | W | W | W | 
| F_FLOATING | S | S | S | 
| F_FLOATING COMPLEX | W | W | W | 
| D_FLOATING | S | S | S | 
| D_FLOATING COMPLEX | W | W | W | 
| G_FLOATING | W | S | S | 
| G_FLOATING COMPLEX | W | W | W | 
| H_FLOATING | W | W | W | 
| H_FLOATING COMPLEX | W | W | W | 
| UNSIGNED NUMERIC | S | S | S | 
| LEFT OVERPUNCHED NUMERIC | S | S | S | 
| LEFT SEPARATE NUMERIC | S | S | S | 
| RIGHT OVERPUNCHED NUMERIC | S | S | S | 
| RIGHT SEPARATE NUMERIC | S | S | S | 
| PACKED DECIMAL | S | S | S | 
| ZONED NUMERIC | W | W | W | 
| BIT | W | W | W | 
| DATE | W | W | W | 
| TEXT | S | S | S | 
| VARYING STRING | W | W | W | 
| POINTER | S | S | S | 
| VIRTUAL FIELD | W | W | W | 
| SEGMENTED STRING | W | W | W | 
| REAL | U | S | S | 
| ALPHABETIC | U | S | S | 
S --Fully supported
W---The data type is translated into a supported type and a diagnostic message is issued.
U---The data type is unsupported and a fatal diagnostic message is issued.
| Previous | Next | Contents | Index |