Re: concatenation of multiple physical file members?

[Al Mac <macwheel99@xxxxxxxxxxx>]

When you in CL on like with OVRDBF do F4 & take a look at the options & 
their help for FILE MBR SHARE
for example MBR(*ALL) ... you can do specific member, first one, last one, 
or *ALL

Also watch out for logicals getting at all the members needed.  When you 
compile DDS, it may default to *FIRST only and only support one member in 
the logical, so you have to change file logical to get it to accept more 
than one member, then you have to add whatever other members you want to 
that logical.

There is an upper ceiling on how many members can be in a logical.
It is a lower ceiling than the number that can be in a physical file.

This may also have different options depending on version of OS/400.

Al Macintyre

, Michael Rosinger wrote:
> List,
>
> We have a situation where programs read as input parameters records from
> specific members in the same physical file. There are cases where there are
> *common* parms that are relevant to more than one program. What I would like
> to be able to do is to concatenate more than one physical file member in the
> CL so that the COBOL program *thinks* it is reading a single file.
>
> Something like this perhaps?....
>
> OVRDBF FILE(PARMS) TOFILE(MNR/JOBPARMS) MBR(DMS200-100) *CONCAT*
> OVRDBF FILE(PARMS) TOFILE(MNR/JOBPARMS) MBR(DMS200-ALL)
> CALL PGM(DMS200)
>
> . . . . .
>
> OVRDBF FILE(PARMS) TOFILE(MNR/JOBPARMS) MBR(DMS800) *CONCAT*
> OVRDBF FILE(PARMS) TOFILE(MNR/JOBPARMS) MBR(DMS200-ALL)
> CALL PGM(DMS800)
>
> --
> Regards,
>
> Michael Rosinger
> Systems Programmer / DBA
> Computer Credit, Inc.
> 640 West Fourth Street
> Winston-Salem, NC  27101
> 336-761-1524
> m rosinger at cciws dot com
>
>
> --
> This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
> To post a message email: MIDRANGE-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/midrange-l
> or email: MIDRANGE-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/midrange-l.