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

6.3 CEEGPID

バージョンID およびプラットフォームID を検索します。

このシステムでは、本サブルーチンは機能的に意味がありません。。

指定方法

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

本システムでこのパラメタの値は0です。

PLATID (出力)

本システムでこのパラメタの値は0です。

FC (出力)

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

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

コード

重大度
(Severity)

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

意味

CEE000

0

0

成功