//CREADATS JOB CLASS=A,MSGCLASS=Q,MSGLEVEL=(1,1),NOTIFY=&SYSUID //* ESTE FICHERO IRA AL SG SGSMSP1 //STEP1 EXEC PGM=IEBGENER //SYSPRINT DD SYSOUT=* //SYSUT1 DD * //SYSUT2 DD DSNAME=PR1.FICHERO.GRANDE1, // DISP=(,CATLG), // SPACE=(TRK,(20000)), // DCB=(RECFM=FB,LRECL=80) //SYSIN DD DUMMY //* ESTE FICHERO IRA AL SG SGSMSP1 //STEP2 EXEC PGM=IEBGENER //SYSPRINT DD SYSOUT=* //SYSUT1 DD * //SYSUT2 DD DSNAME=PR1.FICHERO.GRANDE2, // DISP=(,CATLG), // SPACE=(TRK,(20000)), // DCB=(RECFM=FB,LRECL=80) //SYSIN DD DUMMY //* ESTE FICHERO DEBERIA IR AL SG OVERFLOW //STEP3 EXEC PGM=IEBGENER //SYSPRINT DD SYSOUT=* //SYSUT1 DD * //SYSUT2 DD DSNAME=PR1.FICHERO.GRANDE.OVERF, // DISP=(,CATLG), // SPACE=(TRK,(20000)), // DCB=(RECFM=FB,LRECL=80) //SYSIN DD DUMMY //* ESTE FICHERO IRA AL SG SGSMSP2 //STEP4 EXEC PGM=IEBGENER //SYSPRINT DD SYSOUT=* //SYSUT1 DD * //SYSUT2 DD DSNAME=PR2.FICHERO.GRANDE1, // DISP=(,CATLG), // SPACE=(TRK,(20000)), // DCB=(RECFM=FB,LRECL=80) //SYSIN DD DUMMY //* ESTE FICHERO IRA AL SG SGSMSP2 //STEP5 EXEC PGM=IEBGENER //SYSPRINT DD SYSOUT=* //SYSUT1 DD * //SYSUT2 DD DSNAME=PR2.FICHERO.GRANDE2, // DISP=(,CATLG), // SPACE=(TRK,(20000)), // DCB=(RECFM=FB,LRECL=80) //SYSIN DD DUMMY //* ESTE FICHERO DEBERIA IR AL SG OVERFLOW //STEP6 EXEC PGM=IEBGENER //SYSPRINT DD SYSOUT=* //SYSUT1 DD * //SYSUT2 DD DSNAME=PR2.FICHERO.GRANDE.OVERF, // DISP=(,CATLG), // SPACE=(TRK,(20000)), // DCB=(RECFM=FB,LRECL=80) //SYSIN DD DUMMY