平方根を返却します。
サポートされているデータ型に応じて、以下のルーチンが提供されます。
CEESSSQT 32 ビットの単精度浮動小数点数
CEESDSQT 64 ビットの倍精度浮動小数点数
指定方法
CALL "CEESxSQT" USING
BY REFERENCE ARG1RS,
BY REFERENCE FBCODE,
BY REFERENCE RESLTRS.01 ARG1RS COMP-1.
01 FBCODE.
02 Condition-Token-Value.
COPY CEEIGZCT.
03 Case-1-Condition-ID.
04 Severity PIC S9(4) BINARY.
04 Msg-No PIC S9(4) BINARY.
03 Case-2-Condition-ID
REDEFINES Case-1-Condition-ID.
04 Class-Code PIC S9(4) BINARY.
04 Cause-Code PIC S9(4) BINARY.
03 Case-Sev-Ctl PIC X.
03 Facility-ID PIC XXX.
02 I-S-Info PIC S9(9) BINARY.
01 RESLTRS COMP-1.平方根ルーチンへの入力。
本サブルーチンの結果を示すフィードバック・コードです。
出力されるフィードバック・コードは以下のとおりです。
コード | 重大度 | メッセージ番号 | 意味 |
|---|---|---|---|
CEE000 | 0 | 0 | 成功 |
CEE1UQ | 2 | 2010 | 引数が制限値より小さい。 |
平方根を格納する領域を指定します。