You didn't show the code involved with where you said it. You wrote that 
it was "trying to chain
backward / forward save area's".

>                LENGTH=LCLDSCTL, 
what is this value?

You wrote about an "LTR after the STORAGE OBTAIN". You showed no such LTR.

>          LR    R11,R1 
>          LR    R0,R1 
>          XR    R14,R14 
>          XR    R15,R15 
>          L     R1,=AL4(WORKAREA) 
>          MVCL  R0,R14 

what is "WORKAREA"? Usualy one would clear the amount of storage that was 
obtained (as identified by LCLDSCTL). If WORKAREA is actually an "area", 
it's unlikely that the address of that area would work well as a length of 
the target of the MVCL.

Maybe it blew up on the MVCL because the length you were attempting to did 
not match what you had obtained.
If you are seeing R11 = 0 it could only be because the length you 
requested was 0. It is valid (but not what you likely want) to request 0 
bytes.

Other things: 
- You do not need to set R14 for an MVCL that zeroes an area.
- You should use TYPE=LOCAL not TYPE=CML on your SETLOCK OBTAIN if you 
want the local lock of home (and you appear to, since you are specifying 
the home ASCB address that is in PSAAOLD).
- You might consider CHECKZERO=YES on STORAGE OBTAIN so that you can avoid 
clearing the obtained area, based on the return code (which the system 
sets to indicate whether it has already made sure that the area will be 
zeroes when first referenced).

Peter Relson
z/OS Core Technology Design

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to