Difference between revisions of "WHO BAD"
From MidrangeWiki
(→The CLP Source Code) |
|||
| Line 12: | Line 12: | ||
/* ***************************** */ | /* ***************************** */ | ||
| + | |||
| + | PGM | ||
| + | DCL &RUNPTY *DEC (2 0) | ||
| + | RTVJOBA RUNPTY(&RUNPTY) | ||
| + | CHGJOB RUNPTY(1) | ||
| + | WRKACTJOB RESET(*YES) CPUPCTLMT(3.0) SEQ(*CPUPCT) | ||
| + | CHGJOB RUNPTY(&RUNPTY) | ||
| + | ENDPGM | ||
Revision as of 03:11, 29 May 2005
Reason to have this program
See Degradation
The CLP Source Code
/* ***************************** */
/* Who is using excess system resources (CPU % GE 3.0 percent) */
/* ***************************** */
PGM DCL &RUNPTY *DEC (2 0) RTVJOBA RUNPTY(&RUNPTY) CHGJOB RUNPTY(1) WRKACTJOB RESET(*YES) CPUPCTLMT(3.0) SEQ(*CPUPCT) CHGJOB RUNPTY(&RUNPTY) ENDPGM
