One utility you can do this with is DFSORT using a job like the one below. I assumed your input file has RECFm=FB and LRECL=80, but the job can be changed appropriately for other attributes:
//S1 EXEC PGM=ICEMAN
//SYSOUT DD SYSOUT=*
//SORTIN DD DSN=... input file (FB/80)
//SORTOUT DD SYSOUT=*
//SYSIN DD *
OPTION COPY,STOPAFT=11
OUTFIL REMOVECC,BUILD=(/,1,80)
/*