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

2.8.53 JMN9152I-W

(@1@)手続き名を省略したGO TO文は共通範囲外です. 処理を続行します.

埋め込みの説明

@1@ : STD

例題

[C9152.cob]
000001 @OPTIONS FLAGSW(STDM)
000002 IDENTIFICATION  DIVISION.
000003 PROGRAM-ID.     C9152.
000004 ENVIRONMENT     DIVISION.
000005 DATA            DIVISION.
000006 WORKING-STORAGE SECTION.
000007  01  REC01       PIC 9(5).
000008 PROCEDURE    DIVISION.
000009 P-START.
000010     ALTER P-START1 TO P-START2.
000011 P-START1.
000012     GO  TO.
000013 P-START2.
000014     STOP RUN.

C9152.cob 12: JMN9152I-W (STD)手続き名を省略したGO TO文は共通範囲外です.処理を続行します.