Vis-à-vis fragmentation, I was once tasked with finding the 'largest chunk of 
free storage' in order to order to set region limit in IEFUSI. I no longer have 
the code, but I believe I used VSMLIST to scan through available chunks to 
locate the biggest one. This may be overkill for your needs, but it was very 
reliable. 

The problem being addressed was a shrinking address space that gradually 
reduced the available storage over time until the initiator was bounced. That 
problem may be long gone in z/OS, but the technique should still be valid. 

.
.
.
J.O.Skip Robinson
Southern California Edison Company
Electric Dragon Team Paddler 
SHARE MVS Program Co-Manager
626-302-7535 Office
323-715-0595 Mobile
jo.skip.robin...@sce.com

-----Original Message-----
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of zMan
Sent: Saturday, December 06, 2014 10:31 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: How much storage is left?

But remember that "how much" has several answers: not only "Where?" but "In how 
big a chunk?". Fragmentation can ruin your day...

On Sat, Dec 6, 2014 at 1:20 PM, Blaicher, Christopher Y. < 
cblaic...@syncsort.com> wrote:

> Look at the LDA.  Here is how to get to it.
>          USING PSA,R0
>          L     R3,PSAAOLD              POINT AT ASCB
>          DROP  R0
>          USING ASCB,R3
>          L     R3,ASCBLDA              POINT AT LDA FOR THIS TASK
>          USING LDA,R3
>
> Chris Blaicher
> Principal Software Engineer, Software Development Syncsort 
> Incorporated
> 50 Tice Boulevard, Woodcliff Lake, NJ 07677
> P: 201-930-8260  |  M: 512-627-3803
> E: cblaic...@syncsort.com
>
> -----Original Message-----
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] 
> On Behalf Of scott
> Sent: Saturday, December 06, 2014 12:27 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: How much storage is left?
>
>     In an assembler program how can you find out how much 
> storage/memory is remaining?  Do getmains till the return code replies 
> back there is no more?

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Reply via email to