pxfgetppid(3F)

NAME
     PXFGETPPID - Gets the parent process ID

SYNOPSIS
     SUBROUTINE PXFGETPPID (ipid, ierror)
     INTEGER ipid, 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 PXFGETPPID subroutine uses the getppid(2) system call to find the
     parent process ID.

     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:

     ipid      An output integer variable that contains the parent process
               ID of 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, PXFGETPPID returns the current process' parent
     process ID.

          program pxftest
          integer ipid, ierror
          CALL PXFGETPPID(ipid, ierror)
          if (ierror .eq. 0) then
             print *,'pid = ',ipid
          else
             print *,'error = ',ierror
          endif
          end

SEE ALSO
     getppid(2)