1 /* BEGIN INCLUDE FILE mrds_model_relations.incl.pl1 2 3 Created October, 1975 for release in MR 4.0 */ 4 5 dcl 1 model_relations based (mr_ptr), /* structure to return names of all relations in a model */ 6 2 nrels fixed bin (10), /* number of relations */ 7 2 relation_name (num_relations_alloc refer (model_relations.nrels)) char (32); /* relation names */ 8 9 dcl num_relations_alloc fixed bin (10); /* number of relations in model for allocation purposes */ 10 11 dcl mr_ptr ptr; 12 13 /* END INCLUDE FILE mrds_model_relations.incl.pl1 */ 14