1 /*        BEGIN INCLUDE FILE           mrds_valid_out.incl.pl1
 2 
 3    Created October, 1976 for release in MR 5.0
 4 
 5    author:  R. Frommer                                                 */
 6 
 7 dcl 1 valid_out based (vo_ptr) aligned,
 8     2 dm_rel_name char (32),                                /* data model rel_name as determined from dsmd */
 9     2 rel_code fixed bin (35),                              /* relation code for dsm relation being validated */
10     2 rel_access fixed bin (5),                             /* relation access; i.e., read or write */
11     2 permit_ops fixed bin (17),                            /* dsl operations permitted on the relation */
12     2 num_attr fixed bin,                                   /* number of attributes in data submodel */
13     2 attr (number_attr_alloc refer (valid_out.num_attr)),
14       3 dsm_attr_name char (32),                            /* data submodel attribute name */
15       3 dm_attr_name char (32),                             /* data model attribute name */
16       3 domain_name char (32),                              /* name of underlying domain */
17       3 attr_code fixed bin (35),                           /* attribute code  */
18       3 attr_descriptor bit (36),                           /* standard Multics descriptor of attribute */
19       3 attr_permit_ops fixed bin (17),                     /* reserved for future use */
20       3 invert_flag bit (1),                                /* 1 if attribute is inverted; 0 otherwise */
21       3 key_flag bit (1),                                   /* indicates whether attribute is part of primary key */
22       3 reserved bit (34);                                  /* reserved for future use */
23 
24 dcl  number_attr_alloc fixed bin;
25 
26 /*         END INCUDE FILE             mrds_valid_out.incl.pl1 */
27