pxfgetpgrp(3F)

NAME
     PXFGETPGRP -Gets the process group ID

SYNOPSIS
     SUBROUTINE PXFGETPGRP (ipgrp, ierror)
     INTEGER ipgrp, 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 PXFGETPGRP subroutine uses the getpgrp(2) system call to return
     the process group ID of the calling process.

     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 valid arguments for this routine:

     ipgrp     An output integer variable that contain the process group ID
               for the current process.

     ierror    An output integer variable that contains a status of zero if
               the process ID was successfully acquired.

EXAMPLES
     In this example, PXFGETPGRP will return the process group ID for the
     calling process.

          program pxftest
          integer ipgrp, ierror
          CALL PXFGETPGRP(ipgrp, ierror)
          if (ierror .eq. 0) then
              print *,'pgrp = ',ipgrp
          else
              print *,'error = ', ierror
          endif
          end

SEE ALSO
     getpgrp(2)

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