What is ADRSUB?

Products

• Datacom
• DATACOM - AD
• Ideal
• IPC

Issue/Introduction

What function does ADRSUB serve?

Resolution

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)

Additional Information

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.