世紀ウィンドウを設定します。
世紀ウィンドウについては、CEEQCENを参照してください。
指定方法
CALL "CEESCEN" USING
BY REFERENCE STARTCW,
BY REFERENCE FC.01 STARTCW 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.世紀ウィンドウを設定する0 から100 までの整数を指定します。
フィードバック・コード域を指定します。
返却されるフィードバック・コードとコードの意味は以下のとおりです。
コード | 重大度 | メッセージ番号 | 意味 |
|---|---|---|---|
CEE000 | 0 | 0 | 成功 |
CEE2E6 | 3 | 2502 | UTC/GMT がシステムから使用可能ではありません。 |