So what exactly are you going to compare bytes 110-120 against in a corresponding 70 byte record ?

What's wrong with the IBM compare utility that already exists ?
Obviously you can only compare the first 70 bytes of each record and that can so easily be achieved with the correct control statements.

Hi expat,

The problem we have nearly 900 comparsion like this.So we compare manually it will have manualy work.
To avaoid this manual work
i just give the list of input dates
like
xmmd01.prod.set1 xmmd01.devl.set1 sortcard
xmmd01.prod.set2 xmmd01.devl.set2 sortcard
xmmd01.prod.set3 xmmd01.devl.set3 sortcard
....
....
....
xmmd01.prod.set900 xmmd01.devl.set900

So only file i give the above format and rexx code or JCLS will compare all the datsets and produce the results
this is what i am expecting