RE: OPNQRYF - Selection to Output File - How to - THANK YOU

Pete,

You are right in that it is not normal to CPYFRMQRYF and read the file.  I
used this when processing a file that had been FTP'd from an HP9000 to the
AS/400. The HP did the MRP and inventory control and the AS/400 did Sales
Order Processing.  Inventory records were 'disappearing' so I wanted a copy
of the file as received before processing and clearing the records from the
interface.  Method in my madness??  Anyway the fault was found and it put
our side in the clear.

Regards
Neil

-----Original Message-----
From:   owner-midrange-l@midrange.com [mailto:owner-midrange-l@midrange.com]
On Behalf Of Pete Hall
Sent:   Wednesday, 9 June 1999 12:21
To:     MIDRANGE-L@midrange.com
Subject:        RE: OPNQRYF - Selection to Output File - How to - THANK YOU


It will read the record that POSDBF makes the current record. The reason you
see this behavior is that the input file for OPNQRYF is (must be) opened
with the SHARED(*YES) attribute. This means that there is only one file
cursor, and since the file remains open until you close it with the CLOF
command, the cursor stays at end of file where CPYFRMQRYF left it. If you
don't need to update the original data, why not just read your CPYFRMQRYF
output file? It will be quicker because only sequential access is required.
Pete Hall
pbhall@execpc.com
http://www.execpc.com/~pbhall
+---
| 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
+---