ALTERMOD Example


Scenario - Alter all members in MATEPK.IEBCOPY.INPLOAD.

JCL -

----+----1----+----2----+----3----+----4----+----5----+
//MATEPKA  JOB (123),'MTH',CLASS=A,MSGCLASS=A,MSGLEVEL=(1,1),
//             NOTIFY=&SYSUID
//****************************************
//* ALTER ALL LOAD MODULES FROM INPUT PDS
//****************************************
//STEP10   EXEC PGM=IEBCOPY
//SYSPRINT DD SYSOUT=*
//SYSOUT   DD SYSOUT=*
//SYSDUMP  DD SYSOUT=*
//SYSUT1   DD DSN=MATEPK.IEBCOPY.INPLOAD,DISP=(OLD,KEEP)
//SYSUT2   DD UNIT=SYSDA,SPACE=(TRK,(5,1))
//SYSIN    DD *
    ALTERMOD OUTDD=SYSUT1 LIST=ALL
/*

Output -

ALTERMOD Output

Explaining Example -

  • SYSUT1 DD DSN=MATEPK.IEBCOPY.INPLOAD - Specifies the PDS that has old load modules.
  • SYSUT2 DD - Provides the buffer space to process the operation.
  • SYSIN DD - Has the control statements for processing the input.
  • ALTERMOD OUTDD=SYSUT1 - Used to alter the load module from SYSUT1 DSN.
  • LIST=ALL - Prints altering modules list in SYSPRINT.