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
 

 

How to put a translate variable in the job from a dsn

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
View previous topic :: :: View next topic  
Author Message
vasco ferreira

New User


Joined: 12 Jul 2008
Posts: 32
Location: sintra - portugal

PostPosted: Wed Nov 03, 2010 2:19 pm    Post subject: How to put a translate variable in the job from a dsn
Reply with quote

Propose: When the file “DISCIN” has data (step1) it must appear in the variable &CCID (step2).
Is it possible make everything in the same job?


//* ______ STEP1 ________
//CHECKIN EXEC PGM=PTESTFIC
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//DISCIN DD DISP=SHR,DSN=DESGR1.WORK.INPUT.CCID
//*
//* _______ STEP2 _________
//CER EXEC PGM=NDVRC1,PARM='C1BM3000',REGION=32M
//INCLUDE INCLUDE MEMBER=##STEP
//INCLUDE INCLUDE MEMBER=##LSERV
//INCLUDE INCLUDE MEMBER=##API
//INCLUDE INCLUDE MEMBER=##SIBS
//INCLUDE INCLUDE MEMBER=##DIAGS
//SYSPRINT DD SYSOUT=*
//SORTWK01 DD UNIT=SYSDA,SPACE=(CYL,(1,2))
//SORTWK02 DD UNIT=SYSDA,SPACE=(CYL,(1,2))
//SORTWK03 DD UNIT=SYSDA,SPACE=(CYL,(1,2))
//C1TPDD01 DD UNIT=SYSDA,SPACE=(CYL,5),
// DCB=(RECFM=VB,LRECL=260,BLKSIZE=6160)
//C1TPDD02 DD UNIT=SYSDA,SPACE=(CYL,5),
// DCB=(RECFM=VB,LRECL=260,BLKSIZE=6160)
//C1MSGS1 DD SYSOUT=*
//C1MSGS2 DD SYSOUT=*
//C1PRINT DD SYSOUT=*,DCB=(RECFM=FBA,LRECL=121,BLKSIZE=6171)
//SYSUDUMP DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//RUNIDS DD DUMMY
//CCID DD DUMMY
//MYSUBMIT DD SYSOUT=(1,INTRDR)
//BSTIPT01 DD *
LIST ELE '*'
FRO ENV 'CER' STA '*' SYS '*' SUB '*' TYP '*'
TO DSN 'DESGR1.TEMP.LISTA.CCID.CER'
WHERE CCID EQ '&CCID'
.
//*
Back to top
View user's profile Send private message

Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 7931
Location: Bellevue, IA

PostPosted: Wed Nov 03, 2010 5:03 pm    Post subject:
Reply with quote

Your first problem is that symbolic symbols are resolved in JCL -- they cannot be resolved in an input data set as you have specified.

Your second problem is that once JCL goes through the JES converter / interpreter, it cannot be changed. So you cannot read a data set and use the values read as symbolic parameters later on in the same job stream.

You need a program (or system utility) to read the file, generate the desired JCL (including the input values for //BSTIPT01 DD * ) and submit the JCL into the internal reader.
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 -> JCL & VSAM All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Format to pipe delimited with variabl... pshongal SYNCSORT 6 Wed Sep 14, 2016 2:48 pm
No new posts Variable for cursor names ravikumar15 DB2 5 Sun Jul 17, 2016 7:08 am
No new posts OPC JCL Variable passion_sujesh IBM Tools 5 Fri Jul 01, 2016 4:21 am
No new posts JOINKEYs and Variable files migusd SYNCSORT 8 Fri Jun 17, 2016 3:16 am
No new posts File Manager with Variable Length File ahabib IBM Tools 10 Thu Mar 31, 2016 11:00 pm


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