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

2.8.30 JMN9105I-W

(@1@)IF文の入れ子は共通範囲外です. 処理を続行します.

埋め込みの説明

@1@ : STD

例題

[C9105.cob]
000001 @OPTIONS FLAGSW(STDM)
000002 IDENTIFICATION  DIVISION.
000003 PROGRAM-ID.     C9105.
000004 ENVIRONMENT     DIVISION.
000005 DATA            DIVISION.
000006 WORKING-STORAGE SECTION.
000007   01  REC01     PIC 9(4).
000008   01  REC02     PIC 9(4).
000009 PROCEDURE       DIVISION.
000010 P-START.
000011     IF REC01 = LOW-VALUE THEN
000012        DISPLAY "LOW-VALUE"
000013     ELSE
000014     IF REC01 = HIGH-VALUE THEN
000015        DISPLAY "HIGH-VALUE"
000016     END-IF.
000017     STOP RUN.

C9105.cob 11: JMN9105I-W (STD)IF文の入れ子は共通範囲外です.処理を続行します.