You can specify the KEY=8 and SP=231 on the STORAGE OBTAIN macro.
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/IEA2V2B0/1.8.3.1

<quote>
227-231,    
 241, 244,   
 249 

STORAGE with OBTAIN or         
     RELEASE; CALLRKY=YES omitted,  
     or CALLRKY=NO specified  

The storage key is  
 the key the caller  
 specifies on the    
 KEY parameter. If   
 KEY is not          
 specified, the      
 default is zero.    
                     
        

-- 
John McKown 
Systems Engineer IV
IT

Administrative Services Group

HealthMarkets(r)

9151 Boulevard 26 * N. Richland Hills * TX 76010
(817) 255-3225 phone * 
john.mck...@healthmarkets.com * www.HealthMarkets.com

Confidentiality Notice: This e-mail message may contain confidential or 
proprietary information. If you are not the intended recipient, please contact 
the sender by reply e-mail and destroy all copies of the original message. 
HealthMarkets(r) is the brand name for products underwritten and issued by the 
insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance 
Company(r), Mid-West National Life Insurance Company of TennesseeSM and The 
MEGA Life and Health Insurance Company.SM

 

> -----Original Message-----
> From: IBM Mainframe Discussion List 
> [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Micheal Butz
> Sent: Wednesday, April 11, 2012 1:08 PM
> To: IBM-MAIN@bama.ua.edu
> Subject: Re: System completion code 201
> 
> There is a reason I have CSA in KEY 8
> 
> Was just wondering If I have to do an explicit modeset to key=8
> 
> -----Original Message-----
> From: IBM Mainframe Discussion List 
> [mailto:IBM-MAIN@bama.ua.edu] On Behalf
> Of Walt Farrell
> Sent: Tuesday, April 10, 2012 7:02 PM
> To: IBM-MAIN@bama.ua.edu
> Subject: Re: System completion code 201
> 
> On Tue, 10 Apr 2012 18:07:28 -0400, Micheal Butz 
> <michealb...@optonline.net>
> wrote:
> 
> >Hi
> >
> >I have a piece of CSA storage sp 241
> >That I am obtaining in key 8
> >(I know this is a no no)
> >
> >When go to supervisor state should i code KEY=NZERO on the 
> modeset I am
> assuming
> >NZERO is 8 or should I specifically set the storage key to 8
> 
> What you -should- do is use a system key for your CSA storage 
> (as you know).
> Why not start by doing a proper design and architecture 
> rather than doing
> something you know from the outset is wrong?
> 
> -- 
> Walt
> 
> ----------------------------------------------------------------------
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
> 
> ----------------------------------------------------------------------
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
> 
> 

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

Reply via email to