1 /*  BEGIN INCLUDE FILE:  dm_ci_parts.incl.pl1  */
 2 
 3 /* DESCRIPTION:
 4 
 5         This include file contains the ci_parts structure.  This structure
 6    is used across the file_manager_ interface to specify the parts of a
 7    control interval to get or put.  If the number_of parts is equal to 0,
 8    modules which take ci_parts interpret this case to mean to do everything
 9    except the actual requested operation, i.e., lock the control interval
10    but don't get anything.  offset_in_bytes is the 0-originned offset in
11    bytes from the beginning of the addressable portion of the control interval.
12    An offset_in_bytes which is in the addressable portion is in error.
13    Likewise, if offset_in_bytes + length_in_bytes is outside of the addressable
14    portion, it is in error.
15 */
16 
17 /* HISTORY:
18 Written by Matthew Pierret, 01/28/82.
19   (01/28/82 Andre Bensoussan, Design.)
20 Modified:
21 11/07/84 by Matthew Pierret:  To add must_be_zero, initial attributes on
22             automatic storge.
23 */
24 
25 /* format: style2,ind3 */
26 
27      dcl     1 ci_parts             aligned based (ci_parts_ptr),
28                2 number_of_parts    fixed bin (17),
29                2 must_be_zero       fixed bin,
30                2 part               (cip_number_of_parts refer (ci_parts.number_of_parts)),
31                  3 offset_in_bytes  fixed bin (17),
32                  3 length_in_bytes  fixed bin (17),
33                  3 local_ptr        ptr;
34 
35      dcl     ci_parts_ptr           ptr init (null ());
36      dcl     cip_number_of_parts    fixed bin (17) init (0);
37 
38 
39 /*  BEGIN INCLUDE FILE:   dm_ci_parts.incl.pl1   */