Binyamin, I have done this by definning the text units in non dynamic area and copying the content into dynamic area own dsect. This was not my problem. I just had to resume addressing as John proposed.
Thanks. ITschak בתאריך 21 במאי 2017 13:52, "Binyamin Dissen" <bdis...@dissensoftware.com> כתב: > On Sun, 21 May 2017 10:22:49 +0300 IronSphere by SecuriTeam Software > <imugz...@gmail.com> wrote: > > :>It look like I haven't done that for a while... anyway, I am writing an > :>assembler, reentrent, program that performs dynamic allocation, open, > read, > :>close, dynamic WTO, etc. It work fine as a non reentrent program, but > when > :>I convert to reentrent code, I am loosing addressability for some of my > :>dsects. it mostly depend where I position the IEFZB4D0 macro that defines > :>the dynalloc dsects. for example: > :>DYNAREA DSECT > :> AAA DS .. > :>BBB DS .. > :>? IEFZB4D0 > :>DYNMSG WTO ...,MF=L > :> > :>In this case I am loosing addressability to DYNMSG. What am I missing? I > :>want to perform a single getmain and not two (one for IEFZB4D0 and one > for > :>the rest). > > As it includes multiple DSECTS, positioning the macro in your workarea does > not make much sense. > > You have the pointer, the S99RB, multiple S99TUPL and S99TUNIT entries and > possibly a S99RBX. You must define each of these as separate areas. > > -- > Binyamin Dissen <bdis...@dissensoftware.com> > 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...@listserv.ua.edu with the message: INFO IBM-MAIN > ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
