Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

JCL SET statement in ISPF Skeleton

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> TSO/ISPF
View previous topic :: :: View next topic  
Author Message
m1deh00

New User


Joined: 27 Jun 2006
Posts: 2

PostPosted: Sat Aug 09, 2008 6:51 pm    Post subject: JCL SET statement in ISPF Skeleton
Reply with quote

Hello,
I am converting existing JCL to be included by an ISPF skeleton.
The JCL uses JCL SET statements but the values are not
substituted correctly.

Following is a CLIST that sets variables
UPD and REG and FTINCLs a ISPF skeleton called TESTSET.

In TESTSET skeleton 1 (Example 1) , the values of DTE1, HLQ2, LVL2 are SET and used later in the skeleton.

In the Resulting JCL 1, the SET statements are correctly resolved
with UPD and REG but the &HLQ2, &LVL2, and &DTE1 in the dataset
name are NOT resolved.

In TESTSET skeleton 2, I doubled the ampersands (&&) in the
dataset name.

In the Resulting JCL 2, variables show their variable names like &HLQ2, &LVL2,
and &DTE1,

How can I take the resolved results of SET statements and use them later
in the skeleton?
I appreciate your assistance..
Thanks.
---------------------------------------------------------
CLIST (partial) - Variables UPD and REG are SET
SET UPD=R090727
SET REG=3
ISPEXEC FTOPEN TEMP
ISPEXEC FTINCL TESTSET
ISPEXEC FTCLOSE
ISPEXEC VGET (ZTEMPF)
ISPEXEC EDIT DATASET('&ZTEMPF'
----------------------------------------------------------
SKELETON TESTSET (Example 1)
// SET DTE1=&UPD
// SET HLQ2=&ZUSER..R&REG
// SET LVL2=VAL
//IEFBIT EXEC PGM=IEFBR14
//INDD01 DD DSN=&HLQ2..&LVL2.BKUP.GOODATA.DATA.R&DTE1,
// DISP=(MOD,DELETE,DELETE),
// SPACE=(TRK,0)
//*
------------------------------------------------------------
Resulting JCL 1 - Dataset Name Variables are NOT resolved
// SET DTE1=R090727
// SET HLQ2=XYZ.R3
// SET LVL2=VAL
//IEFBIT EXEC PGM=IEFBR14
//INDD01 DD DSN=.BKUP.GOODATA.DATA.R,
// DISP=(MOD,DELETE,DELETE),
// SPACE=(TRK,0)
//*
-------------------------------------------------------------
SKELETON TESTSET (Example same as example 1 but used 2 &s in
the dataset name
// SET DTE1=&UPD
// SET HLQ2=&ZUSER..R&REG
// SET LVL2=VAL
//IEFBIT EXEC PGM=IEFBR14
//INDD01 DD DSN=&&HLQ2..&&LVL2.BKUP.GOODATA.DATA.R&&DTE1,
// DISP=(MOD,DELETE,DELETE),
// SPACE=(TRK,0)
//*
------------------------------------------------------------
Resulting JCL 2 - Dataset Name Variables are NOT resolved
// SET DTE1=R090727
// SET HLQ2=XYZ.R3
// SET LVL2=VAL
//IEFBIT EXEC PGM=IEFBR14
//INDD01 DD DSN=&HLQ2..&LVL2.BKUP.GOODATA.DATA.R&DTE1,
// DISP=(MOD,DELETE,DELETE),
// SPACE=(TRK,0)
//*
-------------------------------------------------------------
Back to top
View user's profile Send private message

enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10255
Location: italy

PostPosted: Sat Aug 09, 2008 6:58 pm    Post subject: Reply to: JCL SET statement in ISPF Skeleton
Reply with quote

Code:
// SET DTE1=R090727
// SET HLQ2=XYZ.R3
// SET LVL2=VAL
//IEFBIT EXEC PGM=IEFBR14
//INDD01 DD DSN=&HLQ2..&LVL2.BKUP.GOODATA.DATA.R&DTE1,
// DISP=(MOD,DELETE,DELETE),
// SPACE=(TRK,0)
//*


Quote:
... the SET statements are correctly resolved
with UPD and REG but the &HLQ2, &LVL2, and &DTE1 in the dataset
name are NOT resolved.


thats right, &HLQ2, &LVL2, &DTE1 will be substituted at jcl conversion
there is no evidence of them being setup in the clist

if You want to substitute them Yourself there is no reason to use the
SET jcl statement

But, just curious, why are You still using CLIST when REXX is much easier ?
Back to top
View user's profile Send private message
m1deh00

New User


Joined: 27 Jun 2006
Posts: 2

PostPosted: Sun Aug 10, 2008 5:06 am    Post subject: Reply to: JCL SET statement in ISPF Skeleton
Reply with quote

Thank you very much for your answer.
I realized that I did not have a problem.
It was working OK.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> TSO/ISPF All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Customizing the ISPF HILITE Command Pedro TSO/ISPF 3 Fri Mar 03, 2017 11:49 pm
No new posts ISPF - How to come out of ISPF Panel parasmalik20 TSO/ISPF 5 Tue Feb 21, 2017 7:44 pm
No new posts ROUNDED Problem with COMPUTE statement shalem COBOL Programming 11 Thu Feb 09, 2017 8:16 pm
No new posts VALIDATE NULL VALUE IN DB2 CASE STATE... useit DB2 5 Thu Feb 09, 2017 4:34 pm
No new posts Design of ISPF panel prino TSO/ISPF 2 Wed Jan 25, 2017 10:31 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us