z/OS V1R6.0 DFSMS Access Method Services for Catalogs

REPROJob control language statement:vINDSET1 DD describes the indexed sequential data set, ISAMDSET, thatcontains the source records. The BUFNO parameter specifies the number ofbuffers assigned to the ISAM data set. This improves performance when theISAM data set’s records are accessed.The REPRO command copies all records from the source data set, ISAMDSET, tothe target data set, RPR.EXAMPLE.KSDS1. Its parameters are:vvINFILE points to the INDSET1 DD statement, which identifies the source dataset: ISAMDSET.OUTDATASET identifies the key-sequenced VSAM cluster into which the sourcerecords are to be copied. This data set is dynamically allocated by access methodservices.Copy Records into a VSAM Data Set: Example 2In this two-part example, data records are copied from the non-VSAM data setSEQ.DRGV, a sequential data set, into a key-sequenced VSAM data set,RPR.MYDATA. Next, records are copied from the key-sequenced data set,RPR.MYDATA, into an entry-sequenced data set, ENTRY.//REPRO2 JOB ...//STEP1 EXEC PGM=IDCAMS//INPUT DD DSNAME=SEQ.DRGV,DISP=SHR,DCB=(BUFNO=6)//SYSPRINT DD SYSOUT=A//SYSIN DD *REPRO -INFILE(INPUT) -OUTDATASET(RPR.MYDATA)-ERRORLIMIT(6)/*//STEP2 EXEC PGM=IDCAMS//INPUT DD DSNAME=RPR.MYDATA,DISP=OLD//OUTPUT DD DSNAME=ENTRY,DISP=OLD//SYSPRINT DD SYSOUT=A//SYSIN DD *REPRO -INFILE(INPUT) -OUTFILE(OUTPUT) -FROMKEY(DEAN) -TOKEY(JOHNSON)/*STEP1Access method services copies records from a sequential data set, SEQ.DRGV, intoa key-sequenced data set, RPR.MYDATA. STEP1’s job control language statement:vINPUT DD identifies the sequential data set, SEQ.DRGV, that contains thesource records. The BUFNO parameter specifies the number of buffers assignedto the sequential data set. This improves performance when the data set’srecords are accessed.STEP1’s REPRO command copies all records from the source data set, SEQ.DRGV,to the target data set, RPR.MYDATA. Its parameters are:vvvINFILE points to the INPUT DD statement, which identifies the source data set.OUTDATASET identifies the key-sequenced data set into which the sourcerecords are to be copied. The data set is dynamically allocated by access methodservices.ERRORLIMIT identifies the number of errors REPRO will tolerate.Chapter 30. REPRO 319