+----------------------------------IBM 拡張----------------------------------+

GETENV(NAME, VALUE)

目的

指定された環境変数の値を戻します。

注:
これは IBM 拡張です。ポータビリティーのために、GET_ENVIRONMENT_VARIABLE 組み込みプロシージャーを使用することをお勧めします。

クラス

サブルーチン

引き数の型と属性

NAME
オペレーティング・システムの環境変数の名前を識別する文字ストリングです。 このストリングは大文字小文字の区別をします。 これは、スカラーで、型がデフォルトの文字で なければならない INTENT(IN) 引き数です。

VALUE
サブルーチンが戻る前に、環境変数の値を保持します。 これは、スカラーで、型がデフォルトの文字で なければならない INTENT(OUT) 引き数です。

結果の値

結果は、関数結果変数としてではなく、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 拡張-------------------------------+

IBM Copyright 2003