Versions Compared

Key

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

[ Image Removed |../../index.htm#lansa/ladtgub3_0250.htm]
現在地:

...

8.3.6 VarIsBoolean

VarIsBooleanは、Subjectバリアントをブール値に変換できる場合にブール値のTrueを返し、そうでない場合にブール値のFalseを返します。

     VarIsBoolean(

...

 Subject )

...

...

例 

...

以下は、変数がブール値であるかどうかを確認するプロパティ・ルーチンです。 

     Ptyroutine Name(Set_uSignalSelection)
Define_

...

Map For(*input)

...

 Class(*variant)

...

 Name(#lcVariant)

...



If Cond(VarIsBoolean(

...

 #lcVariant )

...

 *

...

EQ True)
Execute Subroutine(FP_SETB)

...

 With_Parms(#USE_

...

NAME uSignalSelection 1 #USE_OCUR #lclVariant.Boolean)

...


Else
Execute Subroutine(FP_SET)

...

 With_Parms(#USE_

...

NAME uSignalSelection 1 #USE_OCUR #LCLVARIANT.String)

...


Endif