In the job fragment:
//*
// EXPORT SYMLIST=*
//P PROC
//GEN EXEC PGM=IEBGENER
//SYSPRINT DD SYSOUT=(,)
//SYSIN DD DUMMY
//SYSUT2 DD SYSOUT=(,)
//SYSUT1 DD *,SYMBOLS=JCLONLY
GENER step;
with V2=&V2..
//P PEND
//*
// SET V2=WOMBAT *************************************
//WOMBAT1 EXEC P
//WOMBAT2 EXEC P
// SET V2=XYZZY *************************************
//XYZZY1 EXEC P
//XYZZY2 EXEC P
//*
Dumping the SYSUT2s shows:
user@OS/390.24.00: head *.GEN/*SYSUT2*
==> WOMBAT1.GEN/104.SYSUT2.text <==
GENER step;
with V2=WOMBAT.
==> WOMBAT2.GEN/106.SYSUT2.text <==
GENER step;
with V2=XYZZY. ?!?!?!?!?!?!
==> XYZZY1.GEN/108.SYSUT2.text <==
GENER step;
with V2=XYZZY.
==> XYZZY2.GEN/110.SYSUT2.text <==
GENER step;
with V2=XYZZY.
user@OS/390.24.00:
Why, in step WOMBAT2, is V2 substituted as XYZZY? It should still
have the value WOMBAT at that point.
-- gil
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
