Sorry it has taken so long to get back to this but I haven't had the time. I
still cannot get the code to undefine the DC macro. As you can see, after the
RELDEL macro is issued, the DC statement should use the assembler DC
instruction but it still invokes the RELDC macro. I don't know what I am doing
wrong:
Loc Object Code Addr1 Addr2 Stmt Source Statement
1 * Macro to redefine DC.
2 MACRO
3 &LABEL RELSTART ,
4 REALDC OPSYN DC
5 DC OPSYN RELDC
6 MEND
7 * Macro that replaces DC
8 MACRO
9 &LABEL RELDC ,
10 REALDC &SYSLIST(1)
11 MEND
12 * Macro to restore DC.
13 MACRO ,
14 &LABEL RELEND
15 RELDC OPSYN ,
16 MEND
18 * Test program for RELDC.
000000 00000 00009 19 TESTREL CSECT
20 RELSTART
21+REALDC OPSYN DC
22+DC OPSYN RELDC
23 REL1 DC C'Here'
000000 C8859985 24+ REALDC C'Here'
25 * Reset RELDC back to DC.
26 RELEND
27+RELDC OPSYN ,
28 UNREL1 DC C'There'
000004 E388859985 29+ REALDC C'There'
30 END
John
-----Original Message-----
From: IBM Mainframe Assembler List [mailto:[email protected]] On
Behalf Of John Gilmore
Sent: Saturday, January 19, 2013 8:32 AM
To: [email protected]
Subject: Re: OPSYN self execution
Jonathan,
You did miss something. The undefine or restore mode of
|<new> OPSYN
eliminates the effect of the redefinition
|<old> OPSYN <new>
John Gilmore, Ashland, MA 01721 - USA
