Diane, Based on the below code snip segment, your installation has a "magic" SVC to get into SUP STATE KEY 0. which is also an integrity exposure, but that is another topic. If the code that acquires the code is able to get into SUP STATE KEY 0 to do the STORAGE OBTAIN, simply get the storage in KEY 0, and change the updating code to get into sup state around the updates. Subpool 241 is non-fetch protected, which means that any key can reference the storage, so as has been mentioned, readers won't care a bit, just the updating programs need to be modified.
=============================================== Wayne Driscoll OMEGAMON DB2 L3 Support/Development wdrisco(AT)us.ibm.com =============================================== From: Diane Goodwin <dgood...@amica.com> To: IBM-MAIN@bama.ua.edu Date: 03/24/2010 09:18 AM Subject: Trying to understand ALLOWUSERKEYCSA and subpool storage Sent by: IBM Mainframe Discussion List <IBM-MAIN@bama.ua.edu> Please bear with me. I'm primarily a CICS system programmer. I posted something similar to the CICS List but now I really need to understand it from the z/OS or MVS side of things. We have multiple CICS regions (address spaces) in an LPAR and they all currently share a piece of MVS storage. This area holds common information that all regions access. Only 2 regions actually update the information - all the others just read. Our program acquired the area using the following: LA R1,SVCSAVE HOLD AREA FOR SVC 255 SVC 255 GET INTO SUP. STATE WITH KEY 0 STORAGE OBTAIN,LENGTH=20480,SP=241,KEY=9 ST R1,MVSCSADR STORE AREA ADDR. IN CSAEXT IC R11,=X'80' SPKA 0(R11) CHANGE TO KEY 8 CICS MODESET MODE=PROB SWITCH TO PROBLEM STATE The new default of ALLOWUSERKEYCSA of "NO" of course makes this fail. We did set it to YES since this is necessary for our CICS to run. However, I've been given the task to see if we can have a shared area and run with the default of NO. Subpool 241 is CSA, system, not fetch proteced, pageable storage. The closest I can find is 228 - which is CSA, system, not fetch protected but FIXED. However, will that still cause me issues since it is CSA? What about subpool 226 - says it is SQA, system, not fetch protected but FIXED? Might I be able to use that? The size of this area is not that large - 20,480 bytes. I'd be grateful for any light and wisdom you can shed on this subject for me. thanks in advance for your time, Diane Goodwin IT Systems Programmer Amica Insurance ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
