JCL example

//STEP1    EXEC PGM=EQQEVPGM
//STEPLIB  DD DISP=SHR,DSN=OPCDEV.TEST.APFLIB
//EQQMLIB  DD DISP=SHR,DSN=OPCDEV.TEST.MSGS
//EQQMLOG  DD SYSOUT=*
//SYSIN    DD *
 SRSTAT 'TAPES' SUBSYS(EIDA)
        AVAIL(YES)
        DEVIATION(-1)