Ray Mullins wrote:
Steve, welcome to MF=L/E land.
Note - the following is really simple, and merely a starting point.
What you really should do, IMHO, in this situation, is in a constant area,
code
#OPEN OPEN (,INPUT),MF=L
#OPEN_L EQU *-#OPEN
Then in your DSECT area, code
@OPEN DS XL(#OPEN_L)
And in your program code
MVC @OPEN,#OPEN
OPEN ((10)),MF=(E,@OPEN)
It's good practice to generate an MF=L list in your constant area so you can
define the MF=E area properly. It's not so important for OPEN, but for
things like ATTACH that have a lot of bits set, it's a lifesaver.
Later,
Ray
Well, I do that with most macros (or at least a similar
approach), and in fact I has something like that in my
code, but not quite the same, obviously.
Anyway, thanks for the note.
Kind regards,
-Steve Comstock
The Trainer's Friend, Inc.
303-393-8716
http://www.trainersfriend.com
-- to be included in our opt-in list of announcements of
-- new courses and other products and services from The
-- Trainer's Friend, send an email to [EMAIL PROTECTED]
----------------------------------------------------------------------
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
