pxfintget(3F)

NAME
     PXFINTGET - 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
     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 for the printed
     version of this man page.