I was just going through the book on what and how dataspaces work. The other issue is that we save the address of this shared storage in a common area. Then all application programs have the address in common, will load it to a register in order to access the shared information (we have a copy member with all the fields).
I wasn't clear on how I could do this with the dataspace. I have to be able to just pass the address to the application programs. We have way to many to try to change. Diane -----Original Message----- From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of Sam Siegel Sent: Wednesday, March 24, 2010 10:40 AM To: IBM-MAIN@bama.ua.edu Subject: Re: Need to find alternative to shared storage because of ALLOWUSERKEYCSA parm On Wed, Mar 24, 2010 at 2:22 PM, Diane Goodwin <dgood...@amica.com> wrote: > Hello, Please bear with me. I'm normally a CICS System programmer. > > We all know the default setting for ALLOWUSERKEYCSA was changed > to "NO" from yes. This causes a problem for our CICS regions (address > spaces). > > We have a storage area that we obtain at the first CICS address space > start up. The area is referenced by all CICS regions - but only a couple > do any actual updating. The code we use for this is -- > > 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 > > It appears to fail on the STORAGE OBTAIN when we tried using the > default setting. We have since changed it to "YES" > > I get to figure out the best way to change this because higher-ups want > us to be able to run with the default. > > Subpool 241 is common csa, not fetch protected, pageable and system > owned. > I cannot find a subpool that is common, not fetched protected, pageable > and system owned. > I found a couple that are FIXED type. Since this area is not that large > (20,480 bytes) I was thinking I could just use one of these. > Subpool 228 also says it is common CSA - I figure that will still cause a > problem with the ALLOWUSERKEYCSA parm. > There's a subpool 226 that says it is common SQA, not fetched > protected, system owned but is FIXED> > > Do you think that might work? > Or do you have any suggestions as to the best way to have an area > available to multiple CICS address spaces, that is system owned, can > be updatable by only a couple of regions? > Hi Diane, This may not fit the bill for you, but have you considered using a SCOPE=COMMON dataspace? Regards, Sam > > Any insight or suggestions would be greatly appreciated. > Thanks in advance for your time, > Diane Goodwin > IT Systems Programmer > Amica Insurance Company > > ---------------------------------------------------------------------- > 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 ---------------------------------------------------------------------- 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
