Although SUPERGEN has more options, SYSREPRO is a good stand-in for IEBGENER when you need to quickly copy all or part of a sequential dataset. As a bonus, you get a summary report of what was copied.
It is located in File #316 of the CBT tape and is part of the large suite of batch utility programs contributed by Jim Marshall of the U.S. Treasury. The program was originally written by Bill Godfrey at the Planning Research Corporation.
I have extracted the JCL to assemble SYSREPRO and the Assembler source from the CBT tape. I made three minor modifications to the source so that it would assemble under IFOX00 (commented out AMODE and RMODE, and moved a local macro above the register equates). The resulting jobstream - sysrepro.jcl - is contained in the archive sysrepro.tgz [MD5: B2828B29D91515B6D1ABD6C214A7C550]. Download the archive and extract the jobstream (WinZip on Windows/?? or tar on Linux). Submit the jobstream to assemble and link the single load module for SYSREPRO into SYS2.LINKLIB. If you don't have SYS2.LINKLIB defined, you will need to modify the jobstream to specify a target load library.
SYSREPRO can be executed using the same DD names as IEBGENER, except that SYSIN may be completely omitted:
//SYSREPRO JOB 'JAY MOSELEY',CLASS=A,MSGLEVEL=(1,1) //COPY EXEC PGM=SYSREPRO,REGION=1024K //SYSPRINT DD SYSOUT=A (MESSAGES) //SYSUT1 DD DSN=INPUT.DATA,DISP=SHR (SOURCE DATASET) //SYSUT2 DD DSN=OUTPUT.DATA,DISP=(NEW,KEEP), (OUTPUT DATASET) // UNIT=?,VOL=?,LABEL=?,SPACE=? //
The optional parameter(s) supplied via PARM are one to four integer values, and modify the copy operation as follows:
n1 copy only n1 records to the SYSUT2 dataset n2 read and bypass n2 records from SYSUT1 before beginning to copy n3, n4 from each group of n3 records read from SYSUT1, only copy the first n4 records to SYSUT2
Values for the n1, n2, and n3/n4 (n3 and n4 must both be supplied together) may be combined to achieve very flexible selection/copying options of records from the input dataset. Omitted parameter values are indicated by supplying a comma preceding the next value supplied. If no PARM is supplied, the entire input file is copied. A report is generated to SYSPRINT at the conclusion of the copy with details of the copy. A sample of the SYSOUT from executions of SYSREPRO illustrating the various combinations of the parameter values may be viewed at this link: SYSREPRO.SYSOUT.
I hope that you have found my instructions useful. If you have questions that I can answer to help expand upon my explanations and examples shown here, please don't hesitate to send them to me:
Return to Site Home Page
This page was last updated on January 17, 2015 .