Found this in JES2 Data Areas Volume 1: Chapter 106. $IRIS Information $IRIS Programming Interface Information $IRIS is a programming interface. $IRIS Heading Information Common Name: IRIS Macro ID: $IRIS DSECT Name: IRIS Owning Component: JES2 (SC1BH) Eye-Catcher ID: IRIS Offset: IRSEYE-IRS Length: L’IRSEYE Storage Attributes: Subpool: 241 Key: 1 Residency: Virtual storage is in 31 bit storage, real can be in 64 bit storage, in common storage Size: See IRISLEN Created by: HASPIRMA during JES2 initialization processing Pointed to by: CCTBATMD field of the HCCT data area CCTIRSMD field of the HCCT data area CCTSTCMD field of the HCCT data area CCTTSOMD field of the HCCT data area Serialization: None required Function: This area maps the data area used to store defaults for internal readers (as set from INTRDR initialization statement). One exists for each type of internal reader (in ECSA) even though the initialization statement only applies to batch internal readers.
I'm no longer in a JES2 shop, so I can't easily play. On Mon, Dec 7, 2015 at 9:19 AM, Gabor Hoffer <gabor.hof...@gmail.com> wrote: > Yes, it's the output from $DINTRDR, but I want to get it directly. > I'm wondering, if it can be inquired by SSI call or extracted from mvs/jes > data areas. > > On Mon, Dec 7, 2015 at 3:57 PM, Paul Gilmartin < > 0000000433f07816-dmarc-requ...@listserv.ua.edu> wrote: > > > On Mon, 7 Dec 2015 15:45:46 +0100, Lucas Rosalen wrote: > > > > >Looks like $DINTRDR would suffice or $DINTRDR,C. Check this out: > > > > > > https://www-01.ibm.com/support/knowledgecenter/mobile/#!/SSLTBW_2.1.0/com.ibm.zos.v2r1.hasa200/dintrdr.htm > > > > > How do you code that in ASM or C (OP's question). I suppose MGCR in ASM > > (Is MGR now specified to support other than START or REPLY?) How do > > you capture the output? > > > > > > >On Dec 7, 2015 15:33, "Gabor Hoffer" wrote: > > > > > >> How can I inquire the internal reader characteristics from program > (asm, > > >> c)? > > >> > > >> $HASP838 INTRDR > > >> $HASP838 INTRDR AUTH=(DEVICE=NO,JOB=NO,SYSTEM=NO),BATCH=YES, > > >> $HASP838 CLASS=X,HOLD=NO,HONORLIM=NO,PRTYINC=0, > > >> $HASP838 PRTYLIM=15,SYSAFF=(ANY),TRACE=NO > > >> > > >> Actually, I'm interested in default job class. > > >> Thanks in advance. > > > > -- gil > > > > ---------------------------------------------------------------------- > > 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
