RE: System Memory Usage

Agreed - I front-ended this with a command at our shop.
The drawback is that it's written in CL and designed 
to send messages instead of sending output to a file.
Nevertheless, it comes in handy sometimes :)

Terry

> -----Original Message-----
> From: midrange-l-bounces@xxxxxxxxxxxx 
> [mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Bryan Dietz
> Sent: Thursday, August 25, 2005 1:36 PM
> To: Midrange Systems Technical Discussion
> Subject: Re: System Memory Usage
> 
> 
> Jon this one is close.  Out at IBM's testcase FTP site:
> ftp://testcase.boulder.ibm.com/as400/fromibm/ApiSamples/qtempstg.savf
> 
> <snip>
> PURPOSE:  THIS PROGRAM PROVIDES AN EASY WAY TO GET A
> LIST OF ALL ACTIVE INTERACTIVE OR BATCH JOBS THAT
> HAVE OVER A SPECIFIED AMOUNT OF TEMP STORAGE IN MEG
> THE PROGRAM IS EXECUTED VIA THE FOLLOWING CALL
>     CALL LIB/QTSTGPGM PARM(STG, TYPE)
>     WHERE LIB IS THE NAME OF THE LIBRARY CONTAINING
>     THE COMPILED PROGRAM, STG IS A STORAGE THRESHOLD
>     (DECIMAL NUMBER) AND TYPE IS EITHER AN I FOR
>     INTERACTIVE OR B FOR BATCH.
>     TYPICAL CALL: CALL LIBA/QTSTGPGM PARM(50 I)
> 
>    FOR EACH JOB FOUND TO HAVE TEMP STORAGE GREATER
>    THAN THE THRESHOLD A MESSAGE IS SENT TO QSYSOPR
>    IDENTIFYING THE JOB, THE SUBSYSTEM THE JOB IS
>    RUNNING IN AND THE AMOUNT OF TEMP STORAGE USED.
> 
>    THE PROGRAM WILL CREATE A USER SPACE OBJECT IN
>    THE QTEMP LIBRARY WHICH IT WILL DUMP AT THE END
>    OF THE PROGRAM PRIOR TO DELETING THE OBJECT.
>    THE USER SPACE WILL HAVE A LIST OF THE JOBS WHICH
>    WERE FOUND - WILL SHOW THEIR JOBNAME/USER/NUMBER
>    AND TEMP STORAGE USED IN MEG. THE JOBS WHICH
>    WERE OVER THE THRESHOLD HAVE ## FOLLOWING THE
>    TEMP STORAGE VALUE TO FLAG THEM.
> 
> </snip>
> 
> ----------------------------
> Bryan Dietz
> Aktion Associates
> 
> 
> 
> midrange-l-bounces@xxxxxxxxxxxx wrote on 08/25/2005 12:15:16 PM:
> 
> > Anybody written any tools (or know of any) that will trot 
> through the
> system
> > and determine what the current memory usage of all (or 
> selected) jobs is?
> >
> > Jon Paris
> > Partner400
> 
> >
> 
> -- 
> This is the Midrange Systems Technical Discussion 
> (MIDRANGE-L) mailing list
> To post a message email: MIDRANGE-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/midrange-l
> or email: MIDRANGE-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/midrange-l.
> 
>