Re: Dynamic File Selection

[Jon Paris <jon.paris@xxxxxxxxxxxxxx>]

Just issue an OVRxxx via QCMDEXC before you open the file Rich - by far the easiest way to handle it.


Jon Paris

www.partner400.com
www.SystemiDeveloper.com

On Nov 14, 2014, at 10:45 AM, Rich Loeber <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]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. 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: COBOL400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/cobol400-l
> or email: COBOL400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/cobol400-l.