OpenVMS
ユーザーズ・マニュアル

前へ 次へ 目次 索引

12.7.3 算術演算

次のような算術演算を指定できます。

例

12.7.4 数値の比較

表 12-2 は，数値比較のタイプの一覧です。

表 12-2 数値比較
比較 演算子 説明
等しい .EQ. 数値と数値を比較して，等しいかどうかを判定する。
より大きい，または等しい .GE. 数値と数値を比較して，最初の数値が 2 番目の数値より大きいか，または等しいかどうかを判定する。
より大きい .GT. 数値と数値を比較して，最初の数値が 2 番目の数値より大きいかどうかを判定する。
より小さい，または等しい .LE. 数値と数値を比較して，最初の数値が 2 番目の数値より小さいか，または等しいかを判定する。
より小さい .LT. 数値と数値を比較して，最初の数値が 2 番目の数値より小さいかどうかを判定する。
等しくない .NE. 数値と数値を比較して，等しくないかどうかを判定する。

ここに示す例では，BALANCE シンボルが -15237 の値を持つと想定しています。

12.7.5 数値オーバレイの実行

特殊な形式の割り当て文を使用すれば，現在のシンボル値のバイナリ・(ビット・レベル)オーバレイを実行できます。

ローカル・シンボルの場合は， 


シンボル名[ビット位置,サイズ] = 置換式

グローバル・シンボルの場合は， 


シンボル名[ビット位置,サイズ] == 置換式

各要素は次のとおりです。

ビット位置 オーバレイを実行するビット 0 からの相対位置を示す整数である。
サイズ オーバレイするビット数を示す整数である。

数値オーバレイを使用するには，次の規則に従います。

次の例は，BELL シンボルを 7 の値に定義しています。BELL の下位バイトは 00000111 というバイナリ値です。ここで，このバイナリ値のオフセット 5 の位置の 0 を 1 に変更すれば(ビットは，右から左に 0 から順にカウントされます)，00100111(10 進数 39)というバイナリ値が得られます。 


$ BELL = 7
$ BELL[5,1] = 1
$ SHOW SYMBOL BELL
 BELL = 39   Hex = 00000027   Octal = 00000000047

12.8 論理値と式の使用

これ以降の節では，論理値と式の使用について説明します。

12.8.1 論理演算

一部の演算では，数値と文字列を次のような値を持つ論理データとして解釈します。

次の例では，DOG_COUNT に 13 という値が割り当てられています。IF STATUS は，論理値 STATUS が真であることを意味します。 


$ STATUS = 1
$ IF STATUS THEN DOG_COUNT = 13



$ STATUS = "TRUE"
$ IF STATUS THEN DOG_COUNT = 13

12.8.2 論理式

論理演算は，演算の対象となる数値のすべてのビットに影響します。論理式 の値は整数であり，式の結果も整数になります。論理式で文字列値を指定すると，文字列が整数に変換されてから，式の評価が行われます。

通常は，論理式を使用して，論理値の下位ビットを評価します。すなわち，値が真か偽かを判断します。次の論理演算を指定できます。

次の例は，真の値を偽に反転させます。式の評価は -2 で，この値は偶数であるため，結果は偽となります。 


$ SHOW SYMBOL STATUS
  STATUS = 1   Hex = 00000001  Octal = 00000000001
$ STATUS = .NOT. STATUS
$ SHOW SYMBOL STATUS
  STATUS = -2   Hex = FFFFFFFE  Octal = 37777777776

次の例では，真の値と偽の値の論理積を求めた結果が偽の値になっています。 


$ STAT1 = "TRUE"
$ STAT2 = "FALSE"
$ STATUS = STAT1 .AND. STAT2
$ SHOW SYMBOL STATUS
  STATUS = 0   Hex = 00000000  Octal = 00000000000

次の例は，真の値と偽の値の論理和を求めることによって，結果は真の値になっています。 


$ STAT1 = "TRUE"
$ STAT2 = "FALSE"
$ STATUS = STAT1 .OR. STAT2
$ SHOW SYMBOL STATUS
  STATUS = 1   Hex = 00000001  Octal = 00000000001

12.8.3 論理演算の結果

次の表は，ビット単位と数値単位の論理演算の結果を示しています。論理演算では，大文字または小文字の T または Y で始まる文字列は数値 1 として処理され，これ以外の文字で始まる文字列は，数値 0 として処理されます。また，奇数は真になり，偶数とゼロは偽になります。

指定された:     結果:
ビット A ビット B   .NOT. A A .AND. B A .OR. B
1 1   0 1 1
1 0   0 0 1
0 1   1 0 1
0 0   1 0 0

指定された:     結果:
数値 A 数値 B   .NOT. A A .AND. B A .OR. B
奇数 奇数   偶数 奇数 奇数
奇数 偶数   偶数 偶数 奇数
偶数 奇数   奇数 偶数 奇数
偶数 偶数   奇数 偶数 偶数

12.8.4 レキシカル関数が戻す値の使用

レキシカル関数は，通常コマンド・プロシージャの中で使用され，システム・プロセス，バッチ・キューと印刷キュー，ユーザ・プロセスなどについての情報をシステムから検索します。レキシカル関数を使用して，文字列を処理したり論理名を変換することもできます。レキシカル関数をシンボルに割り当てた場合，実際にはレキシカル関数によって戻される情報(たとえば，数値や文字列)がシンボルに割り当てられます。このとき，DCL レベルでは，DCL の SHOW SYMBOL コマンドでその情報を表示できます。コマンド・プロシージャの中では，シンボルに格納された情報を後でプロシージャで使用できます。それぞれのレキシカル関数については，『OpenVMS DCL ディクショナリ』を参照してください。

レキシカル関数を使用するには，レキシカル関数の名前(先頭に F$ が付く)とその引数リストを指定します。次の形式を使用します。 


F$関数名(引数[,...])

引数リストは関数名の後に指定し，その間にスペースやタブをいくつでもいれることができます。

レキシカル関数を使用する場合は，次の規則に従います。

レキシカル関数は，文字列，整数，シンボルと同じように使用します。式の中でレキシカル関数を使用すると，DCL は自動的に関数を評価して，関数を戻り値と置き換えます。

次の例では，F$LENGTH 関数は，引数 BUMBLEBEEとして指定された値の長さを戻します。DCL は，自動的に戻り値(9)を判別し，この値を使用して式を評価します。したがって，式(9 + 1)の結果は 10 となり，この値が SUM シンボルに割り当てられます。 


$ SUM = F$LENGTH("BUMBLEBEE")+ 1
$ SHOW SYMBOL SUM
  SUM = 10   Hex = 0000000A  Octal = 00000000012

各レキシカル関数は，情報を整数または文字列のいずれかとして戻すことに注意してください。また，レキシカル関数の引数は，整数または文字列式として指定しなければなりません。

たとえば，F$LENGTH 関数は，文字列式である引数を必要とし，整数の値を戻します。前の例で，"BUMBLEBEE" 引数は文字列式であり，戻り値(9)は整数です。

レキシカル関数は，シンボルを使用できる場所であればどこでも使用できます。シンボルを一重引用符で囲んで(第 12.12 節 を参照)，シンボル置換を強制しなければならない場所では，レキシカル関数の前後に一重引用符を置いて，レキシカル関数の評価を強制しなければなりません。レキシカル関数は，他のレキシカル関数の引数値としても使用できます。

F$LENGTH 関数に対して引数を指定する，他の方法を以下の例に示します。それぞれの例では，引数は文字列式です。

F$DIRECTORY を引数として使用する場合は，前後に引用符を付けません。関数は自動的に評価されます。F$DIRECTORY 関数の結果が戻ってからでないと，F$LENGTH 関数は長さを判別できません。結果が戻ると，F$LENGTH 関数は省略時のディレクトリの長さ(大括弧を含む)を判別します。

前へ 次へ 目次 索引