バージョン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.
本システムでこのパラメタの値は0です。
本システムでこのパラメタの値は0です。
フィードバック・コード域を指定します。
返却されるフィードバック・コードとコードの意味は以下のとおりです。
コード | 重大度 | メッセージ番号 | 意味 |
---|---|---|---|
CEE000 | 0 | 0 | 成功 |