Re: Sort File
Posted: Wed Dec 07, 2011 2:13 amYes No Space for Position 172,2. Its having Value like 16,19,20.... . No 'C' Character.
vineet wrote:Yes No Space for Position 172,2. Its having Value like 16,19,20.... . No 'C' Character.
I wouldn't believe it unless I see it. Anyway I asked you another question about what the error was and what was that you corrected?
Run this job as is and show me output as well as the complete sysout
//STEP0100 EXEC PGM=SORT
//SYSOUT DD SYSOUT=*
//SORTIN DD DSN=Your input FB 1200 byte fileB,DISP=SHR
//SORTOUT DD SYSOUT=*
//SYSIN DD *
INREC BUILD=(1,6,X,172,2,12:C'001')
SORT FIELDS=(1,9,CH,A),EQUALS
SUM FIELDS=(12,3,ZD)
OUTFIL ENDREC=20
//*
//SYSOUT DD SYSOUT=*
//SORTIN DD DSN=Your input FB 1200 byte fileB,DISP=SHR
//SORTOUT DD SYSOUT=*
//SYSIN DD *
INREC BUILD=(1,6,X,172,2,12:C'001')
SORT FIELDS=(1,9,CH,A),EQUALS
SUM FIELDS=(12,3,ZD)
OUTFIL ENDREC=20
//*