https://www.ibm.com/docs/en/zos/3.1.0?topic=persistence-subpool-table
In particular, your issue is explained by note 8:
8. Subpool 0 requests by programs in supervisor state and PSW key 0 are
translated to subpool 252 requests and assigned a storage key of 0.
Jim Mulder
-----Original Message-----
From: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> On Behalf Of
Richard Zierdt
Sent: Tuesday, December 24, 2024 7:03 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Interesting OPEN - CLOSE behavior in Key 0
Bind Authorized, MODE AMODE(31),RMODE(24)
Modeset KEY=ZERO
OPEN (SYSPRINT,OUTPUT),MODE=31
CLOSE SYSPRINT,MODE=31
Runs fine.
However,
OPEN (SYSPRINT,OUTPUT),MODE=31
Modeset KEY=ZERO
CLOSE SYSPRINT,MODE=31
Returns
IEA705I ERROR DURING FREEMAIN SYS CODE = 30A-18 CSBROPEN OPEN2 00 IEA705I
00FC1B80 008D2AA0 008D2AA0 00000300 00000188 00006DD8 IEF450I CSBROPEN OPEN2 -
ABEND=S30A U0000 REASON=00000018
"18 = The system could not find a private area subpool."
Well, I wasn't looking for one, but somehow changing mode from NZERO to ZERO
between OPEN and CLOSE caused a problem. BTW, a PUT macro worked fine anywhere
after OPEN.
No, this is not production code, dangers with key zero, etc, but it is
educational.
Happy Holidaze, everyone
Richard Zierdt
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
