In order to utilize the DFSMSdss facilities to process data sets that are open to CICS TS files, a number of definitions and parameters in CICS TS need to be defined. The sample batch job shown below defines these to CICS.

When a storage administrator indicates with SMS policies that CICS file system interfaces should be called if DFSMSdss can not obtain serialization to process the request, DFSMSdss will attempt to use the CICS file system interfaces to first close the files open to data sets in CICS and then to process the DFSMSdss request. Subsequently, these interfaces will be called to allow these files to be opened by CICS.

//DEFCSD JOB ,JBCAMMA,MSGCLASS=H,CLASS=A,
// MSGLEVEL=(1,1),REGION=0M,NOTIFY=&SYSUID,TIME=1449
//******************************************************************
//* CONFIGURING THE CICS TS FOR DFSMSDSS TO CLOSE AND OPEN FILES:
//*
//* YOU NEED TO SET A NUMBER OF DEFINITIONS AND PARAMETERS IN
//* CICS TO ENABLE THE DFSMSDSS CICS SERVER CODE TO PROCESS 
//* REQUESTS TO CLOSE OR OPEN FILES. 
//* 
//* TO ADD THE CICS RESOURCE DEFINITIONS THAT ARE REQUIRED 
//* BY DFSMSDSS YOU NEED TO RUN THE RDO COMMANDS IN THE EXAMPLE BELOW. 
//* 
//* THIS EXAMPLE CREATES TWO RESOURCE GROUPS, DSSCICS AND DSSEXCI. 
//* BEFORE RUNNING THE JOB YOU NEED TO EDIT IT TO CHANGE THE DEFAULT 
//* LIBRARY VALUES TO MATCH THOSE OF YOUR INSTALLATION: 
//* 
//* + GROUP DSSCICS CONTAINS THE DEFINITIONS FOR THE DFSMSDSS CICS 
//* SERVER PROGRAM. YOU NEED TO ADD THIS GROUP TO THE GROUP LIST 
//* THAT IS USED AT CICS STARTUP. 
//* 
//* + DSSEXCI CONTAINS DEFINITIONS FOR A EXTERNAL CICS INTERFACE 
//* (EXCI) GENERIC CONNECTION BECAUSE DFSMSDSS USES THE EXCI. 
//* YOU NEED TO DEFINE THE DSSEXCI GROUP IF YOU DO NOT ALREADY 
//* HAVE A EXCI GENERIC CONNECTION DEFINED. 
//****************************************************************** 
//CONSDEF EXEC PGM=DFHCSDUP 
//STEPLIB DD DSN=CICSTS.V4R1.PROD.CICS.SDFHLOAD,DISP=SHR 
//DFHCSD DD DSN=USRLCL.V4R1.DFHCSD,DISP=SHR 
//SYSPRINT DD SYSOUT=* 
DELETE LIST(MYLIST) 
DELETE GROUP(DSSTEST) 
DELETE GROUP(DSSCICS) 
DELETE GROUP(DSSEXCI)   

APPEND LIST(DFHLIST) TO(MYLIST) 
ADD GROUP(DSSCICS) LIST(MYLIST) 
ADD GROUP(DSSEXCI) LIST(MYLIST)   

DELETE TERM(MAST) GROUP(DSSCICS) 
DEFINE TERM(MAST) GROUP(DSSCICS) TYPETERM(DFHCONS)   
  CONSNAME(MASTER1) DESCRIPTION(MVS CONSOLE CONS500)   

DELETE TERM(TST1) GROUP(DSSCICS) 
DEFINE TERM(TST1) GROUP(DSSCICS) TYPETERM(DFHCONS)   
  CONSNAME(LOCALC02) DESCRIPTION(MVS CONSOLE LOCALC02)   

DELETE TRANSACTION(DSSX) GROUP(DSSCICS) 
DEFINE TRANSACTION(DSSX) GROUP(DSSCICS) PROGRAM(DFHMIRS)   
  DESCRIPTION(DSS SERVER TRANSACTION REQUIRED BY DFSMSDSS)   
  PROFILE(DFHCICSA)   

DELETE PROGRAM(ADREXCIS) GROUP(DSSCICS) 
DEFINE PROGRAM(ADREXCIS) GROUP(DSSCICS) LANGUAGE(ASSEMBLER)   
  DESCRIPTION(CICS SERVER PROGRAM REQUIRED BY DFSMSDSS)   
  DATALOCATION(ANY) EXECKEY(USER)   

DELETE CONNECTION(DSSG) GROUP(DSSEXCI) 
DEFINE CONNECTION(DSSG) GROUP(DSSEXCI)   
  DESCRIPTION(EXCI GENERIC CONNECTION REQUIRED BY DFSMSDSS)   
  ACCESSMETHOD(IRC) SINGLESESS(NO)   
  PROTOCOL(EXCI) CONNTYPE(GENERIC)   
  DATASTREAM(USER) RECORDFORMAT(U) AUTOCONNECT(NO)   
  INSERVICE(YES) ATTACHSEC(IDENTIFY)   

DELETE SESSIONS(DSSG) GROUP(DSSEXCI) 
DEFINE SESSIONS(DSSG) GROUP(DSSEXCI)   
  DESCRIPTION(EXCI GENERIC SESSIONS DEFINITION REQUIRED BY DFSMSDSS)   
  CONNECTION(DSSG) PROTOCOL(EXCI) MAXIMUM(0,0)   
  RECEIVEPFX(RG) RECEIVECOUNT(10)   
  SENDSIZE(4096) RECEIVESIZE(4096)   
  SESSPRIORITY(0) AUTOCONNECT(NO)   
  BUILDCHAIN(YES) IOAREALEN(4096,4096) RELREQ(NO)   
  DISCREQ(NO) NEPCLASS(0)   
  RECOVOPTION(SYSDEFAULT)   

LIST LIST(MYLIST) OBJECTS 
/*