In this example, a partitioned generation data set consisting of three members is used as source data in the creation of a new partitioned data set. IEBUPDTE is also used to add a fourth member to the three source members and to number the new member. The resultant data set is cataloged as a new partitioned data set.

  //NEWGDS   JOB  ...
  //STEP1    EXEC PGM=IEBUPDTE,PARM=MOD
  //SYSPRINT DD  SYSOUT=A
  //SYSUT1   DD  DSNAME=A.B.C,DISP=OLD
  //SYSUT2   DD  DSNAME=A.B.C,DISP=(,CATLG),UNIT=disk,
  //             VOLUME=SER=111111,SPACE=(TRK,(100,10,10)),
  //             DCB=(RECFM=FB,LRECL=80,BLKSIZE=800)
  //SYSIN    DD  DATA
  ./  REPRO    NAME=MEM1,LEVEL=00,SOURCE=0,LIST=ALL
  ./  REPRO    NAME=MEM2,LEVEL=00,SOURCE=0,LIST=ALL
  ./  REPRO    NAME=MEM3,LEVEL=00,SOURCE=0,LIST=ALL
  ./  ADD      NAME=MEM4,LEVEL=00,SOURCE=0,LIST=ALL
  ./  NUMBER   NEW1=10,INCR=5
 
  (Data records comprising MEM4)
 
  ./  ENDUP
  /*

The control statements are as follows:

• SYSUT1 DD defines the partitioned data set, which is used as source data. It can be a PDSE.
• SYSUT2 DD defines the new partitioned data set, which is created from the source partitioned data set and from an additional member included as input and data. It can be a PDSE.
• SYSIN DD defines the control data set, which follows in the input stream.
• The REPRO function statements reproduce the named source members in the output partitioned data set.
• The ADD function statement specifies that the data records following the input stream be included as MEM4.
• The NUMBER detail statement indicates that the new member is to have sequence numbers assigned in columns 73 through 80. The first record is assigned sequence number 10. The sequence number of each successive record is increased by 5.
• ENDUP signals the end of input card data.