I don't see how this might be possible, but no harm in asking. I am writing a
simple macro which can be used to insert an appropriate SETOPT line to set the
link/bind REUS attribute:
MACRO ,
&LABEL REUS &REUSOPT
AIF ('&REUSOPT' EQ 'RENT').OPTRENT
AIF ('&REUSOPT' EQ 'NONE').SETREUS
AIF ('&REUSOPT' EQ 'SERIAL').SETREUS
AIF ('&REUSOPT' EQ 'REFR').OPTRENT
MNOTE 8,'INVALID PARAMETER #1'
MNOTE 0,'VALID OPTIONS ARE SAME AS BINDER REUS OPTIONS:'
MNOTE 0,' NONE, SERIAL, RENT, REFR'
AGO .EXIT
.OPTRENT ANOP ,
* something here to turn on ASM RENT option...
.SETREUS PUNCH ' SETOPT PARM(REUS=&REUSOPT)'
.EXIT MEXIT ,
MEND ,
Ideally after the .OPTRENT label there would be something that would also set
the assembler RENT option. But since a *PROCESS option must occur in the
source before any other source statements (other than ICTL) I don't see how I
can do it. Any thoughts?
Thanks,
Frank
The information contained in this electronic communication and any document
attached hereto or transmitted herewith is confidential and intended for the
exclusive use of the individual or entity named above. If the reader of this
message is not the intended recipient or the employee or agent responsible for
delivering it to the intended recipient, you are hereby notified that any
examination, use, dissemination, distribution or copying of this communication
or any part thereof is strictly prohibited. If you have received this
communication in error, please immediately notify the sender by reply e-mail
and destroy this communication. Thank you.
