Portability Subroutine: Returns the value of an environment variable.
Module: USE IFPORT
Syntax
CALL GETENV (ename, evalue)
ename
(Input) Character*(*). Environment variable to search for.
evalue
(Output) Character*(*). Value found for ename. Blank if ename is not found.
Compatibility
CONSOLE STANDARD GRAPHICS QUICKWIN GRAPHICS WINDOWS DLL LIB
See Also
Example
use IFPORT
character*40 libname
CALL GETENV ("LIB",libname)
TYPE *, "The LIB variable points to ",libname