6.2 CEE3USR

ユーザー域フィールドを設定または参照します。

ユーザー域フィールドは4バイトのフィールドで、2つあります。

指定方法

呼出しの記述

CALL "CEE3USR" USING
    BY REFERENCE FUNCODE,
    BY REFERENCE FIELDNO,
    BY REFERENCE INVALUE,
    BY REFERENCE FC.

パラメタのデータ定義

01 FUNCODE PIC S9(9) BINARY.
01 FIELDNO PIC S9(9) BINARY.
01 INVALUE PIC S9(9) BINARY. 
01 FC.
   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.

FUNCODE (入力)

実行する機能コードを指定します。

1-SET INVALUEで指定された値がユーザー域フィールドに設定されます。

2-REFER ユーザー域フィールドに設定されている値がINVALUEに設定されます。

FIELDNO (入力)

フィールド番号を指定します。

1または2を指定します。

INVALUE (入出力)

FUNCODE に1 (設定する) を指定した場合、FIELDNOで指定されたユーザー域フィールドへ設定する値を指定します。

FUNCODE に2 (参照する）を指定した場合、FIELDNOで指定されたユーザー域フィールドに設定されている値が出力されます。

FC (出力)

フィードバック・コード域を指定します。

返却されるフィードバック・コードとコードの意味は以下のとおりです。

コード	重大度 (Severity)	メッセージ番号 (Msg-No)	意味
CEE000	0	0	成功
CEE3PS	3	3900	指定した機能コードが1 または2 ではありません。
CEE3PT	3	3901	指定したフィールド番号が1 または2 ではありません。