pxffileno(3F)

NAME
     PXFFILENO - Returns the file descriptor for a specified unit

SYNOPSIS
     INTEGER IUNIT, IFILDES, IERROR

     CALL PXFFILENO (iunit, ifildes, ierror)

DESCRIPTION
     This routine is supported on IRIX systems for programs compiled using
     the MIPSpro 7 Fortran 90 compiler or compiled with the -craylibs
     option to the MIPSpro F77 compiler.

     The PXFFILENO() subroutine returns in the ifildes argument the file
     descriptor to which the unit identified by iunit is connected.

     Processing of some Fortran file types includes library buffering or
     the addition of control words to the data written.  Users should be
     aware of this when attempting to make use of the file descriptor
     associated with a Fortran unit.  Some Fortran units may not be
     connected to a file descriptor.  For example, a file assigned the
     attributes -F mr.scr.novfl is not connected to a file descriptor.

     All arguments must be of default kind unless documented otherwise.  On
     IRIX systems, the default kind is KIND=4.

     The following is a list of arguments to PXFFILENO:

     iunit     An input integer variable that contains the Fortran unit
               number.

     ifildes   An output integer variable containing the file descriptor of
               the file identified by iunit.

     ierror    An output integer variable containing the status.

NOTES
     The PXF_DEFINITIONS module can be used by Fortran 90 users to enable
     caller-callee interface checking.

RETURN VALUES
     Upon successful completion of PXFFILENO(), ierror is set to 0.  If any
     of the following conditions occur, ierror is set to the corresponding
     value:

     EINVAL         iunit is not an open unit

     EBADF          iunit is not connected with a file descriptor