1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16 dcl lock_meters_ptr ptr;
17 dcl LOCK_METERS_VERSION_1 char (8) aligned int static options (constant)
18 init ("LMMETER1");
19
20 dcl 1 lock_meters aligned based (lock_meters_ptr),
21 2 version char (8),
22 2 lm_meters aligned,
23 3 lock_calls fixed bin (35),
24 3 unlock_all_calls fixed bin (35),
25 3 waits fixed bin (35),
26 3 deadlock_checks fixed bin (35),
27 3 real_deadlock_checks
28 fixed bin (35),
29 3 deadlock_checks_36 fixed bin (35),
30 3 deadlock_checks_72 fixed bin (35),
31 3 deadlock_self_youngest
32 fixed bin (35),
33 3 deadlock_other_youngest
34 fixed bin (35),
35 3 file_locks_by_mode (2:6) fixed bin (35),
36 3 ci_locks_by_mode (2:3) fixed bin (35),
37 3 allocates fixed bin (35),
38 3 frees fixed bin (35),
39 3 dup_file_locks_by_mode
40 (2:6) fixed bin (35),
41 3 dup_ci_locks_by_mode
42 (2:3) fixed bin (35),
43 3 pad (11) fixed bin (35);
44
45