mainframegurukul.com

The below steps 3 & 4 are from the same proc and have different ezytrieve pgsm , i would like to know how can i combine both steps and make it one since the input file is the same.

//STEP003 EXEC PGM=CC017EZ2,REGION=4M
//STEPLIB DD DSN=&NODE1..&ENV1..PGMLIB,
// DISP=SHR
// DD DSN=&NODE1..PROD.PGMLIB,
// DISP=SHR
//EZTVFM DD UNIT=(SYSDA,3),SPACE=(4096,(100,100),RLSE)
//SYSPRINT DD SYSOUT=&SOUTJ
//SYSSNAP DD SYSOUT=&SOUTJ
//SYSOUT DD SYSOUT=&SOUTJ
//*
//CURRENT DD DSN=&STAT.CC.BB.DB&CYCLE.077.RESYNC(+1),
// DISP=SHR,BUFNO=20
//*
//PREVIOUS DD DSN=&STAT.CC.BB.DB&CYCLE.077.RESYNC(+0),
// DISP=SHR,BUFNO=20
//*
//DELTAS DD DSN=&STAT.CC.WROC.DB&CYCLE.077.PROFILE.DATA,
// DISP=(NEW,CATLG,DELETE),
// DATACLAS=LARGE,
// RECFM=FB,LRECL=3000,BLKSIZE=0
//TOTFILE DD DSN=&STAT.CC.WROC.DB&CYCLE.077.PROFILE.DATA.CTL,
// DISP=(NEW,CATLG,DELETE),
// DATACLAS=STANDARD,
// DCB=(LRECL=8,BLKSIZE=0,RECFM=FB)


STEP004

//STEP004 EXEC PGM=CC017EZT,REGION=4M
//STEPLIB DD DSN=&NODE1..&ENV1..PGMLIB,
// DISP=SHR
// DD DSN=&NODE1..PROD.PGMLIB,
// DISP=SHR
//EZTVFM DD UNIT=(SYSDA,3),SPACE=(4096,(100,100),RLSE)
//SYSPRINT DD SYSOUT=&SOUTJ
//SYSSNAP DD SYSOUT=&SOUTJ
//SYSOUT DD SYSOUT=&SOUTJ
//*
//CURRENT DD DSN=&STAT.CC.BB.DB&CYCLE.077.RESYNC(+1),
// DISP=SHR,BUFNO=20
//*
//PREVIOUS DD DSN=&STAT.CC.BB.DB&CYCLE.077.RESYNC(+0),
// DISP=SHR,BUFNO=20
//*
//DELTAS DD DSN=&STAT.CC.WROC2.DB&CYCLE.077.PROFILE.DATA,
// DISP=(NEW,CATLG,DELETE),
// DATACLAS=LARGE,BUFNO=20,
// RECFM=FB,LRECL=3000,BLKSIZE=0
//TOTFILE DD DSN=&STAT.CC.WROC2.DB&CYCLE.077.PROFILE.DATA.CTL,
// DISP=(NEW,CATLG,DELETE),
// DATACLAS=STANDARD,
// DCB=(LRECL=8,BLKSIZE=0,RECFM=FB)
//*
//PURGED DD DSN=&STAT.CC.WROC.DB&CYCLE.077.PURGE.DATA,
// DISP=(NEW,CATLG,DELETE),
// DATACLAS=LARGE,
// RECFM=FB,LRECL=15,BLKSIZE=0
//TOTFILE2 DD DSN=&STAT.CC.WROC.DB&CYCLE.077.PURGE.DATA.CTL,
// DISP=(NEW,CATLG,DELETE),
// DATACLAS=STANDARD,
// DCB=(LRECL=8,BLKSIZE=0,RECFM=FB)

You will only be able to combine the steps if you can combine the programs.

However, since we can't see the source of the programs, we can have no clue whether that is easy, hard, possible or impossible with the original program.