pxfgeteuid(3F)

NAME
     PXFGETEUID - Gets effective user ID

SYNOPSIS
     SUBROUTINE PXFGETEUID (ieuid, ierror)
     INTEGER ieuid, ierror

IMPLEMENTATION
     UNICOS, UNICOS/mk, and IRIX systems

STANDARDS
     IEEE standard interface for FORTRAN 77

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.

     The PXFGETEUID subroutine uses the geteuid() system call to get the
     effective user ID.

     When using the CF90 compiler or MIPSpro 7 Fortran 90 compiler on
     UNICOS, UNICOS/mk, or IRIX, 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 valid arguments for this routine:

     ieuid     An output integer variable for the effective user ID for the
               current process.

     ierror    An output integer variable that contains zero if PXFGETEUID
               was successful.

EXAMPLES
     This example calls PXFGETEUID and prints out the current effective
     user ID and the returned error.

          program pxftest
          integer ieuid, ierr

          CALL PXFGETEUID(ieuid,ierr)
          print *,'ieuid = ',ieuid,' ierr = ',ierr
          end

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