The Source Code Comparator › Running the Comparator in Stand-alone Mode › JCL › Sample z/OS and OS/390 JCL

Sample z/OS and OS/390 JCL

//JOBNAME  JOB YOUR.JOBCARD.INFORMATION
//JOBLIB   DD DISP=SHR,DSN=ndvrdb.loadlib
//*
//*********************************************************************
//*
//*  JOB:     SAMPCOMP
//*
//*  PURPOSE: COMPARE THE CONTENTS OF TWO SOURCE-CODE TYPE FILES
//*           (NDVRIN1 AND NDVRIN2) AND PRODUCE A FILE DESCRIBING
//*           THEIR DIFFERENCES.
//*
//*  YOU TELL NDVRCOMP WHAT TO DO BY SPECIFYING A 'COMPARE' COMMAND.
//*  THE SYNTAX IS AS FOLLOWS:
//*
//*    COMPARE
//*       COLUMN = N TO M RECORD TYPE = FIXED/VARIABLE LENGTH = NNN
//*       PAD = BLANK/NULL/X'FF' OUTPUT = CHANGES/HISTORY/NEW
//*       FORMAT = FILE/DISPLAY SIZE = NNNNN TITLE = 'YOUR TITLE'
//*       .
//*
//*    ALL CLAUSES ARE OPTIONAL.  THE DEFAULT VALUES ARE AS FOLLOWS:
//*
//*    COMPARE COLUMN = 1 TO 72 RECORD TYPE = FIXED LENGTH = 80
//*       PAD = BLANK OUTPUT=CHANGES FORMAT = DISPLAY SIZE = 10000
//*       TITLE = ' '.
//*
//*       WHERE:
//*
//*       COLUMN        THE START AND END COLUMNS TO INSPECT
//*       RECORD        THE RECORD FORMAT AND (MAXIMUM) RECORD LENGTH
//*       PAD           THE CHARACTER TO USE IN EXTENDING VARIABLE-
//*                     LENGTH RECORDS BEFORE COMPARING THEM
//*       OUTPUT        CONTENT OF OUTPUT FILE:
//*         CHANGES       SHOW THE INSERTIONS AND DELETIONS
//*         HISTORY       SHOW THE INSERTS AND DELETES IN THE CONTEXT
//*                       OF THE NDVRIN1 SOURCE
//*         NEW           SHOW THE INSERTS IN THE CONTEXT OF THE
//*                       NDVRIN2 SOURCE
//*       FORMAT        WHERE THE OUTPUT IS TO BE WRITTEN
//*         FILE          WRITE TO NDVRPCH FILE
//*         DISPLAY       WRITE TO NDVRLST FILE
//*       SIZE          THE ESTIMATED COUNT OF THE NUMBER OF RECORDS
//*                     IN NDVRIN1 PLUS THE NUMBER OF RECORDS IN
//*                     NDVRIN2 (OVER ESTIMATE IF YOU DON'T KNOW).
//*       TITLE         A TITLE FOR THE TOP OF EACH PAGE OF OUTPUT
//*                     WHEN FORMAT=DISPLAY IS SPECIFIED
//*
//*   RESTRICTION:  LRECL FOR INPUT FILES (NDVRIN1 AND NDVRIN2) MAY
//*                 NOT EXCEED 256
//*
//*********************************************************************
//*
//COMPARE  EXEC PGM=NDVRCOMP,REGION=400K
//NDVRIN1  DD DISP=SHR,DSN=original.source.dataset.or.member
//NDVRIN2  DD DISP=SHR,DSN=changed.source.dataset.or.member
//NDVRPCH  DD DSN=user.changes.dataset,DISP=(NEW,CATLG,DELETE),
//            UNIT=disk,VOL=SER=volser,SPACE=(TRK,(5,5),RLSE),
//            DCB=(RECFM=FB,LRECL=88,BLKSIZE=3168)
//SORTWK01 DD UNIT=disk,SPACE=(CYL,(2,1))
//SORTWK02 DD UNIT=disk,SPACE=(CYL,(2,1))
//SORTWK03 DD UNIT=disk,SPACE=(CYL,(2,1))
//SORTWK04 DD UNIT=disk,SPACE=(CYL,(2,1))
//NDVRLST  DD SYSOUT=*
//NDVRERR  DD SYSOUT=*
//SYSOUT   DD DUMMY
//SYSUDUMP DD DUMMY
//NDVRIPT  DD *
COMPARE COLUMN = 1 TO 72 RECORD TYPE = FIXED LENGTH = 80
   PAD = BLANK OUTPUT=CHANGES FORMAT = DISPLAY SIZE = 10000
   TITLE = ' '.
/*