1 /* BEGIN INCLUDE FILE dm_rlm_attribute_info.incl.pl1 */
 2 
 3 /* DESCRIPTION
 4 
 5    Relation attributes descriptor and name.  This info is kept in the header
 6    collection of existing files, therefore this incl should not be changed.
 7 */
 8 
 9 /* HISTORY:
10 Written by Matthew Pierret, 02/25/83.
11 Modified:
12 10/29/84 by Stanford S. Cox:  Changed to not init version.
13 12/14/84 by Stanford S. Cox:  Backed out previous structure alignment changes
14    which were incompatible with existing DM files.
15 */
16 
17 /* format: style2,ind3 */
18      dcl     1 attribute_info       aligned based (attribute_info_ptr),
19                2 version            char (8),
20                2 number_of_attributes
21                                     fixed bin (17) unal,
22                2 maximum_attribute_name_length
23                                     fixed bin (17) unal,
24                2 attribute          (ai_number_of_attributes refer (attribute_info.number_of_attributes)),
25                  3 descriptor       bit (36) aligned,
26                  3 name             char (ai_maximum_attribute_name_length
27                                     refer (attribute_info.maximum_attribute_name_length)) varying;
28 
29      dcl     attribute_info_ptr     ptr init (null);
30      dcl     ai_maximum_attribute_name_length
31                                     fixed bin (17);
32      dcl     ai_number_of_attributes
33                                     fixed bin (17);
34      dcl     ATTRIBUTE_INFO_VERSION_1
35                                     init ("attrinf1") char (8) aligned internal static options (constant);
36 
37 /* END INCLUDE FILE dm_rlm_attribute_info.incl.pl1 */
38