kolusu Site Admin
Joined: 26 Nov 2002 Posts: 12366 Topics: 75 Location: San Jose
|
Posted: Wed Jan 22, 2003 7:52 am Post subject: |
|
|
Naveen,
You can use OMIT condition to get rid of the unwanted records.If the input you have shown are indeed blank lines(all spaces), then the following jcl will give you the results.
Code: |
//STEP0100 EXEC PGM=SORT
//*
//SYSOUT DD SYSOUT=*
//SORTIN DD *
aaaaaaaaf fgagdgfdgd
fsfsfs
fsfsfsfsfs
fsfasfsfsa
fsfsfsf
//SORTOUT DD DSN=YOUR OUTPUT FILE,
// DISP=(NEW,CATLG,DELETE),
// UNIT=SYSDA,
// SPACE=(CYL,(X,Y),RLSE)
//SYSIN DD *
SORT FIELDS=COPY
OMIT COND=(1,80,CH,EQ,C' ')
/*
|
Hope this helps...
cheers
kolusu |
|