Re: concatenation of multiple physical file members? -- MIDRANGE-L

× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.

If a temporary sorted copy of the data is acceptabl, perhaps:
crtpf qtemp/jobparmx srcfile(srclib/ddssrcf) srcmbr(jobparms)
mbr(tempdata) size( ) ...
...
/* clrpfm qtemp/jobparmx mbr(tempdata) -- implicit in fmtdta.? */
FMTDTA INFILE((MNR/JOBPARMS DMS200_100) (MNR/JOBPARMS DMS200_ALL))
OUTFILE(QTEMP/JOBPARMX) SRCFILE(srclib/ddssrcf) SRCMBR(JOBPARMF)
ovrdbf PARMS TOFILE(QTEMP/JOBPARMX) MBR(tempdata)
call pgm(dms200)
...

Regards, Chuck
-- All comments provided "as is" with no warranties of any kind whatsoever.

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)

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.