Michael Anderson writes:

> What's the most common method being used, to get the MPE file number, of
> a file opened using the COBOL OPEN verb.
>
> Years ago, (On the the Classic HP3000) I wrote a routine called GETFD.
> When upgrading to the 32 bit MPE/iX, I was concerned that this routine
> would not work. However, running everything in compatibility mode it
> does work.

No need for any of this.  Even on the Classic 3000, you could still
do things like

        FD  MYFILE.
        ...
            OPEN INPUT MYFILE.
            CALL INTRINSIC "PRINTFILEINFO" USING \MYFILE\.

These days, the backslashes (\) are not necessary, and I've
heard you can actually

            MOVE MYFILE  TO  SAVED-FILENUM

though I've never tried it.

--Glenn Cole
  Software al dente, Inc.
  [log in to unmask]

.......................................................................

Item Subject: cc:Mail Text