pxfgetpgrp(3F)

NAME
     PXFGETPGRP -Gets the process group ID

SYNOPSIS
     SUBROUTINE PXFGETPGRP (ipgrp, ierror)
     INTEGER ipgrp, ierror

STANDARDS
     IEEE standard interface for FORTRAN 77

DESCRIPTION
     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.

     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 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.

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

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)