ページの先頭行へ戻る
NetCOBOL V11.0 メッセージ集
FUJITSU Software

2.8.118 JMN9921I-E

(@1@)OSIVシステムでは,手続き部見出しの@2@指定はサポートしていません.

埋め込みの説明

@1@ : GSS,GSW
@2@ : WITH、RETURNING(コード指定)

例題

[P9921.cob]
000001 @OPTIONS FLAGSW(GSS)
000002 IDENTIFICATION DIVISION.
000003 PROGRAM-ID.    P9921.
000004 ENVIRONMENT    DIVISION.
000005 DATA           DIVISION.
000006 LINKAGE         SECTION.
000007 01 LK1         PIC S9(4) BINARY.
000008 PROCEDURE      DIVISION
000009                    RETURNING LK1.
000010 END PROGRAM    P9921.

P9921.cob 8: JMN9921I-E (GSS)OSIVシステムでは,手続き部見出しのRETURNING指定はサポートしていません.