On Sun, Dec 5, 2010 at 6:27 AM, Peter Relson <[email protected]> wrote:
> >wsAttach ds xl(l'csAttch)
>
> As Bill Godfrey correctly indicated, the value of L'csAttch is not the
> length of the parameter area. It happens to be "4".
> Therefore the MVC only moved 4 bytes and the defined storage area for
> wsAttach was only 4 bytes.
>
> And, if what was posted was truly a copy of your code, it's not clear what
> "csAttach" (the source for the MVC) is since the list form is for a
> different name ("csAttch").
>
> Rather than use L'csAttch, a typical approach is to add an equate such as
> csAttch_Len EQU *-csAttch
> right after the list form and then use that equate.
>
Yes it is the code directly from the source.
* read only macro models
csAttch Attach Eploc=, +
Etxr=, +
Sm=SUPV, +
Svarea=YES, +
Key=PROP, +
Ecb=, +
Sf=L
However, the original post failed to include the equate shown below.
csAttach equ csAttch,*-csAttch
As Bill, Binyamin and yourself have mentioned, referencing L'csAttch
(instead of L'csAttach) in the reentrant storage definition of wsAttach
result in a work area that was too small.
Thanks everyone for your assistance. The code is working now.
Cheers,
Sam
> Peter Relson
> z/OS Core Technology Design
>
> ----------------------------------------------------------------------
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to [email protected] 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 [email protected] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html