Thanks a lot for all this valuable information - I'm going to investigate the solution that Peter proposed... We have PSF 4.4.0 with z/OS 2.1 and are writing the exits in assembler.
Kind regards Markus Haselbach -----Original Message----- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Peter Hunkeler Sent: Monday, June 01, 2015 6:51 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: AW: Re: JES2 Exit 23 Looooong time ago (MVS/ESA 3.x in the late 80ies), I wrote JES2 and PSF exits to provide (part of) the accounting information as well as some other stuff to PSF. It was a combination of JES Exits 3 and 23, as well as PSF exits 1 and 2. At that time, I did not want to take the burden to extend any JES2 control blokc held on the spool, and since it was sufficient, I used some user fields in the JCT so save acoounting information in JES2 exit 3. Later, JES2 exit 23 aquired some storage (getmain) to store this data for PSF exits 1 and 2. PSF exit 2 (job end) was in charge of releasing the storage after use. This is from a quick refresh of my memory. Note also that I have not verified if there is an easier way nowadays. I'll send you some code snippets offlist. -- Peter Hunkeler Von: Lizette Koehler <stars...@mindspring.com> An: IBM-MAIN@LISTSERV.UA.EDU Betreff: Re: JES2 Exit 23 Datum: 31.05.15 07:49 I have not found any definitive info on how to extract the Accounting information on a JOB producing output and getting it to the APSUX01/APSUX01P exit. You might want to contact IBM directly via an SR for assistance. What version of PSF are you running? Are you using Assembler or C Language? Have you looked at the IEFJESCT to see what is available in the JES2 Communications Area? Lizette > -----Original Message----- > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] > On Behalf Of Lizette Koehler > Sent: Saturday, May 30, 2015 5:28 AM > To: IBM-MAIN@LISTSERV.UA.EDU > Subject: Re: JES2 Exit 23 > > If you are not aware, there is also a JES2 List that might be helpful as > well. > IBMMAIN or JES2 will be good. > > To join JES2 - use this URL > JES2 http://listserv.vt.edu/cgi-bin/wa?A0=jes2-l > > Have you looked at the JES2 EXITS manual? SA22-7534-13 z/OS JES2 > Installation Exits > > Lizette > > > > > -----Original Message----- > > From: IBM Mainframe Discussion List [mailto:IBM- > m...@listserv.ua.edu] > > On Behalf Of Markus Haselbach > > Sent: Saturday, May 30, 2015 12:38 AM > > To: IBM-MAIN@LISTSERV.UA.EDU > > Subject: JES2 Exit 23 > > > > Hallo, > > I?m for the first time involved with JES2 exits. The issue is > > printing with PSF. I have to write accounting information from the Job > > Card on the Job Header Page. This will be done in PSF Header Exit > > APSUX01. The question is how to get the information there. I would > > like to pass the accounting field by putting it in the JSPA in JES2 > > Exit 23 HASX23A. Can somebody give me a hint, how to get the Jobcard in > HASX23A, or an other solution? > > Best regards > > Markus Haselbach > > Credit-Suisse AG > ---------------------------------------------------------------------- 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
