//IMS61   PROC RGN=200M,SOUT=A,DPTY='(14,15)',                          00004032
//            MVSID=DBS&IMAGE,IRL=&GRP1IRLM,APPLID=IMSPET&SYSCLONE,     00004432
//            RDR=IMSRED&IMAGE,IMSLVL=IMS610,IMS=IMS&IMAGE,             00004532
//            PETDSW=D10.PETDSW4,SSID=IMS&IMAGE,                        00004632
//            FDR=I&IMAGE,DQ=PE&IMAGE,DC=PE&IMAGE                       00005131
//********************************************************************* 00005240
//* IMS 6.1 SHARED MESSAGE QUEUE PROC MEMBER FOR PET PLEX               00007039
//********************************************************************* 00007140
//IEFPROC EXEC PGM=DFSMVRC0,DPRTY=&DPTY,                                00008002
//            REGION=&RGN,TIME=1440,                                    00009002
//            PARM=(CTL,SMQ,                                            00010032
//            'APPLID1=&APPLID',                                        00021032
//            'IRLMNM=&IRL',                                            00022032
//            'IMSID=&IMS',                                             00030031
//            'PRDR=&RDR',                                              00040030
//            'FDRMBR=&FDR',                                            00060030
//            'SHAREDQ=&DQ',                                            00070030
//            'OTMA=N',                                                 00070134
//            'DC=&DC')                                                 00071032
//*                                                                     00100002
//STEPLIB  DD DSN=&IMSLVL..RESLIB,DISP=SHR                              00111024
//         DD DSN=D10.PETDSW4.DYNALL61,DISP=SHR                         00112024
//         DD DSN=IMS610.RESLIB.DRAS,DISP=SHR                           00114024
//PROCLIB  DD DSN=&PETDSW..PROCLIB,DISP=SHR                             00140035
//*                                                                     00160002
//DFSOLP00 DD DSN=&MVSID..&SSID..OLP0,DISP=SHR                          00170024
//DFSOLP01 DD DSN=&MVSID..&SSID..OLP1,DISP=SHR                          00180024
//DFSOLP02 DD DSN=&MVSID..&SSID..OLP2,DISP=SHR                          00190024
//DFSOLP03 DD DSN=&MVSID..&SSID..OLP3,DISP=SHR                          00200024
//DFSOLP04 DD DSN=&MVSID..&SSID..OLP4,DISP=SHR                          00210024
//DFSOLP05 DD DSN=&MVSID..&SSID..OLP5,DISP=SHR                          00220024
//DFSOLP99 DD DSN=&MVSID..&SSID..OLP99,DISP=SHR                         00230024
//*                                                                     00240002
//DFSWADS0 DD DSN=&MVSID..&SSID..WADS0,DISP=SHR                         00250024
//DFSWADS8 DD DSN=&MVSID..&SSID..WADS8,DISP=SHR                         00251024
//*QBLKS    DD DSN=&MVSID..&SSID..QLBKS,DISP=OLD                        00260024
//*SHMSG    DD DSN=&MVSID..&SSID..SHMSG,DISP=OLD                        00270024
//*LGMSG    DD DSN=&MVSID..&SSID..LGMSG,DISP=OLD                        00280024
//IMSMON   DD DSN=&MVSID..&SSID..IMSMON,DISP=SHR,BUFNO=40               00290037
//IMSACBA  DD DSN=IMS610.ACBLIBA,DISP=SHR                               00300024
//IMSACBB  DD DSN=IMS610.ACBLIBB,DISP=SHR                               00310024
//MODBLKSA DD DSN=IMS610.MODBLKSA,DISP=SHR                              00320024
//MODBLKSB DD DSN=IMS610.MODBLKSB,DISP=SHR                              00330024
//MODSTAT  DD DSN=&PETDSW..MODSTAT6,DISP=SHR                            00340024
//***************    IMSMON    ********************                     00461022
//*IMSMON   DD DSN=IMS&IMS..IMSMON,DISP=SHR                             00463031
//*************** MFS DD CARDS ********************                     00470002
//FORMATA  DD DSN=IMS610.FORMATA,DISP=SHR,BUFNO=30                      00490038
//FORMATB  DD DSN=IMS610.FORMATB,DISP=SHR,BUFNO=30                      00500038
//******** SYSTEM REQUIRED DD CARDS **************                      00510002
//IMSRDS   DD DSN=&MVSID..&SSID..RDS,DISP=SHR                           00520024
//PRINTDD  DD  SYSOUT=&SOUT                                             00530002
//SPOOL1   DD  DSN=&MVSID..&SSID..SPOOL1,DISP=SHR                       00540024
//*SPOOL1A  DD  DSN=IMS&IMS..SPOOL1A,DISP=SHR                           00541031
//*SPOOL1B  DD  DSN=IMS&IMS..SPOOL1B,DISP=SHR                           00542031
//SPOOL2   DD  DSN=&MVSID..&SSID..SPOOL2,DISP=SHR                       00550024
//*SPOOL2A  DD  DSN=IMS&IMS..SPOOL2A,DISP=SHR                           00552031
//*SPOOL2B  DD  DSN=IMS&IMS..SPOOL2B,DISP=SHR                           00554031
//SPOOL3   DD  DSN=&MVSID..&SSID..SPOOL3,DISP=SHR                       00560024
//SYSMDUMP DD  SYSOUT=A                                                 00660012
//*                                                                     00670002