I fail to understand why you are placing the macro in the middle of your
workarea. I would typically place all mapping macroes in a  block at the end
of the program (though others prefer the top).  

Do you do the same with other mapping macroes that generate DSECTs?

What do you expect this to give you?


On Sun, 21 May 2017 13:57:27 +0300 IronSphere by SecuriTeam Software
<[email protected]> wrote:

:>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" <[email protected]>
:>???:
:>
:>> On Sun, 21 May 2017 10:22:49 +0300 IronSphere by SecuriTeam Software
:>> <[email protected]> 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 <[email protected]>
:>> 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 [email protected] with the message: INFO IBM-MAIN
:>>
:>
:>----------------------------------------------------------------------
:>For IBM-MAIN subscribe / signoff / archive access instructions,
:>send email to [email protected] with the message: INFO IBM-MAIN

--
Binyamin Dissen <[email protected]>
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 [email protected] with the message: INFO IBM-MAIN

Reply via email to