Portal | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Forum Index
 
Register
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
it is possible output a SET value from previous step

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

New User


Joined: 08 Mar 2016
Posts: 13
Location: Taiwan

PostPosted: Fri Sep 22, 2017 7:08 am    Post subject: it is possible output a SET value from previous step
Reply with quote

for example

This is a normal sort step

//SET1 MM=201708
//*
//SORT1 EXEC PGM=SORT
//STEPLIB DD DSN=SYS1.LINKLIB,DISP=SHR
//SORTLIB DD DSN=SORT.SORTLIB,DISP=SHR
//SYSOUT DD SYSOUT=*
//SORTIN DD DSN=PSNP.FTXN&MM..PS,DISP=SHR
//SORTOUT DD DSN=....
//SYSIN DD *
SORT FIELDS=COPY
..........


Is it possible to output a dynamic SET value from previous step
or anyway that I can do this ??? thanks

//PROG1 EXEC PGM=PROG1
//....
//....
//*
//SORT1 EXEC PGM=SORT
//STEPLIB DD DSN=SYS1.LINKLIB,DISP=SHR
//SORTLIB DD DSN=SORT.SORTLIB,DISP=SHR
//SYSOUT DD SYSOUT=*
//SORTIN DD DSN=PSNP.FTXN&MM..PS,DISP=SHR
//SORTOUT DD DSN=....
//SYSIN DD *
SORT FIELDS=COPY
..........
Back to top
View user's profile Send private message

magesh23586

Active User


Joined: 06 Jul 2009
Posts: 213
Location: Chennai

PostPosted: Fri Sep 22, 2017 8:05 am    Post subject: Reply to: it is possible output a SET value from previous step
Reply with quote

I Couldn't understand your question.
Back to top
View user's profile Send private message
steve-myers

Active Member


Joined: 30 Nov 2013
Posts: 859
Location: The Universe

PostPosted: Fri Sep 22, 2017 8:49 am    Post subject:
Reply with quote

The question, as posed, in meaningless. Programs do not and can not set JCL symbols.

It is perfectly possible, and quite common, for a program to store data in a data set that is subsequently analyzed (and, perhaps) printed in a subsequent step.
Code:
//A       EXEC PGM=IEBGENER
//SYSPRINT DD  SYSOUT=*
//SYSUT1   DD  *
HELLO WORLD
//SYSUT2   DD  DISP=(,PASS),UNIT=SYSDA,SPACE=(80,(1,1))
//SYSIN    DD  DUMMY
//B       EXEC PGM=IEBGENER
//SYSPRINT DD  SYSOUT=*
//SYSUT1   DD  DISP=OLD,DSN=*.A.SYSUT2
//SYSUT2   DD  SYSOUT=*
//SYSIN    DD  DUMMY
Step A copies the contents of the data set specified by the SYSUT1 DD statement to the data set specified by the SYSUT2 DD statement. Step B effectively prints the data set.
Back to top
View user's profile Send private message
sergeyken

Active Member


Joined: 29 Apr 2008
Posts: 820
Location: Maryland

PostPosted: Fri Sep 22, 2017 8:13 pm    Post subject: Re: it is possible output a SET value from previous step
Reply with quote

Martylin wrote:
Is it possible to output a dynamic SET value from previous step
or anyway that I can do this ??? thanks

There is no such common thing as "dynamic SET value" in neither JCL, not VSAM.
This looks like your own invented terminology.

If you would be so kind to explain your terminology to others then maybe someone could give you an answer.
Back to top
View user's profile Send private message
Rohit Umarjikar

Senior Member


Joined: 21 Sep 2010
Posts: 2463
Location: NY,USA

PostPosted: Fri Sep 22, 2017 8:57 pm    Post subject:
Reply with quote

Google "DFSORT Symbols".
Back to top
View user's profile Send private message
Nic Clouston

Global Moderator


Joined: 10 May 2007
Posts: 2400
Location: Hampshire, UK

PostPosted: Sat Sep 23, 2017 4:35 pm    Post subject:
Reply with quote

If you want to do what I think you want then the answer is no. Your submitted jcl is 'frozen' at the time of submission and cannot be modified during execution.
As previously stated, you can have a program create JCL which can be used by a subsequent job submission.
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8796
Location: Welsh Wales

PostPosted: Fri Dec 01, 2017 2:53 pm    Post subject:
Reply with quote

Maybe a little late to the party, but at least it is a topic from this year icon_biggrin.gif

I assume that you know the logic involved for defining the "dynamic" value.

I have in the past used a combination of JCLLIB and INCLUDE statements to sort of do this.

A job PRIOR to the one that you wish to execute would create the required code into a PDS member. This is a separate job, not a previous step !!

Your job would then have something like
Code:

//         JCLLIB ORDER=(PDS name)
//MYCODE   INCLUDE MEMBER=member
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 DB2 - row_number function - Need 1st ... Q5P418 DB2 5 Wed Sep 09, 2020 8:35 am
No new posts Add a step counter in a stack ? rodferrn CLIST & REXX 23 Fri Jul 17, 2020 7:00 am
No new posts Write 9(07) comp-3 data into output file clearskynot DFSORT/ICETOOL 4 Thu Apr 16, 2020 11:00 pm
No new posts Please help - SORT with SUM fields an... clearskynot DFSORT/ICETOOL 6 Thu Apr 09, 2020 11:01 am
No new posts DFSORT Output file order query A_programmers DFSORT/ICETOOL 2 Thu Mar 26, 2020 11:59 pm

Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us