Pat asks:

> We want to find out the actual filename.group.acct of a file that's
> refernecd through a file equation such as:
>
> :FILE N=file1.group1.acct1
>
> from within a Cobol program. The Cobol progarm knows only about a file
> called N.

If it isn't opened yet, use FLABELINFO with mode = 1, and
at whatever item numbers you want to get the file name (hint:
items 1, 2, and 3 for MPE format names, or item 38 for HFS format name).
This will return an error if the is no file equation.
So, if no error results, you know a file equate existed and you
have the final file name (depending upon the items you requested).

And, search the comp.sys.hp.mpe archive (or HP3000-L) ... this has been
covered in the last 6 months or so, possibly including COBOL
examples?

--
Stan Sieler                                          [log in to unmask]
                                     http://www.allegro.com/sieler.html