4.10 CEEQCEN

世紀ウィンドウを照会します。

世紀ウィンドウは、2桁の年号が固有に決まる100 年間(世紀)を表します。

設定を変更する場合は、CEEQCEN を使用して現在の設定を表示してから、CEESCEN を使用して設定値を保管および復元してください。

指定方法

呼出しの記述

CALL "CEEQCEN" 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.

STARTCW (出力)

0 から100 までの間の整数が格納される領域を指定します。

この値は現行の世紀ウィンドウが何年前に始まったかを示します。

例：STARTCWの値が「50」で、2016年の場合、世紀ウィンドウは1966年から2066年です。

FC (出力)

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

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

コード	重大度 (Severity)	メッセージ番号 (Msg-No)	意味
CEE000	0	0	成功