Frank Yaeger
DFSORT Developer
Joined: 15 Feb 2005 Posts: 7129 Location: San Jose, CA
|
|
|
|
Rajesh MS,
Here's a DFSORT/ICETOOL job that will do what I think you're asking for. If that's not what you want, you need to do a better job of explaining what it is you do want.
Code: |
//S1 EXEC PGM=ICETOOL
//TOOLMSG DD SYSOUT=*
//DFSMSG DD SYSOUT=*
//IN DD DSN=... input file (FB/150)
//OUT DD SYSOUT=*
//TOOLIN DD *
SORT FROM(IN) TO(OUT) USING(CTL1)
/*
//CTL1CNTL DD *
SORT FIELDS=(1,4,CH,A)
OUTFIL FNAMES=OUT,NODETAIL,REMOVECC,
SECTIONS=(1,4,
TRAILER3=(1,4,X,TOT=(7,5,UFF,EDIT=(IIIIT))))
/*
|
|
|