What function does ADRSUB serve?
ADRSUB is the DDNAME for the Internal Reader (IRDR) and is only used with Ideal and Dataquery.
An internal reader is a special SYSOUT data set that other programs can use to submit jobs, control statements, and commands to JES2.
Jobs which allocate internal reader and time-sharing users use the internal readers to submit jobs.
Internal Reader can be used to submit batch jobs from a CICS program.
That functionality is exploited by Dataquery and Ideal via the VPE component of IPC.
ADRSUB is defined in the following installation CAVQSAMP library members:
- IPCVPEB (to add IRDR ROSFD definitions)
IRDR ROSFD DDNAME=ADRSUB,ACCMETH=SEQ,RECFM=F,
LRECL=80,BLKSIZE=80,PRODUCT=IGN
- VQCUS01 (to add ADRSUB to the CICS startup JCL)
//ADRSUB DD SYSOUT=(A,INTRDR)
- VQ14CSD or VQ15CSD (to add TDQUEUE entry definitions) see VQ14CSD entry for IRDR below:
DEFINE TDQUEUE(IRDR) GROUP(VQ14GRP) DESCRIPTION(VPE INTERNAL READER)
TYPE(EXTRA) DATABUFFERS(1) DDNAME(ADRSUB)
OPENTIME(INITIAL) TYPEFILE(OUTPUT) RECORDSIZE(80)
RECORDFORMAT(FIXED) BLOCKFORMAT(UNBLOCKED)
To verify if the IRDR entry is defined under CICS you may enter commands :
CEDA (CEDC or CEDB) VIEW TDQUEUE(IRDR) GROUP(*) or CEMT INQUIR TDQUEUE(IRDR)
Refer to IPC for z/OS Installation and Maintenance Guide, "Post-Installation Steps" for more details on CICS modifications.
Refer to Dataquery for Datacom Administrator Guide, "Installing the Internal Reader" for more details on the Internal Reader.