I don't understand. The USING is associated with the location in the source where you code it, not with the location in the source where you define the data. The general pattern is
USINGs some code DROPs .. USINGs other code DROPs Could you shoe enough of your code to put things in context? -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 עַם יִשְׂרָאֵל חַי ________________________________________ From: IBM Mainframe Assembler List <[email protected]> on behalf of Dave Clark <[email protected]> Sent: Wednesday, November 8, 2023 3:33 PM To: [email protected] Subject: Re: Internal Exit Routine Handling "IBM Mainframe Assembler List" <[email protected]> wrote on 11/08/2023 03:14:01 PM: > Read up on the DROP pseudo-op. I've used it before. But I can't use it in this case because, as I said: > But since I am sharing data and routines, in my base program, > then the exit routines need addressability to those areas as well. Which means, my exit routines need to be able to execute the following statements using the code base for the prior program area. These routines exist in lower storage not covered by the exit routine's code base. BAS R5,SAYIT ... BAS R15,REG2ZON3 ... BAS R2,GETVAR ... BAS R5,SETVAR Sincerely, Dave Clark -- int.ext: 91078 direct: (937) 531-6378 home: (937) 751-3300 Winsupply Group Services 3110 Kettering Boulevard Dayton, Ohio 45439 USA (937) 294-5331 ********************************************************************************************* This email message and any attachments is for use only by the named addressee(s) and may contain confidential, privileged and/or proprietary information. If you have received this message in error, please immediately notify the sender and delete and destroy the message and all copies. All unauthorized direct or indirect use or disclosure of this message is strictly prohibited. No right to confidentiality or privilege is waived or lost by any error in transmission. *********************************************************************************************
