pxfgetegid(3F)

NAME
     PXFGETEGID - Gets the effective group ID

SYNOPSIS
     SUBROUTINE PXFGETEGID (iegid, ierror)
     INTEGER iegid, 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
     7.2 F77 compiler.

     The PXFGETEGID subroutine uses the getegid() function to get the
     effective group 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:

     iegid     An output integer variable for the effective group ID for
               the current process.

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

EXAMPLES
     This example calls PXFGETEGID and prints out the current effective
     group ID and the returned error.

          program pxftest
          integer iegid, ierr

          CALL PXFGETEGID(iegid,ierr)
          print *,'iegid = ',iegid,' ierr = ',ierr
          end

SEE ALSO
     Application Programmer's Library Reference Manual, publication SR-
     2165, for the printed version of this man page.