RE: Comparing two records of a file

Gopal

You can define the file as internally described & use the "I" specs like
this.

Ffile1  IF  F     256    k   DISK
Ffile2  IF  F     256    k   DISK

I File1   NS      
I                                          1   10 Key1 
I                                        11 256 Data1

I File2   NS      
I                                          1   10 Key2
I                                        11 256 Data2

Or you can define all the fields in a DS.

D Rec1    DS
D   Field1
...
D   Field200


\Vincent

 -----Original Message-----
From:   rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
On Behalf Of gopal barnwal
Sent:   November 10, 2005 7:07 AM
To:     RPG400-L@xxxxxxxxxxxx
Subject:        Comparing two records of a file

Hi,

There is a scenario where I have to compare two set of
records of a file which has got 200 fields.  Out of
these 200 fields other than the key field if the value
of any field is different then I have to print it. 
Something like Rec1 is compared with Rec2 of FileA.
It won't be wise to compare each field with a CASxx or
IFxx in the RPG program for each field.  Is there a
way where this can be done in a efficient way.

Early response will really be appreciated.

Thanks,

Gopal


                
__________________________________ 
Start your day with Yahoo! - Make it your home page! 
http://www.yahoo.com/r/hs