JCL requirements for the MFS Compare utility

When you code the JCL to run the MFS Compare utility, include the EXEC statement and appropriate DD statements.

Subsections:

JCL example

An example of the JCL that is required for MFS Compare is shown in the following figure.

Figure 1. Example of MFS Compare JCL (FABVCMPR JCL)
//stepname EXEC  PGM=FABVCMPR
//STEPLIB  DD    DSN=HPS.SHPSLMD0,DISP=SHR
//         DD    DSN=IMSVS.SDFSRESL,DISP=SHR
//SYSPRINT DD    SYSOUT=*,DCB=BLKSIZE=133
//SYSOUT   DD    SYSOUT=*,DCB=BLKSIZE=133
//FORMAT   DD    DSN=ims.format1,DISP=SHR
//FORMAT2  DD    DSN=ims.format2,DISP=SHR
//MFSSRCE  DD    DSN=&&SOURCE1,DISP=(,DELETE),
//               SPACE=(CYL,(5,5,20))
//MFSSRCE2 DD    DSN=&&SOURCE2,DISP=(,DELETE),
//               SPACE=(CYL,(5,5,20))
//SYSIN    DD    *

Modify the fields shown in lower case to reflect your operating environment.

EXEC statement

This statement invokes the MFS Compare utility, FABVCMPR. The statement must be in the following format: 
//stepname   EXEC    PGM=FABVCMPR

DD statements

Code the following DD statements to identify the source of input and the placement of output information:
STEPLIB DD
This library contains the FABVCMPR utility program in its executable form. Change the name HPS.SHPSLMD0 to reflect the name used at your site. Concatenate the IMS RESLIB as part of the STEPLIB. Change the name IMSVS.SDFSRESL to the name used at your site.
SYSPRINT DD
This sequential data set lists the results of the compare procedure. The data set can be the JES spool data set or a standard sequential data set.
SYSYOUT DD
This sequential data set contains activity logs and any errors encountered during the execution of the FABVCMPR program. The data set can be the JES spool data set or a standard sequential data set.
FORMAT DD
This library contains the first set of IMS MFS format control blocks for comparison. Change the name ims.format1 to the name used at your site. Check the DISP= parameter if this library is also used in the IMS Online Control Region JCL.

If two or more data sets are concatenated to the FORMAT DD, MFS Compare processes only the first data set.

FORMAT2 DD
This library contains the second set of IMS MFS format control blocks for comparison. Change the name ims.format2 to the name used at your site. Check the DISP= parameter if this library is also used in the IMS Online Control Region JCL.

If two or more data sets are concatenated to the FORMAT2 DD, MFS Compare processes only the first data set.

MFSSRCE DD
This data set is a partitioned data set and contains the MFS control block source statements generated by the MFS Compare utility from the FORMAT data set. The LRECL of this data set must be 80. The block size can be any valid multiple of 80.

A format is referenced by a MID or MOD by the 3rd through 8th character of the format name. Depending on the device characteristics and features of the device from where the message is received, IMS Message Formatting Services retrieve the correct format control block. The first character of the control block name refers to the device and the second to the feature. One or more formats might exist having the same 3rd through 8th characters of the format name. Source statements are created for each device/feature combination occurring in a format (FMT) as well as the source for the MID, MOD, or both that reference this format.

The following example illustrates this:

If TESTMOD is a selected modname for which the source is to be created, and TESTMOD references xyTSTFMT, where x is a device code and y is a feature code, then a member is created in the MFSSRCE output library with the name TSTFMT. This member will have the FORMAT definitions (various DEV, DIV, DPAGE, DFLD, and similar statements) for all possible xy occurrences with the TSTFMT name and the MOD definitions for TESTMOD.

MFSSRCE2 DD
This data set is a partitioned data set and contains the MFS control block source statements as generated by the utility using the FORMAT2 data set. The LRECL of this data set must be 80. The block size can be any valid multiple of 80.
SYSIN DD
This data set contains the control statements for this program.

The record format is fixed blocked, and the logical record length is 80. The block size, if coded, must be a multiple of 80. SYSIN contains the control statements for the MFS Compare utility.

Related reading: For the format of the control statements, see Control statements for the MFS Compare utility.