//IMPMF04 JOB //* //STEP002 EXEC PGM=IEFBR14 //SYSPRINT DD SYSOUT=* //SYSOUT DD SYSOUT=* //DD1001 DD DSN=TMPZ0006, // DISP=(,PASS,DELETE), //* DISP=DHR, // DCB=(LRECL=512,RECFM=FB), // PATH=('E:\FLAT_FILES\DOESTAX.CONV.TDEC.ESSP.CRYPT.PYMTS', // COPY) //* //STEP004 EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SORTIN DD DSN=TMPZ0006,DISP=SHR //SORTOUT DD DSN=DOESTAX.CONV.TDEC.ESSP.CRYPT.PYMTS,DISP=SHR //* DISP=(,CATLG,DELETE), //* UNIT=SYSDA, //* SPACE=(CYL,(20,10),RLSE), //* DCB=(RECFM=FB,LRECL=512,BLKSIZE=5120) //SYSIN DD * REPRO IFILE(SORTIN) OFILE(SORTOUT) /* //