PXFGETSUBHANDLE

POSIX Subroutine: Returns a handle for a subroutine.

Module

USE IFPOSIX

CALL PXFGETSUBHANDLE (sub,jhandle1,ierror)

sub	(Input) The Fortran subroutine to get a handle for.
jhandle1	(Output) INTEGER(4). The returned handle for the subroutine.
ierror	(Output) INTEGER(4). The error status.

If successful, ierror is set to zero; otherwise, an error code.

The argument sub cannot be a function, an intrinsic, or an entry point, and must be defined with exactly one integer argument.