Enabling SOA Using WebSphere Messaging

Chapter 5. Point-to-point runtime configuration 169

// PARM='SIZE=(900K,124K),RENT,NCAL,LIST,AMODE=31,RMODE=ANY'

//*

//* APF-authorized library for the new system parameter module

//SYSLMOD DD DSN=MQQ1.USERAUTH,DISP=SHR

//*

//SYSUT1 DD UNIT=SYSDA,DCB=BLKSIZE=1024,

// SPACE=(1024,(200,20))

//SYSPRINT DD SYSOUT=*

//ARVP DD DSN=&&ARVP,DISP=(OLD,DELETE)

//LOGP DD DSN=&&LOGP,DISP=(OLD,DELETE)

//SYSP DD DSN=&&SYSP,DISP=(OLD,DELETE)

//*

//* Load library containing the default system

//* parameter module (CSQZPARM).

//OLDLOAD DD DSN=MQ600.SCSQAUTH,DISP=SHR

//*

//SYSLIN DD *

INCLUDE SYSP

INCLUDE ARVP

INCLUDE LOGP

INCLUDE OLDLOAD(CSQZPARM)

ENTRY CSQZMSTR

NAME CSQZPARM(R) Your system parameter module name

/*

//

Restart the MQ subsystem

During the startup of MQ, you should see the MQ subsystem successfully

connecting to RRS, to DB2, and to the CF structure previously allocated.

5.3.5 Update the queue manager procedures

Sample initialization member CSQ4INSS, found in hlq.SCSQPROC, contains a

set of commands for defining the objects used in a queue-sharing group. Add the

customized member to the CSQINP2 DD in both queue manager procedures, as

shown in Example 5-10.

Example 5-10 mqq1mstr process

// PROC

//PROCSTEP EXEC PGM=CSQYASCP,REGION=0M

//*

//STEPLIB DD DSN=MQQ1.USERAUTH,DISP=SHR

// DD DSN=MQ600.SCSQANLE,DISP=SHR

// DD DSN=MQ600.SCSQAUTH,DISP=SHR

// DD DSN=DB8Q8.SDSNLOAD,DISP=SHR

//*

170 Enabling SOA Using WebSphere Messaging

//******************************************************************

//* BOOTSTRAP DATA SETS *

//* *

//* This sample shows dual BSDS. To run with a single BSDS remove *

//* the BSDS2 entry. *

//******************************************************************

//BSDS1 DD DSN=MQQ1.BSDS01,DISP=SHR

//BSDS2 DD DSN=MQQ1.BSDS02,DISP=SHR

//*

//******************************************************************

//* SYSTEM INITIALIZATION INPUT FILES *

//* *

//* This sample shows the IBM supplied samples being used for the *

//* initialization input files. These sample initialization input *

//* files should be copied into a user library and tailored. *

//******************************************************************

//CSQINP1 DD DSN=MQQ1.INSTALL.JCL(MQQ1INP1),DISP=SHR

//CSQINP2 DD DSN=MQQ1.INSTALL.JCL(MQQ1INSG),DISP=SHR

// DD DSN=MQQ1.INSTALL.JCL(MQQ1INSX),DISP=SHR

// DD DSN=MQQ1.INSTALL.JCL(MQQ1INSS),DISP=SHR

// DD DSN=MQQ1.INSTALL.JCL(MQQ1INYS),DISP=SHR

//* DD DSN=MQQ1.INSTALL.JCL(MQQ1STAC),DISP=SHR

//CSQOUT1 DD SYSOUT=*

//CSQOUT2 DD SYSOUT=*

//*

//******************************************************************

//* PAGE SET DATA SETS *

//* *

//* This sample shows five page set data sets. *

//* You must have page set 00. *

//******************************************************************

//CSQP0000 DD DSN=MQQ1.PSID00,DISP=SHR

//CSQP0001 DD DSN=MQQ1.PSID01,DISP=SHR

//CSQP0002 DD DSN=MQQ1.PSID02,DISP=SHR

//CSQP0003 DD DSN=MQQ1.PSID03,DISP=SHR

//CSQP0004 DD DSN=MQQ1.PSID04,DISP=SHR

//*

//******************************************************************

//* USER EXIT LIBRARY *

//******************************************************************

//*CSQXLIB DD DSN=++EXITLIB++,DISP=SHR

//*

//******************************************************************

//* USER EXIT DATA SETS *

//* Add here DD statements for any data sets used by user exits. *

//******************************************************************

//*