pxfconst(3F)

NAME
     PXFCONST, PXFISCONST, IPXFCONST  - Returns the value associated with
     symbolic constants

SYNOPSIS
     CHARACTER*(n) constname
     INTEGER ival, ierror
     LOGICAL PXFISCONST, 1

     i = IPXFCONST (constname)
     l = PXFISCONST (constname)
     CALL PXFCONST (constnam, ival, ierror)

IMPLEMENTATION
     UNICOS, UNICOS/mk, and IRIX systems

DESCRIPTION
     On IRIX systems, this routine is in libfortran.so which is linked by
     default when compiling programs with the MIPSpro 7 Fortran 90 compiler
     or when compiling programs with the -craylibs option to the MIPSpro
     F77 compiler.

     These functions provide a way for the Fortran programmer to get the
     value of some symbolic constants defined in system header files.

     IPXFCONST() provides an integer return value but no error checking.
     If the argument passed corresponds to one of the defined constants
     shown below, the return value is the integer value associated with the
     constant; if the argument is not a defined constant, the return value
     is meaningless.  PXFISCONST() confirms whether the argument is a valid
     constant.  PXFISCONST() returns .TRUE only if IPXFCONST() would return
     a valid value for the same constname.

     Upon successful completion, the subroutine PXFCONST() returns in ival
     the integer value associated with the constant described by constname.

     When using the CF90 compiler or MIPSpro 7 Fortran 90 compiler on
     UNICOS, UNICOS/mk, or IRIX systems, all arguments must be of default
     kind unless documented otherwise.  On UNICOS and UNICOS/mk, default
     kind is KIND=8 for integer, real, complex, and logical arguments; on
     IRIX, the default kind is KIND=4.

     The following is a list of arguments for these subroutines:

     constname An input character variable that represents the name of a
               constant.  constname is case-sensitive, and trailing blanks
               in the argument are ignored.

               The following are valid values for constname.  The second
               column contains the system header file where the symbolic
               constant is defined, or the standard where it is defined.

               'F_GETLK'             <fcntl.h>

               'F_SETLK'             <fcntl.h>

               'F_SETLKW'            <fcntl.h>

               'F_RDLCK'             <fcntl.h>

               'F_WRLCK'             <fcntl.h>

               'F_UNLCK'             <fcntl.h>

               'F_DUPFD'             <fcntl.h>

               'F_GETFD'             <fcntl.h>

               'F_SETFD'             <fcntl.h>

               'F_GETFL'             <fcntl.h>

               'F_SETFL'             <fcntl.h>

               'F_SETSB'*            <fcntl.h>

               'F_SETALF'*           <fcntl.h>

               'F_CLRALF'*           <fcntl.h>

               'O_RDONLY'            <fcntl.h>

               'O_WRONLY'            <fcntl.h>

               'O_RDWR'              <fcntl.h>

               'O_ACCMODE'           <fcntl.h>

               'O_NDELAY'            <fcntl.h>

               'O_APPEND'            <fcntl.h>

               'O_SYNC'              <fcntl.h>

               'O_NONBLOCK'          <fcntl.h>

               'O_RAW'*              <fcntl.h>

               'O_SSD'*              <fcntl.h>

               'O_CREAT'             <fcntl.h>

               'O_TRUNC'             <fcntl.h>

               'O_EXCL'              <fcntl.h>

               'O_NOCTTY'            <fcntl.h>

               '0_BIG'*              <fcntl.h>

               'O_PLACE'*            <fcntl.h>

               'O_RESTART'*          <fcntl.h>

               'O_ASYNC'*            <fcntl.h>

               'O_PTYIGN'*           <fcntl.h>

               'O_SFSXOP'*           <fcntl.h>

               'O_LDRAW'*            <fcntl.h>

               'O_WELLFORMED'*       <fcntl.h>

               'O_SFS_DEFER_TM'*     <fcntl.h>


               'S_ALF_NOGROW'*       <sys/stat.h>

               'S_ALF_PARTR'*        <sys/stat.h>


               'SEEK_SET'            <stdio.h>

               'SEEK_CUR'            <stdio.h>

               'SEEK_END'            <stdio.h>


               'STDIN_FILENO'        POSIX.9

               'STDOUT_FILENO'       Posix.9

               'STDERR_FILENO'       Posix.9

               * = UNICOS and UNICOS/mk systems only

               Posix.9 specific errors:

               'ENONAME'             liberrno.h

               'ENOHANDLE'           liberrno.h

               Errnos 1-98 from <errno.h>, for example:  'EPERM'

               Cray implementation errors:

               EBADID                If the idirid argument is an invalid
                                     directory ID

               EBADHANDLE            If the handle is invalid

               Additional values for constname are described in
               descriptions of other PXF routines such as PXFACCESS,
               PXFCHMOD, PXFCREAT, PXFOPEN, and so on.

     ival      An output integer variable.  The value associated with the
               constant.

     ierror    An output integer variable.  It contains the exit status.

EXIT STATUS
     Upon successful completion, the argument ierror is set to 0.  If any
     of the following conditions occur, PXFCONST() sets ierror to the
     corresponding value.

     ENONAME        Invalid constant name

     ENOMEM         PXFCONST() could not allocate the memory required

SEE ALSO
     PXFACCESS(3F), PXFCHMOD(3F), PXFCREAT(3F)

     Application Programmer's Library Reference Manual for the printed
     version of this man page.