1 /* BEGIN INCLUDE FILE mrds_dsm_relation_data.incl.pl1 - NSDavids 81-01-29
 2 
 3 
 4    This include file contains information about all the relations in a
 5    submodel view. It is a user's view only and is not meant to be used
 6    by mrds code.
 7 
 8    HISTORY
 9 
10    81-01-29 Davids: written
11 */
12 
13 
14 
15 
16 
17 dcl 01 mrds_dsm_relation_data aligned based (mrds_dsm_relation_data_ptr),
18     02 version fixed bin,
19     02 number_of_relations fixed bin,
20     02 relations (mrds_dsm_relation_data_num_rels
21      refer (mrds_dsm_relation_data.number_of_relations)),
22       03 submodel_relation_name char (64),
23       03 model_relation_name char (32),
24       03 append_access bit (1) unal,
25       03 delete_access bit (1) unal,
26       03 null_access bit (1) unal,
27       03 mbz1 bit (33) unal;
28 
29 dcl  mrds_dsm_relation_data_ptr ptr;
30 
31 dcl  mrds_dsm_relation_data_num_rels fixed bin;
32 
33 dcl  mrds_dsm_relation_data_structure_version fixed bin init (1) internal static options (constant);
34 
35 /* END INCLUDE FILE mrds_dsm_relation_data.incl.pl1 */