例題
[P2697.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P2697. 000003 ENVIRONMENT DIVISION. 000004 DATA DIVISION. 000005 WORKING-STORAGE SECTION. 000006 01 WNUM PIC X(2). 000007 PROCEDURE DIVISION. 000008 IF WNUM = "13" THEN 000009 DISPLAY "OK" 000010 ELSE 000011 EXIT PERFORM 000012 END-IF 000013 END PROGRAM P2697.
P2697.cob 11: JMN2697I-S EXIT PERFORM文はうちPERFORM文の内側に指定しなければなりません．
詳細な説明
EXIT PERFORM文は，うちPERFORM文の出口を指定します．
