Re: File Compare Routine

        If both files have the same field names,   DS4111 gets populated
first,  then you read the other,
        DS4111 gets overlayed with the new data !   Field names in the file
still come in the same(it doesn't care
        if you renamed the fields in some data structure, namely DS4114))

        You would have to read the first file (DS4111 is populated)  
        EVAL   DS4114 = DS4111
        Read from the second file (now DS4111 has 2nd file's data and DS4111
has 1st file's data)

        Or PREFIX the fields from the second file ala   PREFIX($)   
        Which would now make them match DS4114 like you orginally thought.

        John Carr
        WWW.400SCHOOL.COM




        From:   Eric Kempter@eric.kempter on 01/17/2000 06:43 PM
        To:     midrange-l@midrange-l@midrange.com@SMTP@EXCHCONNECT
        cc:      

        Subject:        File Compare Routine

        I am writing a file comparison routine to determine the differences
between two files.  The two files are identical with the exception of the
data.  I am attempting to use external data structures.  FILEA is a physical
file, FILEB is a logical (over FILEX (which is not included in the
program)).  The data structures are described as follows:

        D DS4111        E DS                  EXTNAME(FILEA)
        D DS4114        E DS                  EXTNAME(FILEB)
        D                                            PREFIX($)       

        FILE is read and DS4111 is populated.  I then do a SETLL and READE
on FILEB, the indicator signifies a match, but DS4114 never gets populated.

        I have scoured the manuals, but I do not see what the problem is.
Any assistance is appeciated.

        Thank you,

        Eric Kempter
        *4107
        * Eric.Kempter@robertmondavi.com



        +---
        | This is the Midrange System Mailing List!
        | To submit a new message, send your mail to
MIDRANGE-L@midrange.com.
        | To subscribe to this list send email to
MIDRANGE-L-SUB@midrange.com.
        | To unsubscribe from this list send email to
MIDRANGE-L-UNSUB@midrange.com.
        | Questions should be directed to the list owner/operator:
david@midrange.com
        +---



+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---