Is there another utility that I can use other than the IEBGENER that will execute, regardless if the record format or blocksizes that does not match? A normal IEBGENER will fail if the RECFM/BLKSIZE does not match. I have included an example of two input files with different LRECL's and BLKSIZES
//*********************************************************************
//*
//*********************************************************************
//STEP1 EXEC PGM=IEBGENER
//*********************************************************************
//SYSPRINT DD SYSOUT=*
//SYSUT1 DD DSN=SPLNS.TLIVE.PLD606.JAN03,DISP=SHR
// DD DSN=PSAVE.DLIVE.PLD606.JAN03,DISP=SHR
//*
//SYSUT2 DD DSN=SPLNS.TLIVE.PLD606.CMP025.JAN03A,
// DISP=(NEW,CATLG,DELETE),
// LRECL=177,RECFM=FB,
// SPACE=(TRK,(50,10),RLSE)
//*
//SYSIN DD DUMMY
//*
//SYS1 DD UNIT=SYSDA,SPACE=(TRK,(300,30))
//SYS2 DD UNIT=SYSDA,SPACE=(TRK,(300,30))
//SYS3 DD UNIT=SYSDA,SPACE=(TRK,(300,30))
//*
//*********************************************************************
//STEP1 EXEC PGM=IEBGENER
//*********************************************************************
//SYSPRINT DD SYSOUT=*
//SYSUT1 DD DSN=SPLNS.TLIVE.PLD606.JAN03,DISP=SHR
// DD DSN=PSAVE.DLIVE.PLD606.JAN03,DISP=SHR
//*
//SYSUT2 DD DSN=SPLNS.TLIVE.PLD606.CMP025.JAN03A,
// DISP=(NEW,CATLG,DELETE),
// LRECL=177,RECFM=FB,
// SPACE=(TRK,(50,10),RLSE)
//*
//SYSIN DD DUMMY
//*
//SYS1 DD UNIT=SYSDA,SPACE=(TRK,(300,30))
//SYS2 DD UNIT=SYSDA,SPACE=(TRK,(300,30))
//SYS3 DD UNIT=SYSDA,SPACE=(TRK,(300,30))
Regards,
Martin