1 /* BEGIN INCLUDE FILE ... retv_append_args.incl.pl1 ... Modified BIM 84-03-16 */
 2 
 3 dcl  retv_append_argp ptr;
 4 
 5 dcl 1 retv_append_args based (retv_append_argp) aligned,
 6     2 version char (8) aligned,
 7     2 level fixed bin,
 8     2 access_authorization bit (72), /* of user making request */
 9     2 max_access_authorization bit (72), /* ditto */
10     2 ep ptr,
11     2 flags,
12      (3 link bit (1),
13       3 cross_segment bit (1))unal;
14 
15 declare RETV_APPEND_ARGS_VERSION_1 char (8) aligned init ("rtvag001") int static options (constant);
16 
17 /* END INCLUDE FILE ... retv_append_args.incl.pl1 */