gcicchet
Senior Member
Joined: 28 Jul 2006 Posts: 1702 Location: Australia
|
|
|
|
Hi,
this might help
Code: |
//STEP0100 EXEC PGM=SORT
//SYSOUT DD SYSOUT=*
//SORTIN DD DSN=input-file
//SORTOUT DD DSN=output-file
//SYSIN DD *
SORT FIELDS=COPY
OMIT COND=(500,251,CH,EQ,C' ',&,751,250,CH,EQ,C' ')
/*
|
Gerry |
|