1 /* BEGIN INCLUDE FILE ... retv_request.incl.pl1 ... June 1976 */
 2 
 3 dcl  requestp ptr;
 4 
 5 dcl  retv_request_version_2 fixed bin int static init (2) options (constant);
 6 
 7 dcl 1 retv_request based (requestp) aligned,
 8     2 header like queue_msg_hdr,
 9     2 bits,
10       3 subtree bit (1),                                    /* on if sub-tree retrieval desired */
11       3 dirs bit (1),                                       /* on if only subtree dirs desired */
12       3 segs bit (1),                                       /* on if only subtree segments desired */
13       3 previous bit (1),                                   /* on if prior object desired */
14     2 fixed_bin,
15       3 version fixed bin,                                  /* version of structure */
16       3 to_time fixed bin (71),                             /* latest time to start search from */
17       3 from_time fixed bin (71),                           /* from_time time not to search past */
18     2 chars,
19       3 new_dirname char (168),                             /* cross retrieval directory name */
20       3 new_ename char (32);                                /* cross retrieval entry name */
21 
22 /* END INCLUDE FILE ... retv_request.incl.pl1 */