Erik Vistica <[log in to unmask]> writes:

> If you need PIN specific file equates, you can use a fully qualified
> formal-designator (left side of the = sign) for a file.grp.acct that
doesn't
> exist and point it to the desired actual file.
>
> FILE  P1234567.myfile1.whatever = realfile;DISC=numrecs

You don't need to fully qualify the file name in your example. The fact that
the file name is unique is enough.

The original poster asked for a way to build the file before opening it. The
poster said s/he was already opening the file with a unique name, but needed
to override the default number of records. While setting a file equation or
building the file would work, my example showed how to use the features of
COBOL to accomplish the task without the need to code intrinsics.

<<original question>>
> Is there any way using an HP intrinsic to build a file within a COBOL
> program?  I ask because the temporary file that is created by COBOL under
> MPE only allows 10,000 records.  I need to bump this number up, but I
> haven't been able to come up with a way to solve this problem.
>
> I know I can create the file using a build statement, but I'm creating the
> file with a different name every time at run-time, so I need to do the
> build within the COBOL program.

Doug.

Doug Werth                             Beechglen Development Inc.
[log in to unmask]                               Cincinnati, Ohio

The opinions expressed do not  necessarily represent the views or
opinions of Beechglen Development. They might but not necessarily.
They represent solely the opinions of the author.