Nope, I mis-recalled. He wants the first jobstep to read its own JCL. Simpler 
answers than SSI should work. 



CharlesSent from a mobile; please excuse the brevity.
-------- Original message --------From: Charles Mills <charl...@mcn.org> Date: 
8/16/18  11:46 AM  (GMT-06:00) To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: JES2 
Spool Data Set Browse (SDSB) sample 
Didn't the OP want to change the dataset?



CharlesSent from a mobile; please excuse the brevity.
-------- Original message --------From: Kirk Wolf <k...@wolf-associates.com> 
Date: 8/16/18  11:26 AM  (GMT-06:00) To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: 
JES2 Spool Data Set Browse (SDSB) sample 
On Thu, Aug 16, 2018 at 9:20 AM, Charles Mills <charl...@mcn.org> wrote:

> A short answer is check out the SSI (Subsystem Interface) manual. Not for
> the feint-hearted.
>

You don't need to use the SSI to read a spool data set, although you do
need a way to get the JES SSID and jobid (like from the current JSAB).

It is not too complicated: you just allocate it using SVC99 (and some
special purpose keys) and open the DD with either a DCB or ACB.
See Chapter 2 in "z/OS JES Application Programming" - JES Spool Data Set
Browse

Kirk Wolf
Dovetailed Technologies
http://dovetail.com

PS> You can use our free Co:Z Utilities in batch to read any spool file and
pass the data to your program.
For example:

//SHELL EXEC PGM=COZBATCH
//STDIN     DD *    # Run z/OS UNIX login shell

# get the 8 character jobid of the current job
jobid=$(echo $JES_SYS_CORR_CURRJOB | cut -c1-8)

fromdsn -jes.$jobid.jesjclin  |
    awk myreport.awk      # or your program that reads from /dev/stdin
//

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Reply via email to