|
View previous topic :: View next topic
|
| Author |
Message |
anjali.bisht
New User
Joined: 09 Aug 2007
Posts: 7
Location: India
|
|
|
|
First step of my job i am executing a REXX program to create a PDS member (includes few JCL steps) which i would like to use in later half of my JCL.
I am using INCLUDE MEMBER but its not working as my JCL processes all the includes before it executes the REXX. What alternatives can i use? I am refrained from modifying or creating a new JCL. Please advise. |
|
| Back to top |
|
 |
Garry Carroll
Senior Member
Joined: 08 May 2006
Posts: 1216
Location: Dublin, Ireland
|
|
|
|
What you are trying to do is impossible.  All the JCL is read in before your REXX program runs and cannot be added-to. You could get the REXX to submit the JCL generated in the PDS member - but you say you can't create a new job.
Garry |
|
| Back to top |
|
|
anjali.bisht
New User
Joined: 09 Aug 2007
Posts: 7
Location: India
|
|
|
|
| Thanks Garry, now that its for sure that there are no other alternatives i will think about submitting job through rexx. |
|
| Back to top |
|
|
Rohit Umarjikar
Global Moderator
Joined: 21 Sep 2010
Posts: 3109
Location: NYC,USA
|
|
|
|
Why don't you wrap a IF then endif around this include with RC from your rexx routine? I think that should make a trick for you.
I don't mean to go against Garry's answer as he is right but give a try. I know JES load all includes as a first step .
| Quote: |
I am refrained from modifying or creating a new JCL. Please advise. |
Wow! Dead end. |
|
| Back to top |
|
|
Garry Carroll
Senior Member
Joined: 08 May 2006
Posts: 1216
Location: Dublin, Ireland
|
|
|
|
| Quote: |
| Why don't you wrap a IF then endif around this include with RC from your rexx routine? I think that should make a trick for you. |
... and how, exactly, at JCL input time, is JES going to predict the contents of the as-yet non-existent PDS include member that will be created by the REXX procedure..... ?? That'd be some trick, alright!!
Garry |
|
| Back to top |
|
|
Willy Jensen
Active Member
Joined: 01 Sep 2015
Posts: 772
Location: Denmark
|
|
|
|
Garry is right, this can't be done. But writing the JCL to an internal reader is a piece of cake, actually more or less the same process you would use to write to that member.
is case you don't remember the syntax:
//DDNAME DD SYSOUT=(A,INTRDR)
and in your REXX pgm:
address tso "execio" queued() "diskw ddname (finis)" |
|
| Back to top |
|
|
|
|
