Re: Attach RC=20
On 12/6/2010 5:58 PM, Robert A. Rosenberg wrote: OK. That I can see - I was questioning how a "L'" label could work. If it was "L*" then I can see it. It's actually *L. -- Edward E Jaffe 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: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Attach RC=20
At 22:05 -0800 on 12/05/2010, Sam Siegel wrote about Re: Attach RC=20: I believe that he is talking about the way may of the newer IBM macros (when generated in List form) will create an equate (similar to the one you show below) with an "L" appended to provide the length of the macro expansion. OK. That I can see - I was questioning how a "L'" label could work. If it was "L*" then I can see it. -- 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
Re: Attach RC=20
On Sun, Dec 5, 2010 at 6:55 PM, Robert A. Rosenberg wrote: > At 15:03 -0800 on 12/05/2010, Edward Jaffe wrote about Re: Attach RC=20: > > > On 12/5/2010 6:27 AM, Peter Relson wrote: >> >>> 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. >>> >> >> I like how (many of? most of?) the newer macros define those equates for >> you by appending 'L' to the name you specify in the MF parameter. >> > > I can not see how that can occur. The name in the MF is the name of the > MF=L macro (or a work area where you have copied it). L' is the assigned > length of that symbol. Thus if you are pointing direct to the MF=L macro, > you will get the length of the symbol that is assigned the name not the > length of the expansion. If, on the other hand, you are point at a work > area, which will be whatever you have assigned as its length (hopefully > XL'expansion) where expansion is: > I believe that he is talking about the way may of the newer IBM macros (when generated in List form) will create an equate (similar to the one you show below) with an "L" appended to provide the length of the macro expansion. Try expanding IWM4CON or IARV64 in List form. > > Macro Macro MF=L,... > Expansion equ *-macro > > > -- > 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
Re: Attach RC=20
At 15:03 -0800 on 12/05/2010, Edward Jaffe wrote about Re: Attach RC=20: On 12/5/2010 6:27 AM, Peter Relson wrote: 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. I like how (many of? most of?) the newer macros define those equates for you by appending 'L' to the name you specify in the MF parameter. I can not see how that can occur. The name in the MF is the name of the MF=L macro (or a work area where you have copied it). L' is the assigned length of that symbol. Thus if you are pointing direct to the MF=L macro, you will get the length of the symbol that is assigned the name not the length of the expansion. If, on the other hand, you are point at a work area, which will be whatever you have assigned as its length (hopefully XL'expansion) where expansion is: Macro Macro MF=L,... Expansion equ *-macro -- 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
Re: Attach RC=20
On 12/5/2010 6:27 AM, Peter Relson wrote: 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. I like how (many of? most of?) the newer macros define those equates for you by appending 'L' to the name you specify in the MF parameter. -- Edward E Jaffe 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: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Attach RC=20
On Sun, Dec 5, 2010 at 6:27 AM, Peter Relson wrote:
> >wsAttach dsxl(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 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
Re: Attach RC=20
On Sun, Dec 5, 2010 at 3:02 AM, Binyamin Dissen wrote: > On Sat, 4 Dec 2010 17:23:03 -0800 Sam Siegel wrote: > > :>Hi List, > :> > :>I'm getting a return code of 20 in RC when issuing an attach macro. > RC=20 > :>does not seem to be documented. Can anyone provide an explanation or > :>assistance? Details listed here > > X'14' = 20. > It was actually x'20' = 32. Which is not documented. It got me going down the wrong path. > > Quite possibly due to the overlay mentioned by Bill Godfrey. > > :>APF authorized library > :>AC=1 > :>RENT > :>Batch job > :>Modeset Mode=SUP > :>Key=4 > :>Storage obtained working storage SP=230, key=4 > :>ASC mode=Primary > :>Amode 31 > :>Rmode any > :>Extr routine is located in the same CSECT as the ATTACH with the same > AMODE > :>and RMODE > :> > :>* Invocation: > :> Lar1,wsdtflag > :> str1,wsdtflg@ > :> lar3,wsdtecb > :> lar4,csDt > :> lar5,extr > :>* > :> Lar1,wsdtflg@ > :> Mvc wsAttach,csAttach > :> Attach Eploc=(r4),x > :> Sm=SUPV,x > :> Svarea=YES, x > :> Key=PROP, x > :> Ecb=(r3), x > :> Etxr=(r5), + > :> Sf=(E,wsAttach) > :> > :>* read only macro models > :>csAttch Attach Eploc=,+ > :> Etxr=, + > :> Sm=SUPV,+ > :> Svarea=YES, + > :> Key=PROP, + > :> Ecb=, + > :> Sf=L > :> > :> > :>* RENT working storage (sp=230,key=4) > :>wsAttach dsxl(l'csAttch) > :> > :> > :>Thanks, > :>Sam > :> > :>-- > :>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 > > -- > Binyamin Dissen > http://www.dissensoftware.com > > Director, Dissen Software, Bar & Grill - Israel > > > Should you use the mailblocks package and expect a response from me, > you should preauthorize the dissensoftware.com domain. > > I very rarely bother responding to challenge/response systems, > especially those from irresponsible companies. > > -- > 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
Re: Attach RC=20
On Sat, Dec 4, 2010 at 5:37 PM, Bill Godfrey wrote: > On Sat, 4 Dec 2010 17:23:03 -0800, Sam Siegel wrote: > > >I'm getting a return code of 20 in RC when issuing an attach macro. RC=20 > >does not seem to be documented. Can anyone provide an explanation or > >assistance? Details listed here > > > >* Invocation: > > Lar1,wsdtflag > > str1,wsdtflg@ > > lar3,wsdtecb > > lar4,csDt > > lar5,extr > >* > > Lar1,wsdtflg@ > > Mvc wsAttach,csAttach > > Attach Eploc=(r4),x > > Sm=SUPV,x > > Svarea=YES, x > > Key=PROP, x > > Ecb=(r3), x > > Etxr=(r5), + > > Sf=(E,wsAttach) > > > >* read only macro models > >csAttch Attach Eploc=,+ > > Etxr=, + > > Sm=SUPV,+ > > Svarea=YES, + > > Key=PROP, + > > Ecb=, + > > Sf=L > > > > > >* RENT working storage (sp=230,key=4) > >wsAttach dsxl(l'csAttch) > > > > The value of l'csAttch is probably not the length of the whole expansion of > the > macro at csAttch. That affects the amount of storage you are defining, and > the length used in the Mvc. > Bill ... That was it ... I needed to use xl(L'csAttach) instead. It was a type of two similarly named variables. Thanks for spotting it. Cheers, Sam > > Bill > > -- > 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
Re: Attach RC=20
>wsAttach dsxl(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.
Peter Relson
z/OS Core Technology Design
--
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
Re: Attach RC=20
On Sat, 4 Dec 2010 17:23:03 -0800 Sam Siegel wrote: :>Hi List, :> :>I'm getting a return code of 20 in RC when issuing an attach macro. RC=20 :>does not seem to be documented. Can anyone provide an explanation or :>assistance? Details listed here X'14' = 20. Quite possibly due to the overlay mentioned by Bill Godfrey. :>APF authorized library :>AC=1 :>RENT :>Batch job :>Modeset Mode=SUP :>Key=4 :>Storage obtained working storage SP=230, key=4 :>ASC mode=Primary :>Amode 31 :>Rmode any :>Extr routine is located in the same CSECT as the ATTACH with the same AMODE :>and RMODE :> :>* Invocation: :> Lar1,wsdtflag :> str1,wsdtflg@ :> lar3,wsdtecb :> lar4,csDt :> lar5,extr :>* :> Lar1,wsdtflg@ :> Mvc wsAttach,csAttach :> Attach Eploc=(r4),x :> Sm=SUPV,x :> Svarea=YES, x :> Key=PROP, x :> Ecb=(r3), x :> Etxr=(r5), + :> Sf=(E,wsAttach) :> :>* read only macro models :>csAttch Attach Eploc=,+ :> Etxr=, + :> Sm=SUPV,+ :> Svarea=YES, + :> Key=PROP, + :> Ecb=, + :> Sf=L :> :> :>* RENT working storage (sp=230,key=4) :>wsAttach dsxl(l'csAttch) :> :> :>Thanks, :>Sam :> :>-- :>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 -- Binyamin Dissen http://www.dissensoftware.com Director, Dissen Software, Bar & Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- 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
Re: Attach RC=20
On Sat, 4 Dec 2010 17:23:03 -0800, Sam Siegel wrote: >I'm getting a return code of 20 in RC when issuing an attach macro. RC=20 >does not seem to be documented. Can anyone provide an explanation or >assistance? Details listed here > >* Invocation: > Lar1,wsdtflag > str1,wsdtflg@ > lar3,wsdtecb > lar4,csDt > lar5,extr >* > Lar1,wsdtflg@ > Mvc wsAttach,csAttach > Attach Eploc=(r4),x > Sm=SUPV,x > Svarea=YES, x > Key=PROP, x > Ecb=(r3), x > Etxr=(r5), + > Sf=(E,wsAttach) > >* read only macro models >csAttch Attach Eploc=,+ > Etxr=, + > Sm=SUPV,+ > Svarea=YES, + > Key=PROP, + > Ecb=, + > Sf=L > > >* RENT working storage (sp=230,key=4) >wsAttach dsxl(l'csAttch) > The value of l'csAttch is probably not the length of the whole expansion of the macro at csAttch. That affects the amount of storage you are defining, and the length used in the Mvc. Bill -- 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
Attach RC=20
Hi List, I'm getting a return code of 20 in RC when issuing an attach macro. RC=20 does not seem to be documented. Can anyone provide an explanation or assistance? Details listed here APF authorized library AC=1 RENT Batch job Modeset Mode=SUP Key=4 Storage obtained working storage SP=230, key=4 ASC mode=Primary Amode 31 Rmode any Extr routine is located in the same CSECT as the ATTACH with the same AMODE and RMODE * Invocation: Lar1,wsdtflag str1,wsdtflg@ lar3,wsdtecb lar4,csDt lar5,extr * Lar1,wsdtflg@ Mvc wsAttach,csAttach Attach Eploc=(r4),x Sm=SUPV,x Svarea=YES, x Key=PROP, x Ecb=(r3), x Etxr=(r5), + Sf=(E,wsAttach) * read only macro models csAttch Attach Eploc=,+ Etxr=, + Sm=SUPV,+ Svarea=YES, + Key=PROP, + Ecb=, + Sf=L * RENT working storage (sp=230,key=4) wsAttach dsxl(l'csAttch) Thanks, Sam -- 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
