//IMPMF04 JOB //* //STEP002 EXEC PGM=IEFBR14 //SYSPRINT DD SYSOUT=* //SYSOUT DD SYSOUT=* //DD1001 DD DSN=TMPZ0004, // DISP=(,PASS,DELETE), //* DISP=DHR, // DCB=(LRECL=750,RECFM=FB), // PATH=('E:\FLAT_FILES\DOESTAX.PROD.FTP.REFUND.X303EXP', // COPY) //* //STEP004 EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SORTIN DD DSN=TMPZ0004,DISP=SHR //SORTOUT DD DSN=DOESTAX.PROD.FTP.REFUND.X303EXP,DISP=SHR //* DISP=(,CATLG,DELETE), //* UNIT=SYSDA, //* SPACE=(CYL,(20,10),RLSE), //* DCB=(RECFM=FB,LRECL=750,BLKSIZE=7500) //SYSIN DD * REPRO IFILE(SORTIN) OFILE(SORTOUT) /* //