Thank you Joe Reichman
On Wed, Jan 8, 2025 at 3:15 PM Binyamin Dissen < 00000662573e2c3a-dmarc-requ...@listserv.ua.edu> wrote: > JCTACTAD > > On Wed, 8 Jan 2025 12:48:55 -0500 Joseph Reichman > <000005812645a43c-dmarc-requ...@listserv.ua.edu> wrote: > > :>Know that but where do get the 3 byte SVA for that area > :> > :>Joe Reichman > :> > :> > :>On Wed, Jan 8, 2025 at 12:38?PM Steve Austin <steve.aus...@macro4.com> > :>wrote: > :> > :>> I think you need the SWAREQ > :>> > :>> SWAREQ FCODE=RL,EPA=SWEPAPTR,UNAUTH=YES > :>> > :>> -----Original Message----- > :>> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] > On > :>> Behalf Of Joseph Reichman > :>> Sent: Wednesday, January 8, 2025 5:01 PM > :>> To: IBM-MAIN@LISTSERV.UA.EDU > :>> Subject: Job Accounting info > :>> > :>> Hi > :>> > :>> I am trying to get job accounting / programmer field (m running > problems > :>> state ) > :>> > :>> > :>> I get PSATOLD-TCBJSTCB > :>> > :>> I then do ICM RX,B'0111',JSCBJCTA > :>> > :>> And use the SVA -> JSCBJCTA to get jct BLOCK > :>> > :>> > :>> But I am looking for data in MACRO IEFAJCTB at this label > :>> > :>> ***************************************************************** 20001 > :>> > :>> ** ** > :>> > :>> ** ACCOUNT CONTROL TABLE ** > :>> > :>> ** ** > :>> > :>> *********************************************************************** > :>> > :>> IEFAACTB DS 0D @ZA44001 > :>> > :>> ACTDSKAD DS CL3 SVA OF THIS ACT > :>> > :>> ACTIDENT DS CL1 TABLE ID ACT = 16 > :>> > :>> > :>> Would anyone know the pointer of SVA > :>> > :>> > :>> Thanks > :>> > :>> ---------------------------------------------------------------------- > :>> For IBM-MAIN subscribe / signoff / archive access instructions, send > email > :>> to lists...@listserv.ua.edu with the message: INFO IBM-MAIN > :>> > :>> -- > :>> This e-mail message has been scanned and cleared by Google Message > :>> Security > :>> and the UNICOM Global security systems. This message is for the named > :>> person's use only. If you receive this message in error, please delete > it > :>> and notify the sender. > :>> > :>> ---------------------------------------------------------------------- > :>> 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 > > -- > Binyamin Dissen <bdis...@dissensoftware.com> > http://www.dissensoftware.com > > Director, Dissen Software, Bar & Grill - Israel > > ---------------------------------------------------------------------- > 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
