MVSFORUMS.com Forum Index MVSFORUMS.com
A Community of and for MVS Professionals
 
 FAQFAQ   SearchSearch   Quick Manuals   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

Override Sysin Statements of File-aid in JCL

 
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Utilities
View previous topic :: View next topic  
Author Message
ldushkin
Beginner


Joined: 05 Apr 2006
Posts: 56
Topics: 20
PostPosted: Thu Apr 13, 2006 9:16 pm    Post subject: Override Sysin Statements of File-aid in JCL Reply with quote
Hi all,

I used FILEAID in JCL, and I need to change some characters in control card, would like to use a PROC and override.
Can I use override in control card?
Code:

//STEP0100 EXEC PGM=FILEAID                   
//SYSPRINT DD SYSOUT=*                         
//DD01     DD DSN=D2HG.JCL,                   
//            DISP=SHR                         
//SYSIN    DD  *                               
$$DD01 UPDATE MEMBERS=MCS#5T60,               
              EDITALL=(1,0,C'XXX',C'T60')     
$$DD01 UPDATE MEMBERS=MCS#5T60,               
              EDITALL=(1,0,C'TODW',C'TV5B')   
$$DD01 UPDATE MEMBERS=MCS#5T60,               
              EDITALL=(1,0,C'G0001V',C'TV5B')

I have to change T60; TV5B, TV5B
Back to top
View user's profile Send private message
ranga_subham
Intermediate


Joined: 31 Jan 2006
Posts: 255
Topics: 72
PostPosted: Thu Apr 13, 2006 11:08 pm    Post subject: Reply with quote
First of all, you cannot use instream data inside a PROC.
_________________
Ranga
*****
None of us is as smart as all of us - Ken Blanchard
Back to top
View user's profile Send private message
kolusu
Site Admin
Site Admin


Joined: 26 Nov 2002
Posts: 12367
Topics: 75
Location: San Jose
PostPosted: Fri Apr 14, 2006 5:24 am    Post subject: Reply with quote
ldushkin,

As ranga mentioned you cannot code instream data in a proc. you need to put them in a 80 byte dataset and then you can override that dataset from JCl.

ex:

Code:

//MYPROC   PROC
//*
//STEP0100 EXEC PGM=FILEAID                   
//SYSPRINT DD SYSOUT=*                         
//DD01     DD DSN=D2HG.JCL,                   
//            DISP=SHR                         
//SYSIN    DD DSN=80 BYTE DATASET
//            DISP=SHR
//*



Your 80 byte DATASET will contain this

Code:

$$DD01 UPDATE MEMBERS=MCS#5T60,               
              EDITALL=(1,0,C'XXX',C'T60')     
$$DD01 UPDATE MEMBERS=MCS#5T60,               
              EDITALL=(1,0,C'TODW',C'TV5B')   
$$DD01 UPDATE MEMBERS=MCS#5T60,               
              EDITALL=(1,0,C'G0001V',C'TV5B')


If you want to override the sysin statements in your JCL

Code:

//MYJCL EXEC MYPROC
//STEP0100.SYSIN DD *
$$DD01 UPDATE MEMBERS=MCS#5T60,               
              EDITALL=(1,0,C'XXX',C'XXX')     
$$DD01 UPDATE MEMBERS=MCS#5T60,               
              EDITALL=(1,0,C'TODW',C'YYY')   
$$DD01 UPDATE MEMBERS=MCS#5T60,               
              EDITALL=(1,0,C'G0001V',C'ZZZZ')


Hope this helps...

Cheers

Kolusu
_________________
Kolusu - DFSORT Development Team (IBM)
DFSORT is on the Web at:
www.ibm.com/storage/dfsort

www.linkedin.com/in/kolusu
Back to top
View user's profile Send private message Send e-mail Visit poster's website
ldushkin
Beginner


Joined: 05 Apr 2006
Posts: 56
Topics: 20
PostPosted: Sat Apr 15, 2006 8:24 am    Post subject: Reply with quote
Thank you very much to all
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Utilities All times are GMT - 5 Hours
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


MVSFORUMS
Powered by phpBB © 2001, 2005 phpBB Group