Versions Compared

Key

  • This line was added.
  • This line was removed.
  • Formatting was changed.

[ Image Added |../../index.htm#lansa/tgub9_operators.htm]
現在地:

Anchor
TGUB9_OPERATORS
TGUB9_OPERATORS
Anchor
_Toc130908038
_Toc130908038
14.1.5 算術演算子および式の演算子

式または条件では、演算子を組み合わせて使用することができます。使用できる演算子は、次のとおりです。
 

オペレーション

説明

(

左括弧

)

右括弧

+

加算

-

減算

/

除算

*

乗算

=

等しい

^=

等しくない (「注: 」参照)

<

より小さい

<=

以下

>

より大きい

>=

以上

*EQ

等しい

*NE

等しくない

*LT

より小さい

*LE

以下

*GT

より大きい

*GE

以上

AND

かつ

OR

または

*AND

かつ

*OR

または

 
式の評価は、括弧内の左から右に行われるため、式が評価される順序に関して不安がある場合は、遠慮なく括弧を使用してください。
括弧を積極的に使用することで、プログラムの質も向上します。プログラマの意図をRDMLコンパイラに明確に伝えることができるだけでなく、さらに、将来アプリケーションを保守する人にも伝えることができます。
式の各要素はタイプと長さの互換性があるかどうかを検査されます。式または条件の構文も、正しいかどうかが検査されます。
LANSAで指定する条件と式はすべて「引用文字列」であるため、「14 LANSAで指定する条件と式はすべて「引用文字列」であるため、「14.1.6 引用符および引用文字列」も参照してください。 引用符および引用文字列」も参照してください。
条件と式の例を次に示します。

  • フィールド#Aが10より小さい場合のみ、RDMLコマンドが実行されるように条件付けます。

...

          GROUP_BY NAME(#PRODUCT) FIELDS(#PRODNO #DESC #PRICE 
                                         #QOH #TAX)
          BEGIN_LOOP
          DOUNTIL    COND('#IO$STS = OK')
          REQUEST    FIELD(#PRODNO)
          FETCH      FIELDS(#PRODUCT) FROM_FILE(PROMST) 
                     WITH_KEY(#PRODNO)
          ENDUNTIL
 
          DISPLAY    FIELDS(#PRODUCT)
          END_LOOP
 
 

Anchor
COMPARE_NOT_EQUAL_NOTE
COMPARE_NOT_EQUAL_NOTE
注:
IBM iと、5250端末または5250エミュレーション・モードの端末を使用しているPCプラットフォーム(ASCII/EBCDIC)との間に変換テーブルの問題があるため、式で^=(等しくない)を使用する場合は注意が必要です。編集時に使用する端末/キーボードによっては、^=、¢ =、¬=と表示される可能性があります。この場合、代わりに*NEを使用してください。
[ Image Added |../../index.htm#lansa/tgub9_operators.htm]