FINIT、FINIT32(3cbl)

名前

FINIT()、FINIT32() - フィールド化バッファの初期化

形式

01 FML-BUFFER.
05 FML-ALIGN PIC S9(9) USAGE IS COMP.
05 FML-DATA PIC X(applen).

01 FML-REC
COPY FMLINFO.

CALL "FINIT" USING FML-BUFFER FML-REC.

CALL "FINIT32" USING FML-BUFFER FML-REC.

機能説明

FINIT() は、フィールド化バッファの初期化をする場合に呼び出すことができます。 FML-BUFFER は、フィールド化バッファとして使用するレコードであり、FML16 および FML32 と合わせて使用するためには、4 バイトの境界にアライメントされている必要があります。 これは、上の「形式」に示すようにレコードの要素を 2 つ定義することで可能になります。 FML-REC 中の FML-LENGTH はレコードの長さです。 フィールド化バッファに対応して、内部構造体がフィールドなしで設定されます。アプリケーション・プログラムはレコードを FINT()、FVFTOS()、または FVSTOF() に渡したり、型付きレコードが必要な ATMI 呼び出しに渡す (この場合、タイプは "FML" でサブタイプはありません) 場合を除いて、レコードを解釈してはなりません。

FINIT32() は 32 ビット FML で使用します。

戻り値

FINIT() は正常終了時には、FML-REC 内の FML-STATUS に FOK を設定します。

エラーが発生した場合は、FML-STATUS は 0 以外の値に設定されます。

エラー

次の条件が発生すると、FINIT() は異常終了し、FML-REC 内の FML-STATUS に次の値を設定します。

使用例

バッファからフィールドを削除する再初期化のための正しい方法を以下に示します。

Finit(frfr, (FLDLEN)Fsizeof(fbfr));

関連項目