Skolusu
Senior Member
Joined: 07 Dec 2007
Posts: 2205
Location: San Jose
|
|
|
|
shantid,
You have provided very little information. Assuming that the first 4 bytes is the key , the following DFSORT/ICETOOL JCL will give you the desired results
| Code: |
//STEP0100 EXEC PGM=ICETOOL
//TOOLMSG DD SYSOUT=*
//DFSMSG DD SYSOUT=*
//IN DD *
----+----1----+----2----+----3----+----4----+----5----+----6----+-
1111| F| 2222|F|0 |
1111| | 2222| |3333|F
1111| | 2222| |4444|F
//OUT DD SYSOUT=*
//TOOLIN DD *
SPLICE FROM(IN) TO(OUT) ON(1,4,CH) WITH(9,6) WITH(16,8) WITHALL
//* |
|
|
