× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



Use two data structures with the fields you need to compare.  Numeric fields
work in data structures.

A shortcut might be to define the data structures with the EXTNAME keyword. 
 
---------------------------------
Booth Martin
http://www.martinvt.com
---------------------------------
-------Original Message-------
 
From: RPG programming on the AS400 / iSeries
Date: 11/10/05 10:44:38
To: RPG programming on the AS400 / iSeries
Subject: RE: Comparing two records of a file
 
Thanks for the reply guys.
 
But I think there is some misunderstanding.  Actually
there is only one file and in that file two records
needs to be compared.  Please note that the fields of
the file are numeric in between.  I don't really want
to compare field by field and I am looking for
something better.
 
Please let me know if there is still any confusion.
 
Thanks,
 
Gopal
 
--- "Forbes, Vincent" <Vincent.Forbes@xxxxxxxx> wrote:
 
> 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
> --
> This is the RPG programming on the AS400 / iSeries
> (RPG400-L) mailing list
> To post a message email: RPG400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit:
> http://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the
> archives
> at http://archive.midrange.com/rpg400-l.
> --
> This is the RPG programming on the AS400 / iSeries
> (RPG400-L) mailing list
> To post a message email: RPG400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit:
> http://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the
> archives
> at http://archive.midrange.com/rpg400-l.
>
>
 
 
 
 
 
__________________________________
Yahoo! Mail - PC Magazine Editors' Choice 2005
http://mail.yahoo.com
--
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.
 
.

As an Amazon Associate we earn from qualifying purchases.

This thread ...

Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.