1
2
3
4
5
6
7
8
9
10
11 dcl 1 sys_info_tune aligned based,
12 2 type fixed bin,
13 2 max_depth fixed bin (35),
14 2 map fixed bin;
15
16 dcl SYS_TUNE char (8) static options (constant) initial ("sys_tune");
17
18
19
20
21
22
23
24
25
26
27 dcl 1 opt_info_tune aligned based,
28 2 type fixed bin,
29 2 sub_sys char (4),
30 2 dev fixed bin,
31 2 response fixed bin (35),
32 2 load fixed bin;
33
34 dcl OPT_TUNE char (8) static options (constant) initial ("opt_tune");
35 dcl STAGNATE_TIME char (8) static options (constant)
36 initial ("stagnate");
37 dcl RESET_SYS char (9) static options (constant)
38 initial ("reset_sys");
39 dcl RESET_MAX char (9) static options (constant)
40 initial ("reset_max");
41
42
43
44 dcl MAX_IO_NAME fixed bin static options (constant) initial (5);
45
46 dcl io_name (0:4) char (10) static options (constant)
47 initial ("page_read", "page_write", "vtoc_read", "vtoc_write", "test");
48
49
50
51 dcl code_names (6) char (32) static options (constant)
52 initial ("stagnate time range",
53 "invalid IO TYPE",
54 "invalid map IO TYPE",
55 "unknown sub-system",
56 "invalid device number",
57 "response < 1");
58
59