Example: Converting a Data Set

In this example, the indexed sequential data set to be converted (ISAMDATA) is cataloged. A key-sequenced data set, VSAMDATA, has previously been defined in user catalog USERCTLG. Because both the indexed-sequential and key-sequenced data set are cataloged, unit and volume information need not be specified.

ISAMDATA contains records flagged for deletion; these records are to be kept in the VSAM data set. The ENVIRONMENT(DUMMY) parameter in the REPRO command tells the system to copy the records flagged for deletion.

 //CONVERT  JOB  ...
 //JOBCAT   DD   DISP=SHR,DSNAME=USERCTLG
 //STEP     EXEC PGM=IDCAMS
 //SYSPRINT DD   SYSOUT=A
 //ISAM     DD   DISP=OLD,DSNAME=ISAMDATA,DCB=DSORG=IS
 //VSAM     DD   DISP=OLD,DSNAME=VSAMDATA
 //SYSIN    DD   *
 
       REPRO -
            INFILE(ISAM  ENVIRONMENT(DUMMY)) -
            OUTFILE(VSAM)
 /*

To drop records flagged for deletion in the indexed-sequential data set, omit ENVIRONMENT(DUMMY).

The use of the JOBCAT DD statement prevents this job from accessing any system-managed data sets.