+-------------------------------IBM Extension--------------------------------+
Purpose
Returns the value of the specified environment variable.
Class
Subroutine
Argument Type and Attributes
Result Value
The result is returned in the VALUE argument, not as a function result variable.
If the environment variable specified in the NAME argument does not exist, the VALUE argument contains blanks.
Examples
CHARACTER (LEN=16) ENVDATA CALL GETENV('HOME', VALUE=ENVDATA) ! Print the value. PRINT *, ENVDATA ! Show how it is blank-padded on the right. WRITE(*, '(Z32)') ENVDATA END
The following is sample output generated by the above program:
/home/mark 2F686F6D652F6D61726B202020202020
+----------------------------End of IBM Extension----------------------------+