|
Been away for a while, thanks for the discussion. Wayne & Dan, great suggestions, thanks for the lateral thinking! What threw me was the "RCVF will not share". But OVRDBF has a SHARE(*NO) which solves that! OK, what I ended up with was: PGM A populates file on each iteration, then within the loop calls PGM B. PGM B: DCLF OVRDBF FILE(OPS301F) TOFILE(QTEMP/OPS301F) MBR(*FIRST) OPNDBF FILE(QTEMP/OPS301F) OPTION(*INP) POSDBF OPNID(OPS301F) POSITION(*START) RCVF PROCESS: /*each record until EOF*/ etc Works perfectly. Thanks, all. CPF0864 doesn't have to mean the end! __________________________________ Notice of Confidentiality This transmission contains information that may be confidential and that may also be privileged. Unless you are the intended recipient of the message (or authorised to receive it for the intended recipient) you may not copy, forward, or otherwise use it, or disclose it or its contents to anyone else. If you have received this transmission in error please notify us immediately and delete it from your system. Email: internet.mail@xxxxxxxxxxxxxxxx
As an Amazon Associate we earn from qualifying purchases.
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.
midrange.com
