pxfgetppid

Date:: 10-20-2011

NAME

PXFGETPPID - Gets the parent process ID

SYNOPSIS

INTEGER ipid, ierror
CALL PXFGETPPID(ipid, ierror)

IMPLEMENTATION

Cray Linux Environment (CLE)

STANDARDS

IEEE 1003.9-1992 standard interface for FORTRAN 77

DESCRIPTION

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. Default kind is KIND=4 for integer, real, complex, and logical arguments.

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.

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