# GETENV

Portability Subroutine: Returns the value of an environment variable.

## Module

USE IFPORT

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.

## Example

    use IFPORT
    character*40 libname
    CALL GETENV ("LIB",libname)
    TYPE *, "The LIB variable points to ",libname

Parent topic: G

## See Also

GETENVQQ