Example 6: Compare Two Partitioned Data Sets

In this example, two partitioned data sets are compared.

  //DISKDISK JOB  ...
  //STEP1    EXEC PGM=IEBCOMPR
  //SYSPRINT DD  SYSOUT=A
  //SYSUT1   DD  DSNAME=PDSSET1,UNIT=disk,DISP=SHR,
  //             DCB=(RECFM=FB,LRECL=80,BLKSIZE=2000),
  //             VOLUME=SER=111112
  //SYSUT2   DD  DSNAME=PDSSET2,UNIT=disk,DISP=SHR,
  //             DCB=(RECFM=FB,LRECL=80,BLKSIZE=2000),
  //             VOLUME=SER=111113
  //SYSIN    DD  *
        COMPARE  TYPORG=PO
  /*

The control statements are discussed, as follows:

SYSUT1 DD defines an input partitioned data set, PDSSET1. The blocked data set resides on a disk volume.
SYSUT2 DD defines an input partitioned data set, PDSSET2. The blocked data set resides on a disk volume.
SYSIN DD defines the control data set, which follows in the input stream.
COMPARE TYPORG=PO indicates that the input data sets are partitioned.