Difference between revisions of "WHO BAD"

From MidrangeWiki
Jump to: navigation, search
(The CLP Source Code)
(Reason to have this program)
Line 3: Line 3:
 
=== Reason to have this program ===
 
=== Reason to have this program ===
  
See [[Degradation]]
+
See  
 +
* [[Degradation]]
 +
* [[WRKACTJOB]]
  
 
=== The CLP Source Code ===
 
=== The CLP Source Code ===

Revision as of 03:12, 29 May 2005


Reason to have this program

See

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