Explanation: The error occurred when the system was trying to do one of
the following:
Satisfy a request made through the STORAGE macro
Process an RU or VRU form of the GETMAIN macro
Process an RU form of the FREEMAIN macro
A reason code in the SDWACRC field of the system diagnostic work area
(SDWA) explains the error:
Code Explanation
04
There is not enough virtual system queue area (SQA) storage available to
satisfy the request.
08
There is not enough virtual common service area (CSA) storage available to
satisfy the request.
0C
There is not enough virtual local system queue area (LSQA) storage
available to satisfy the request.
10
There is not enough virtual private area storage available to satisfy the
request. This is due to one of the following:
A program is requesting virtual storage, but not subsequently freeing the
storage.
The region size specified is too small.
An installation exit is requesting virtual storage from a V=R region
before initialization of the region has completed.
Programmer Response: A complete dump is necessary to diagnose this out of
storage condition. If no dump was produced, SLIPs should be set to obtain
a dump on problem recurrence. Further debugging information may be found
in Informational APAR II05506. An abend 80A can cause this same condition,
so both SLIPs should be set as follows:
SLIP SET,COMP=878,A=SVCD,SDATA=(ALLNUC,
PSA,SQA,CSA,LPA,TRT,LSQA,RGN),END
SLIP SET,COMP=80A,A=SVCD,SDATA=(ALLNUC,
PSA,SQA,CSA,LPA,TRT,LSQA,RGN),END
Also, depending on the reason code, do one of the following:
10
Try increasing the region size specified in the region parameter on the
JOB or EXEC statement in the JCL for the job. However, if the cause of the
problem is actually that a program is requesting virtual storage and not
freeing it, the abend will recur when the program uses the virtual storage
in the larger region.
Daniel McLaughlin
ZOS Systems Programmer
Crawford & Company
PH: 770 621 3256
[EMAIL PROTECTED]
If you aim at nothing you will hit it every time.
- Zig Ziglar
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
