Here's a DFSORT job that will work for your new requirement. You'll still need z/OS DFSORT V1R5 PTF UK90013 (July, 2008) to use WHEN=GROUP. I assumed your input file has RECFM=FB and LRECL=80, but the job can be changed accordingly. In the future, please describe your "real" requirement in your first post to avoid wasting peoples' time.
//S1 EXEC PGM=ICEMAN
//SYSOUT DD SYSOUT=*
//SORTIN DD DSN=... input file (FB/80)
//SORTOUT DD DSN=... output file (FB/80)
//SYSIN DD *