1 /* BEGIN INCLUDE FILE dm_cism_info.incl.pl1 */
 2 
 3 /* DESCRIPTION:
 4 
 5      This include file contains the blocked_cism_info and unblocked_cism_info
 6      structures, as well as constants relevant to control interval storage
 7      management.  These structures and constants are used by several managers.
 8      The structures each describe a method of control interval storage
 9      management.
10 */
11 
12 /* HISTORY:
13 
14 Written 02/07/82 by Matthew Pierret.
15 Modified:
16 05/17/84 by Matthew Pierret:  Changed to align structure elements and add
17             a version string.
18 */
19 
20 /* format: style2 */
21 
22      dcl     1 blocked_cism_info    based (blocked_cism_info_ptr) aligned,
23                2 version            char (8) aligned init (CISM_INFO_VERSION_1),
24                2 type               fixed bin (17) init (BLOCKED_CONTROL_INTERVAL_STORAGE_METHOD),
25                2 number_of_control_intervals_per_block
26                                     fixed bin (17);
27 
28      dcl     1 unblocked_cism_info  based (unblocked_cism_info_ptr) aligned,
29                2 version            char (8) aligned init (CISM_INFO_VERSION_1),
30                2 type               fixed bin (17) init (UNBLOCKED_CONTROL_INTERVAL_STORAGE_METHOD),
31                2 must_be_zero       fixed bin (17);
32 
33      dcl     blocked_cism_info_ptr  ptr;
34      dcl     unblocked_cism_info_ptr
35                                     ptr;
36 
37      dcl     CISM_INFO_VERSION_1    init ("CISMinf1") char (8) aligned internal static options (constant);
38      dcl     BLOCKED_CONTROL_INTERVAL_STORAGE_METHOD
39                                     fixed bin init (1) internal static options (constant);
40      dcl     UNBLOCKED_CONTROL_INTERVAL_STORAGE_METHOD
41                                     fixed bin init (2) internal static options (constant);
42 
43 /* END INCLUDE FILE dm_cism_info.incl.pl1 ---------- */