RE: File Pointers

two possible problems:

1. If "write" means the RPG verb WRITE, the detail line may not have been
written into the physical file yet - use close or FEOD to make sure that the
buffer is flushed to disk.

2. the two logical files are unrelated and have independent file pointers
into the physical.

Assuming that both files are immediate maintenance, they will both contain
the same data - if the record was actually inserted into the physical, then
both LA and LB will know about the record.  If not, then not.

Richard Jackson
mailto:richardjackson@richardjackson.net
http://www.richardjacksonltd.com
Voice: 1 (303) 808-8058
Fax:   1 (303) 663-4325

-----Original Message-----
From: owner-rpg400-l@midrange.com [mailto:owner-rpg400-l@midrange.com]On
Behalf Of Lewis Libman
Sent: Friday, August 25, 2000 8:49 AM
To: rpg400-l@midrange.com
Subject: File Pointers


Small problem, is this the answer?

Program A, writes a record to the order detail file using logical LL0001LA.
Program A, then immediately calls program B, which is passed the order
number to recalculate the total order amount in the detail file to update
the order header file.  Program B uses a different logical, LL0001LB, over
the order detail file.  Program B, does a CHAIN to the first record for the
order, then a subsequent READE until end of order.

QUESTION???  Where is the pointer sitting when Program B does its first
                           CHAIN to the order detail file LL0001LB?  Is it
where the
                           last record was written or where?

Thanks for your help.

Lewis

Lewis Libman
llibman@behr.com
714 545 7101 x2118


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

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