PXFINTGET(3F) Last changed: 1-6-98
NAMEPXFINTGET - Allows values stored in individual components of a
structure to be extracted and used
SYNOPSIS
INTEGER JHANDLE, VALUE, IERROR
CHARACTER*(n) compnam
CALL PXFINTGET (jhandle, compnam, value, ierror)
IMPLEMENTATION
UNICOS, UNICOS/mk, and IRIX systems
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 PXFINTGET() subroutine allows values stored in individual
components of a structure to be extracted and used.
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 are arguments to PXFINTGET:
jhandle An input integer that references a structure. jhandle
should have been created with PXFSTRUCTCREATE.
compnam An input character variable. compnam is the name of a
component of the structure. compnam is case-sensitive.
value An output integer variable. Upon successful completion,
value is set to the value stored in the component of jhandle
referenced by compnam.
ierror An output integer variable. It contains the exit status.
EXIT STATUS
Upon successful completion of PXFINTGET, the argument ierror is set to
0. If any of the following conditions occur, ierror is set to the
corresponding value:
ENONAME Component name is not defined for this structure
EBADHANDLE If jhandle is an invalid handle or has an incorrect
handle type (UNICOS and UNICOS/mk only).
SEE ALSO
Application Programmer's Library Reference Manual, publication SR-
2165, for the printed version of this man page.
