Path: utzoo!utgpu!jarvis.csri.toronto.edu!mailrus!cwjcc!tut.cis.ohio-state.edu!ucbvax!HDETUD1.BITNET!RCOPROB
From: RCOPROB@HDETUD1.BITNET (Rob van Hoboken +31 15 78-3813)
Newsgroups: comp.lang.asm370
Subject: Re: job number
Message-ID: <8907180344.AA00508@jade.berkeley.edu>
Date: 17 Jul 89 19:54:07 GMT
Sender: daemon@ucbvax.BERKELEY.EDU
Reply-To: IBM 370 Assembly Programming Discussion List <ASM370%UCF1VM.bitnet@jade.berkeley.edu>
Distribution: inet
Organization: The Internet
Lines: 3

How about looking in the SSIB (subsystem Identification block) pointed to
by JSCBSSIB.  JSCB (Job Step Control Block) is anchored by TCBJSCB.
The field you're looking for is called SSIBJBID, the macro is called IEFJSSIB.