On 4/10/2012 3:07 PM, Micheal Butz wrote:
I have a piece of CSA storage sp 241
That I am obtaining in key 8
(I know this is a no no)
If you are working for a commercial ISV, I recommend AT LEAST the following in
DIAGxx on all systems (it's what we use):
Vsm Track Csa(ON) Sqa(ON) /* Track common stg allocation */
Vsm AllowUserKeyCsa(NO) /* Disallow user key common stg */
Vsm CheckRegionLoss(512K,25M) /* Restart INITs when fragmented */
Vsm UseZosV1R9Rules(NO) /* Use faster GETMAIN/FREEMAIN */
ReusAsid(YES) /* Allow reusable ASIDs */
CbLoc Virtual31(IHALCCA,IHAPCCA, /* Move control blocks above 16MB */
IHAASVT)
Traps Name(IeaCmSetV, /* Ensure disabled CMSET caller */
IeaInitArSrb, /* Initialize registers for SRBs */
IeaInitRegsTask, /* Initialize registers for TCBs */
IeaSpinLockV, /* Verify spin lock environment */
IeaScheduleV, /* Verify schedule environment */
IeaScheduleTrace, /* Trace SCHEDULE & IEAMSCHD */
IeaRpsgnlTrace, /* Trace RPSGNL calls */
/* Sloooow IgvCpoolGetV, /* Validate CPOOL GET environment */
IgvInitCpool, /* Initialize CPOOL GET elements */
IgvInitGetmain, /* Initialize GETMAINed storage */
IgvInitFreemain, /* Initialize FREEMAINed storage */
IarSt64InitGet, /* Initialize gotten 64-bit stg. */
IarSt64InitFree, /* Initialize freed 64-bit stg. */
IarCp64InitGet, /* Initialize gotten 64-bit cells */
IarCp64InitFree /* Initialize freed 64-bit cells */
IosZdacMsgs /* Generate zDAC Messages */
)
--
Edward E Jaffe
Chief Technology Officer
Phoenix Software International, Inc
831 Parkview Drive North
El Segundo, CA 90245
310-338-0400 x318
edja...@phoenixsoftware.com
http://www.phoenixsoftware.com/
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
