Thanks to all who replied .... I think this is the best solution and will
check it out. Wasn't sure if COBOL would object to the OVRDBF being
issued after the program was initiated.
Rich
--------------------------------------------------------------------------
On 11/14/2014 11:46 AM, Jon Paris wrote:
Just issue an OVRxxx via QCMDEXC before you open the file Rich - by far the easiest way to handle it.
Jon Paris
[1]www.partner400.com
[2]www.SystemiDeveloper.com
On Nov 14, 2014, at 10:45 AM, Rich Loeber [3]<rich@xxxxxxxxx> wrote:
I thought of that, but each file has the exact same number of records and
they all use identical record keys.
Rich
--------------------------------------------------------------------------
On 11/14/2014 10:43 AM, Stone, Joel wrote:
Is there a unique key that differentiates the files from each other? For example FILEA has CO#=1, FILEB has CO#=2, FILEC has CO#=3.
Then combine the 3 PFs into one FILEX LF and do a START on FILEX using the CO# as the first key.
-----Original Message-----
From: COBOL400-L [[1][4]mailto:cobol400-l-bounces@xxxxxxxxxxxx] On Behalf Of Rich Loeber
Sent: Friday, November 14, 2014 8:55 AM
To: COBOL Programming on the iSeries/AS400
Subject: [COBOL400-L] Dynamic File Selection
I have an interesting problem. From within my CBLLE program, I have a
single file defined, but the actual file being processed may vary
depending on how a user responds to a query. For example, I have FILEA,
FILEB and FILEC all identical but with different content. I want to be
able to switch between them from a single file definition for FILEX. Is
there an equivalent to OVRDBF that I can call in the CBLLE program before
I open the file that will make the switch?
The problem is that I cannot go from CLLE to CBLLE in this case, which is
how this would normally be handled.
Suggestions?
Rich
References
Visible links
1. [5]mailto:cobol400-l-bounces@xxxxxxxxxxxx
--
This is the COBOL Programming on the IBM i (AS/400 and iSeries) (COBOL400-L) mailing list
To post a message email: [6]COBOL400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: [7]
http://lists.midrange.com/mailman/listinfo/cobol400-l
or email: [8]COBOL400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at [9]
http://archive.midrange.com/cobol400-l.
References
Visible links
1.
http://www.partner400.com/
2.
http://www.systemideveloper.com/
3. mailto:rich@xxxxxxxxx
4. mailto:cobol400-l-bounces@xxxxxxxxxxxx
5. mailto:cobol400-l-bounces@xxxxxxxxxxxx
6. mailto:COBOL400-L@xxxxxxxxxxxx
7.
http://lists.midrange.com/mailman/listinfo/cobol400-l
8. mailto:COBOL400-L-request@xxxxxxxxxxxx
9.
http://archive.midrange.com/cobol400-l
As an Amazon Associate we earn from qualifying purchases.