In this example, all members of data set MODLIBJ, members MODX, MODY, and MODZ of data set MODLIBK, and all members of data set MODLIBL, except MYMACRO and MYJCL, are altered in place.

  //ALTERONE JOB  ...
  //STEPA    EXEC PGM=IEBCOPY
  //SYSPRINT DD  SYSOUT=A
  //SYSUT3   DD  UNIT=SYSDA,SPACE=(TRK,(5,1))
  //LIBJ     DD  DSNAME=MODLIBJ,DISP=(OLD,KEEP)
  //LIBK     DD  DSNAME=MODLIBK,DISP=(OLD,KEEP)
  //LIBL     DD  DSNAME=MODLIBL,DISP=(OLD,KEEP)
  //SYSIN    DD  *
       ALTERMOD  OUTDD=LIBJ
       ALTERMOD  OUTDD=LIBK,LIST=NO
       SELECT    MEMBER=(MODX,MODY,MODZ)
       ALTERMOD  OUTDD=LIBL
       EXCLUDE   MEMBER=(MYMACRO,MYJCL)
  /*

The control statements are discussed below:

• LIBJ DD defines the partitioned data set MODLIBJ, which has been previously created and cataloged.
• LIBK DD defines the partitioned data set MODLIBK, which has been previously created and cataloged.
• LIBL DD defines the partitioned data set MODLIBL, which has been previously created and cataloged.
• SYSIN DD defines the control data set, which follows in the input stream.
• The first ALTERMOD statement specifies that the entire data set defined in LIBJ is to be altered in place.
• The second ALTERMOD statement plus the following SELECT statement indicates that members MODX, MODY, and MODZ are to be altered in place. The remainder of MODLIBK is unchanged.
• The third ALTERMOD statement plus the following EXCLUDE statement indicates that all of MODLIBL is to be altered in place except the members called MYMACRO and MYJCL. These members remain unchanged.