Hi Joe,
IMO, this should work, if you do a PRLG 30 call before the EPLG call
in the open code.
Could you please post the whole relevant part of the code
(complete macro definitions and the snippets of the
open code in the correct sequence), so that we can take
a look at it?
Another suggestion: please make sure that there is no reference
of &DSASUM at another place, which may reset its value to the empty string.
Kind regards
Bernd
Am 18.11.2019 um 00:00 schrieb Joe Reichman:
I have a prolog and eplog macros as exit and entry to program
The prolog is coded as such
MACRO
&NAME PRLG &DSA
GBLC &DSANUM
&DSANUM SETC '&DSA'
When used in the prolog
As such
AIF ('&DSANUM' EQ '').NODSA
AH R11,=H'&DSANUM'
.NODSA ANOP
I get the value I coded e.g. PRLG 30
GNERATES AH R11,=H'30'
However when I used it in the EIPLOG it fails to retain its value and is
null
MACRO
EPLG
LCLC &CURCSECT
GBLC &DSANUM
As this code in the eplog is skipped
WS_DSECT DSECT
DS 18FD
NAB DS AD
AIF ('&DSANUM' EQ '').NODSA
DS CL&DSANUM
.NODSA ANOP
