9.199 SQUARE_ROOT

注意: 9.1 組み込み関数の規則      &<a href="bifcat2_05.htm"&>利用オプション&</a&>
平方根値を計算します。
 
引数

番号

タイプ

必須/任意

記述

最小長

最大長

最小小数桁数

最大小数桁数

1

N

必須

平方根を計算する値
注:Visual LANSAでは、最大長は15,5です。

1

30

0

9

戻り値

番号

タイプ

必須/任意

記述

最小長

最大長

最小小数桁数

最大小数桁数

1

N

必須

平方根値
注:Visual LANSAでは、最大長は15,5です。

1

30

0

9

注: このファンクションは、平方根値を切り捨ててから、その値を戻します。つまり、戻りフィールドがDIGITS(4) DECIMALS(2)と定義され、平方根値が1.41421の場合、戻り値は01.41になります。

********** A simple square root calculator DEFINE     FIELD(#NUMBER1) TYPE(*DEC) LENGTH(15) DECIMALS(5) EDIT_CODE(3) DEFINE     FIELD(#RESULT) TYPE(*DEC) LENGTH(15) DECIMALS(5) EDIT_CODE(3) ********** Request number to calculate root from REQUEST    FIELDS(#NUMBER1) ********** Calculate square root USE        BUILTIN(SQUARE_ROOT) WITH_ARGS(#NUMBER1) TO_GET(#RESULT) ********** Display result DISPLAY   FIELDS(#NUMBER1 #RESULT)