Thank you

Joe Reichman


On Wed, Jan 8, 2025 at 3:15 PM Binyamin Dissen <
[email protected]> wrote:

> JCTACTAD
>
> On Wed, 8 Jan 2025 12:48:55 -0500 Joseph Reichman
> <[email protected]> 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 <[email protected]>
> :>wrote:
> :>
> :>> I think you need the SWAREQ
> :>>
> :>>            SWAREQ FCODE=RL,EPA=SWEPAPTR,UNAUTH=YES
> :>>
> :>> -----Original Message-----
> :>> From: IBM Mainframe Discussion List [mailto:[email protected]]
> On
> :>> Behalf Of Joseph Reichman
> :>> Sent: Wednesday, January 8, 2025 5:01 PM
> :>> To: [email protected]
> :>> 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 [email protected] 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 [email protected] with the message: INFO IBM-MAIN
> :>>
> :>
> :>----------------------------------------------------------------------
> :>For IBM-MAIN subscribe / signoff / archive access instructions,
> :>send email to [email protected] with the message: INFO IBM-MAIN
>
> --
> Binyamin Dissen <[email protected]>
> http://www.dissensoftware.com
>
> Director, Dissen Software, Bar & Grill - Israel
>
> ----------------------------------------------------------------------
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to [email protected] with the message: INFO IBM-MAIN
>

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to