View previous topic :: View next topic
|
Author |
Message |
Prasanna SR
New User
Joined: 13 Jul 2010 Posts: 6 Location: Mexico City
|
|
|
|
Hi,
I want to use the OPC variable (from OPC tables) in the JCL as a Variable. I tried the below one but the substitution is not working correctly.
I have the variable FECHUGF0 value as 1010 in table CSOLOTABLE.
But JCL substitution is trying to catalog the file as MDMX017.BS100.PURGEMA.FFECHUGF0
//*
//*%OPC SCAN
//*%OPC SEARCH NAME=(CSOLOTABLE)
//*%OPC SETVAR FECHUGF0=(YYMM)
// SET FDATE=FECHUGF0
//*
//STEP0020 EXEC PGM=IEBGENER
//SYSUT1 DD DISP=SHR,DSN=MDMX017.BS100.PURGEMA
//SYSUT2 DD DSN=MDMX017.BS100.PURGEMA.F&FDATE,
// DISP=(NEW,CATLG,DELETE),
// DCB=*.SYSUT1,SPACE=(CYL,(100,100),RLSE)
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//*
Can someone help?
Thanks
Prasanna |
|
Back to top |
|
|
gcicchet
Senior Member
Joined: 28 Jul 2006 Posts: 1702 Location: Australia
|
|
|
|
Hi,
try changing to
Code: |
// SET FDATE=%FECHUGF0 |
Gerry |
|
Back to top |
|
|
Prasanna SR
New User
Joined: 13 Jul 2010 Posts: 6 Location: Mexico City
|
|
|
|
Tried this and it worked.
//*%OPC SCAN
//*%OPC SEARCH NAME=(CSOLOTABLE)
// SET FDATE=&FECHUGF0
//*
//STEP0020 EXEC PGM=IEBGENER
//SYSUT1 DD DISP=SHR,DSN=M&AMB.MX017.BS100.PURGEMA
//SYSUT2 DD DSN=M&AMB.MX017.BS100.PURGEMA.F&FDATE,
// DISP=(NEW,CATLG,DELETE),
// DCB=*.SYSUT1,SPACE=(CYL,(100,100),RLSE)
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//* |
|
Back to top |
|
|
|