//IMPMF04 JOB //* //STEP002 EXEC PGM=IEFBR14 //SYSPRINT DD SYSOUT=* //SYSOUT DD SYSOUT=* //DD1001 DD DSN=TMPZ0002, // DISP=(NEW,PASS,DELETE), //* DISP=DHR, // DCB=(LRECL=512,RECFM=FB), // PATH=('E:\FLAT_FILES\ecntsup.DOESTAX.CONV.fromESSP.x145', // COPY) //* //STEP004 EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SORTIN DD DSN=TMPZ0001,DISP=SHR //SORTOUT DD DSN=ECNTSUP.DOESTAX.CONV.FROMESSP.X145,DISP=SHR //SYSIN DD * REPRO IFILE(SORTIN) OFILE(SORTOUT) /* //