1 /* BEGIN INCLUDE FILE dm_esm_info.incl.pl1 */
 2 
 3 /* DESCRIPTION:
 4 
 5      This include file contains the basic_esm_info and ordered_esm_info
 6      structures, as well as constants used to distinguish element storage
 7      methods.  They are used by several managers to describe the type of
 8      element storage management to be used in a collection.
 9 */
10 
11 /* HISTORY:
12 Written 02/07/82 by Matthew Pierret.
13 Modified:
14 05/17/84 by Matthew Pierret:  Changed name from dm_cm_esm_info (the cm_
15             dropped because the include file is used by multiple managers),
16             to align structure elements and to add a version string.
17 */
18 
19 /* format: style2 */
20 
21      dcl     1 basic_esm_info       based (basic_esm_info_ptr) aligned,
22                2 version            char (8) aligned init (ESM_INFO_VERSION_1),
23                2 type               fixed bin (17) init (BASIC_ELEMENT_STORAGE_METHOD),
24                2 flags              aligned,
25                  3 threaded         bit (1) unal,
26                  3 fixed_length     bit (1) unal,
27                  3 pad              bit (34) unal,
28                2 maximum_element_length
29                                     fixed bin (35);
30 
31      dcl     1 ordered_esm_info     based (ordered_esm_info_ptr) aligned,
32                2 version            char (8) aligned init (ESM_INFO_VERSION_1),
33                2 type               fixed bin (17) init (ORDERED_ELEMENT_STORAGE_METHOD),
34                2 flags              aligned,
35                  3 fixed_length     bit (1) unal,
36                  3 pad              bit (35) unal,
37                2 maximum_element_length
38                                     fixed bin (35);
39 
40      dcl     basic_esm_info_ptr     ptr;
41      dcl     ordered_esm_info_ptr   ptr;
42 
43      dcl     ESM_INFO_VERSION_1     init ("ESMinfo1") char (8) aligned internal static options (constant);
44      dcl     BASIC_ELEMENT_STORAGE_METHOD
45                                     fixed bin init (1) internal static options (constant);
46      dcl     ORDERED_ELEMENT_STORAGE_METHOD
47                                     fixed bin init (2) internal static options (constant);
48 
49 
50 /* END INCLUDE FILE dm_esm_info.incl.pl1 */