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
