例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. P2508.
000003 ENVIRONMENT DIVISION.
000004 DATA DIVISION.
000005 WORKING-STORAGE SECTION.
000006 01 WDA PIC X.
000007 PROCEDURE DIVISION.
000008 IF WDA = SPACE THEN
000009 NEXT SENTENCE
000010 END-IF
000011 END PROGRAM P2508.
P2508.cob (8) : JMN2508I-W NEXT SENTENCEは，明示範囲符を持つIFまたはSEARCH文に指定できません．指定されたとおりに，受け入れます．
詳細な説明
IF文およびSEARCH文の明示範囲符は次のとおりです．
IF文に対するEND-IF
SEARCH文に対するEND-SEARCH
これらを指定したIF文またはSEARCH文にNEXT SENTENCEを記述した場合に，この診断メッセージが出力されます．NEXT SENTENCEまたは明示範囲符を削除してください．