Code: |
IDCAMS SYSTEM SERVICES TIME: 16:10:43 REPRO INFILE(SYSUT1) OUTFILE(SYSUT2) IDC3302I ACTION ERROR ON T.TGEAC.APMDWF.VENDOR.INITIAL.BKUP.G0002V00 IDC3309I ** RECORD X'C8C4D9E5C5' NOT WRITTEN. LENGTH INVALID IDC3302I ACTION ERROR ON T.TGEAC.APMDWF.VENDOR.INITIAL.BKUP.G0002V00 IDC3309I ** RECORD X'C3C3D9F0F1' NOT WRITTEN. LENGTH INVALID IDC3302I ACTION ERROR ON T.TGEAC.APMDWF.VENDOR.INITIAL.BKUP.G0002V00 IDC3309I ** RECORD X'C3C3D9F0F1' NOT WRITTEN. LENGTH INVALID IDC3302I ACTION ERROR ON T.TGEAC.APMDWF.VENDOR.INITIAL.BKUP.G0002V00 IDC3309I ** RECORD X'C3C3D9F0F2' NOT WRITTEN. LENGTH INVALID IDC31467I MAXIMUM ERROR LIMIT REACHED. IDC0005I NUMBER OF RECORDS PROCESSED WAS 0 IDC3003I FUNCTION TERMINATED. CONDITION CODE IS 12 IDC0002I IDCAMS PROCESSING COMPLETE. MAXIMUM CONDITION CODE WAS 12 |
Code: |
//STEP0100 EXEC PGM=SORT //SYSOUT DD SYSOUT=* //SORTIN DD DSN=YOUR INPUT DSN, // DISP=SHR //SORTOUT DD DSN=YOUR OUTPUT DSN, // DISP=(NEW,CATLG,DELETE), // UNIT=SYSDA, // SPACE=(CYL,(X,Y),RLSE) //SYSIN DD * SORT FIELDS=COPY /* |
output generated using printer-friendly topic mod. All times are GMT - 5 Hours