+----------------------------------IBM 拡張----------------------------------+
目的
指定された環境変数の値を戻します。
クラス
サブルーチン
引き数の型と属性
結果の値
結果は、関数結果変数としてではなく、VALUE 引き数で戻されます。
NAME 引き数に指定されている環境変数が存在しない場合は、VALUE 引き数にブランクが入ります。
例
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
上記のプログラムで生成される出力例は次のとおりです。
/home/mark 2F686F6D652F6D61726B202020202020
+------------------------------End of IBM 拡張-------------------------------+