DFSMPR procedure
The DFSMPR procedure is an online execution procedure that initiates an IMS message processing address space.
The procedure shown in Sample procedure to execute an IMS message processing address space executes an IMS message processing address space.
Parameters
The following parameters are valid for the DFSMPR procedure.
- AGN=
- ALTID=
- APARM=
- APPLFE=
- CL1=, CL2=, CL3=, CL4=
- DBLDL=
- ENVIRON=
- IMSID=
- JVM=
- JVMOPMAS=
- LOCKMAX=
- NBA=
- NODE1=
- NODE2=
- OBA=
- OPT=
- OVLA=
- PARDLI=
- PCB=
- PREINIT=
- PRLD=
- PWFI=
- RGN=
- SOD=
- SOUT=
- SPIE=
- SSM=
- STIMER=
- SYS2=
- TLIM=
- VALCK=
- VFREE=
- VSFX=
See Parameter descriptions for IMS procedures for descriptions.
DD statements
The following DD statements are valid for the DFSMPR procedure.
- DFSESL DD (optional)
- FPTRACE DD (optional)
- PROCLIB DD
- STDENV DD
- STEPLIB DD
- SYSUDUMP DD
See DD statements for IMS procedures for descriptions.
Sample procedure to execute an IMS message processing address space
// PROC SOUT=A,RGN=56K,SYS2=,
// CL1=001,CL2=000,CL3=000,CL4=000,
// OPT=N,OVLA=0,SPIE=0,VALCK=0,TLIM=00,
// PCB=000,PRLD=,STIMER=,SOD=,DBLDL=,
// NBA=,OBA=,IMSID=,AGN=,VSFX=,VFREE=,
// SSM=,PREINIT=,ALTID=,PWFI=N,
// APARM=,LOCKMAX=,APPLFE=,ENVIRON=,
// JVMOPMAS=,PARDLI=,JVM=
//*
//REGION EXEC PGM=DFSRRC00,REGION=&RGN,
// TIME=1440,DPRTY=(12,0),
// PARM=(MSG,&CL1&CL2&CL3&CL4,
// &OPT&OVLA&SPIE&VALCK&TLIM&PCB,
// &PRLD,&STIMER,&SOD,&DBLDL,&NBA,
// &OBA,&IMSID,&AGN,&VSFX,&VFREE,
// &SSM,&PREINIT,&ALTID,&PWFI,
// '&APARM',&LOCKMAX,&APPLFE,
// &ENVIRON,&JVMOPMAS,&PARDLI,&JVM)
//*
//STEPLIB DD DSN=IMS.&SYS2.PGMLIB,DISP=SHR
// DD DSN=IMS.&SYS2.SDFSRESL,DISP=SHR
//PROCLIB DD DSN=IMS.&SYS2.PROCLIB,DISP=SHR
//SYSUDUMP DD SYSOUT=&SOUT,
// DCB=(LRECL=121,BLKSIZE=3129,RECFM=VBA),
// SPACE=(125,(2500,100),RLSE,,ROUND)
Sample procedure to execute an IMS message processing address space with JVM=3164
// PROC SOUT=A,RGN=56K,SYS2=,
// CL1=001,CL2=000,CL3=000,CL4=000,
// OPT=N,OVLA=0,SPIE=0,VALCK=0,TLIM=00,
// PCB=000,PRLD=,STIMER=,SOD=,DBLDL=,
// NBA=,OBA=,IMSID=,AGN=,VSFX=,VFREE=,
// SSM=,PREINIT=,ALTID=,PWFI=N,
// APARM=,LOCKMAX=,APPLFE=,ENVIRON=,
// JVMOPMAS=,PARDLI=,JVM=3164
//*
//REGION EXEC PGM=DFSRRC00,REGION=&RGN,
// TIME=1440,DPRTY=(12,0),
// PARM=(MSG,&CL1&CL2&CL3&CL4,
// &OPT&OVLA&SPIE&VALCK&TLIM&PCB,
// &PRLD,&STIMER,&SOD,&DBLDL,&NBA,
// &OBA,&IMSID,&AGN,&VSFX,&VFREE,
// &SSM,&PREINIT,&ALTID,&PWFI,
// '&APARM',&LOCKMAX,&APPLFE,
// &ENVIRON,&JVMOPMAS,&PARDLI,&JVM)
//*
//STEPLIB DD DSN=IMS.&SYS2.PGMLIB,DISP=SHR
// DD DSN=IMS.&SYS2.SDFSJLIB,DISP=SHR
// DD DSN=IMS.&SYS2.SDFSRESL,DISP=SHR
//PROCLIB DD DSN=IMS.&SYS2.PROCLIB,DISP=SHR
//SYSUDUMP DD SYSOUT=&SOUT,
// DCB=(LRECL=121,BLKSIZE=3129,RECFM=VBA),
// SPACE=(125,(2500,100),RLSE,,ROUND)