1 /* Begin include file edit_proj_arguments_.incl.pl1 BIM 1984-08-27 */
 2 /* format: style3 */
 3 /* Modified 1984-09-14 BIM to pass in mgt_ptr */
 4 
 5 /**** This data structure is passed to edit_proj_ (and edit_proj_$review)
 6       to inform if of the desired action. */
 7 
 8 declare   edit_proj_arg_ptr   pointer;
 9 declare   1 edit_proj_arg     aligned based (edit_proj_arg_ptr),
10             2 version         char (8) aligned,
11             2 caller          char (32) unaligned,
12             2 seg_pointers    aligned,
13               3 (
14               satep,                                        /* SAT entry (project) */
15               projfile_ep,                                  /* projfile entry */
16               reqfile_ep,                                   /* reqfile entry */
17               mgtp                                          /* entire MGT */
18               ) pointer,
19             2 flags           aligned,
20               3 all           bit (1) unaligned,            /* prompt for all values */
21               3 long          bit (1) unaligned,            /* speak up when changing one */
22               3 report_project_name
23                               bit (1) unaligned,            /* include name of project in speech */
24               3 match         bit (1) unaligned,            /* replace one of a list with another */
25               3 brief_match   bit (1) unaligned,            /* do not complain if match fails */
26             2 changes         aligned,
27               3 anything      bit (1) unaligned,            /* any field changed */
28               3 acls          bit (1) unaligned,            /* acls need to be recalculated */
29               3 alias         bit (1) unaligned,
30               3 seg_quota     bit (1) unaligned,
31               3 dir_quota     bit (1) unaligned,
32             2 value_index     fixed bin,                    /* keyword */
33             2 new_value       aligned,
34               3 ptr           pointer,
35               3 length        fixed bin (21),
36             2 match_value     aligned,
37               3 ptr           pointer,
38               3 length        fixed bin (21);
39 
40 declare   new_value_string    char (edit_proj_arg.new_value.length) based (edit_proj_arg.new_value.ptr);
41 declare   match_value_string  char (edit_proj_arg.match_value.length) based (edit_proj_arg.match_value.ptr);
42 
43 declare   EDIT_PROJ_ARGS_V_2  char (8) init ("epagv002") int static options (constant);
44 
45 /* End include file edit_proj_arguments_.incl.pl1 */