1 12/01/86  msmi_
  2 
  3 This subroutine provides a means of obtaining information about a
  4 MRDS submodel.
  5 
  6 
  7 Entry points in msmi_:
  8        (List is generated by the help command)
  9 
 10 
 11 :Entry: close_submodel: 12/01/86  msmi_$close_submodel
 12 
 13 Function:  This entry disassociates an opening name and a submodel
 14 to prevent further access to that submodel through that opening_name.
 15 
 16 
 17 Syntax:
 18 declare msmi_$close_submodel entry (char(*), fixed bin(35));
 19 call msmi_$close_submodel (opening_name, code);
 20 
 21 
 22 Notes:  The opening_name is the one given in the call to
 23 msmi_$open_submodel for the submodel that is to be closed.
 24 
 25 
 26 :Entry: get_attribute_data: 12/01/86  msmi_$get_attribute_data
 27 
 28 Function:  This entry returns the attribute information for the
 29 given relation.
 30 
 31 
 32 Syntax:
 33 declare msmi_$get_attribute_data entry (char(*), char(*), ptr, fixed bin, ptr,
 34    fixed bin(35));
 35 call msmi_$get_attribute_data (opening_name, rel_name, area_ptr,
 36    structure_version, attribute_data_ptr, code);
 37 
 38 
 39 Notes:  The data about the attributes for a given relation in the
 40 submodel is returned in the following structure for version 1:
 41  dcl 1 mrds_dsm_attribute_data based
 42        (mrds_dsm_attribute_data_ptr) aligned,
 43      2 version fixed bin,
 44      2 number_of_attributes fixed bin,
 45      2 attributes (mrds_dsm_attribute_data_num_atts refer
 46        (mrds_dsm_attribute_data.number_of_attributes)),
 47        3 submodel_attribute_name char(64),
 48        3 model_attribute_name char(32),
 49        3 read_access bit(1) unal,
 50        3 modify_access bit(1) unal,
 51        3 null_access bit(1) unal,
 52        3 mbz1 bit(33) unal;
 53 
 54 
 55 :Entry: get_relation_data: 12/01/86  msmi_$get_relation_data
 56 
 57 Function:  This entry returns information about each relation in
 58 a submodel.
 59 
 60 
 61 Syntax:
 62 declare msmi_$get_relation_data entry (char(*), ptr, fixed bin, ptr,
 63    fixed bin(35));
 64 call msmi_$get_relation_data (opening_name, area_ptr,
 65    structure_version, relation_data_ptr, code);
 66 
 67 
 68 Notes:  The information about each relation in the submodel is returned
 69 in the following structure for version 1:
 70  dcl 1 mrds_dsm_relation_data based
 71        (mrds_dsm_relation_data_ptr) aligned,
 72      2 version fixed bin,
 73      2 number_of_relations fixed bin,
 74      2 relations (mrds_dsm_relation_data_num_rels refer
 75        (mrds_dsm_relation_data.number_of_relations)),
 76        3 submodel_relation_name char(64),
 77        3 model_relation_name char(32),
 78        3 append_access bit(1) unal,
 79        3 delete_access bit(1) unal,
 80        3 null_access bit(1) unal,
 81        3 mbz1 bit(36) unal;
 82 
 83 
 84 :Entry: get_submodel_info: 12/01/86  msmi_$get_submodel_info
 85 
 86 Function:  This entry returns general information about the submodel.
 87 
 88 
 89 Syntax:
 90 declare msmi_$get_submodel_info entry (char(*), ptr, fixed bin, ptr,
 91    fixed bin(35));
 92 call msmi_$get_submodel_info (opening_name, area_ptr,
 93    structure_version, submodel_info_ptr, code);
 94 
 95 
 96 Notes:  The general submodel information is returned in the following
 97 structure for version 1:
 98  dcl 1 mrds_dsm_submodel_info based
 99     (mrds_dsm_submodel_info_ptr) aligned,
100      2 version fixed bin,
101      2 submodel_version fixed bin,
102      2 database_path char(168),
103      2 submodel_path char(168),
104      2 date_time_created fixed bin(71),
105      2 creator_id char(32);
106 
107 
108 :Entry: open_submodel: 12/01/86  msmi_$open_submodel
109 
110 Function:  This entry associates a submodel with an opening_name so
111 that it can be used by other msmi_ entries.  The same submodel
112 may be associated with multiple opening names.
113 
114 
115 Syntax:
116 declare msmi_$open_submodel entry (char(*), char(*), fixed bin(35));
117 call msmi_$open_submodel (opening_name, path, code);
118 
119 
120 Notes:  The opening name supplied by the user identifies this opening
121 of the submodel given by path.
122 
123 
124 
125 
126 
127 
128