Difference between revisions of "WHO BAD"

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

Revision as of 03:13, 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