ページの先頭行へ戻る
NetCOBOL V12.0 LEサブルーチン ユーザーズガイド
FUJITSU Software

4.14 CEEUTC

協定世界時 (CEEGMT の別名) を取得します。

指定方法

呼出しの記述
CALL "CEEUTC" USING
    BY REFERENCE LILIAN, 
    BY REFERENCE SECS, 
    BY REFERENCE FC.
パラメタのデータ定義
01 LILIAN PIC S9(9) BINARY.
01 SECS   COMP-2.
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.
LILIAN (出力)

英国グリニッジの現在の日付をリリアン形式(1582 年10 月14 日からの日数)で格納する領域を指定します。

SECS (出力)

英国グリニッジにおける現在の日時を、1582 年10 月14 日の00:00:00 からの秒数(うるう秒数はカウントしない) を格納する領域を指定します。

FC (出力)

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

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

コード

重大度
(Severity)

メッセージ番号
(Msg-No)

意味

CEE000

0

0

成功

CEE2E6

3

2502

UTC/GMT がシステムから使用可能ではありません。