Passing values to the SYSIN card



JES, JES2, JCL utilities, IDCAMS, Compile & Run JCLs, PROCs etc...

Passing values to the SYSIN card

Postby nikesh_rai » Sun Jan 20, 2013 12:50 am

Hi,

Is it possible to pass value to the SYSIN card using some variable. for example I have set a value say

//     SET  STAR01=*


and I want to use this variable in sysin card with any condintion like:

//SYSIN    DD=*
    SORT FIELDS=COPY
    OMIT COND=(7,1,CH,EQ,STAR01)


I know, this code will not work, but can anyone suggest me how can i achieve it.
Thanks
Nikesh Rai
nikesh_rai
 
Posts: 192
Joined: Tue Oct 18, 2011 1:27 am
Has thanked: 17 times
Been thanked: 0 time

Re: Passing values to the SYSIN card

 

Re: Passing values to the SYSIN card

Postby steve-myers » Sun Jan 20, 2013 1:33 am

One word: NO.

You could write a utility that would provide JCL symbols through PARM data and apply the symbols to input data and write the completed data to a data set that is subsequently used as SYSIN data for another step. I, personally, do not have such a utility though I could write it if there was a requirement. For example -
//          SET X='SOME DATA'
//A        EXEC PGM=JCLSYM,PARM='Y=&X'
//INPUT     DD  *
Y IS &Y
//OUTPUT    DD  DISP=(,PASS),UNIT=SYSDA,SPACE=(TRK,1)
//B        EXEC PGM=APGM
//SYSIN     DD  DISP=OLD,DELETE),DSN=*.A.OUTPUT
steve-myers
Global moderator
 
Posts: 1885
Joined: Thu Jun 03, 2010 6:21 pm
Has thanked: 4 times
Been thanked: 197 times

Re: Passing values to the SYSIN card

Postby nikesh_rai » Sun Jan 20, 2013 1:44 am

thanks Steve.. :)
I will check this code tomorrow morning and will let you know the results..
Thanks
Nikesh Rai
nikesh_rai
 
Posts: 192
Joined: Tue Oct 18, 2011 1:27 am
Has thanked: 17 times
Been thanked: 0 time

Re: Passing values to the SYSIN card

Postby BillyBoyo » Sun Jan 20, 2013 2:21 am

If you have z/OS 1.13 you may be able to do include paramaterisation of DD * data.

If you have DFSORT you can achieve what you want by using JPn to pass named information from PARM and treat it as a "symbol" which you can use in your DFSORT control cards.
BillyBoyo
Global moderator
 
Posts: 3804
Joined: Tue Jan 25, 2011 12:02 am
Has thanked: 22 times
Been thanked: 264 times


Return to JCL

 


  • Related topics
    Replies
    Views
    Last post