VSE JCL

Use JCL similar to the following example to run test streams in batch.

// JOB		CICS
// DLBL   	VERLIB,'CICS.VERIFY
// EXTENT	,CICS01
// LIBDEF	*,SEARCH=VERLIB.VERIFY
// DLBL		IJSYSUC,'VSAM.USERCAT',,VSAM
// DLBL		TCADS,'CICS.TCADS',,VSAM
// ASSGN	SYSIPT,00C    	(CR)
// ASSGN 	SYSIPT,00E	(LP)
.
.
. normal CICS startup JCL
.
.
// EXEC		DFHSIP
CSSN NAME=OVERNIGHT,PS=NITE \
XTCA RUN TCADS.GENERAL.PAYROLL.001 THINK(50%) \
XTCA RUN TCADS.GENERAL.CLAIMS.003 LIMIT(100) PHYSICAL \
CSMT SHUT,Y \


*STEP2: PRINT RESULTS
// DLBL   	VERLIB,'CICS.VERIFY'
// EXTENT	,CICS01
// LIBDEF	*,SEARCH=VERLIB,VERIFY
// DLBL		IJSYSUC,'VSAM.USERCAT',,VSAM
// DLBL		TCADSIN,'CICS.TCADS',,VSAM
// ASSGN	SYSIPT,00C
// EXEC		PGM=TCABATCH,SIZE=512K
PRINT DIFF (ONLY)
SELECT GENERAL.PAYROLL.>>>
SELECT GENERAL.CLAIMS.>>>
/*

The first step performs the batch run; the second step prints the output.
The Print function can be executed without the CICS step to print the results of runs for which the Run Record History option was "Y". See the Print Function earlier in this chapter.
The Select cards specify versions of >>>, which instructs CA Verify to select the highest version of the test stream.

Note: A delimiter must appear after the last character of each SYSIPT statement. This delimiter must be the one specified in the EODI operand in the TCP generation.