1 /* BEGIN INCLUDE FILE ... cpm_ctrl_pt_meters.incl.pl1 */
 2 
 3 /****^  HISTORY COMMENTS:
 4   1) change(86-08-12,Kissel), approve(86-08-12,MCR7473),
 5      audit(86-10-08,Fawcett), install(86-11-03,MR12.0-1206):
 6      Written to support control point management in March 1985 by G. Palter.
 7                                                    END HISTORY COMMENTS */
 8 
 9 /* format: style3,linecom */
10 
11 /* NOTE: The include file references structures contained in the following independent include file --
12           process_usage.incl.pl1        */
13 
14 
15 /* Definition of control point metering data -- A set of metering data is kept independently for each control point which
16    provides usage statistics for that control point.  In addition, another set of metering data is kept to record the
17    overhead involved in the control point scheduler */
18 
19 dcl       1 control_point_meters
20                               aligned based (cpm_ptr),
21             2 n_schedules     fixed binary,                 /* # of times the control point has been run or
22                                                                # of times the scheduler has been invoked */
23             2 pad             fixed binary,
24             2 real_time       fixed binary (71),            /* ... real time used by the control point or scheduler */
25             2 usage           like process_usage;           /* ... CPU, memory, etc. */
26 
27 dcl       cpm_ptr             pointer;
28 
29 
30 /* Definition of the structure used in calls to cpm_$get_control_point_meters and cpm_$get_scheduler_meters */
31 
32 dcl       1 control_point_meters_argument
33                               aligned based (cpma_ptr),
34             2 version         character (8) unaligned,
35             2 meters          like control_point_meters;
36 
37 dcl       CONTROL_POINT_METERS_ARGUMENT_VERSION_1
38                               character (8) static options (constant) initial ("cpma_001");
39 
40 dcl       MAX_NUMBER_OF_METERS
41                               fixed bin internal static options (constant) init (9);
42 
43 dcl       cpma_ptr            pointer;
44 
45 /* END INCLUDE FILE ... cpm_ctrl_pt_meters.incl.pl1 */